src/basic/cgroup-util.c

   1 /***
   2   This file is part of systemd.
   3
   4   Copyright 2010 Lennart Poettering
   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 <dirent.h>
  21 #include <errno.h>
  22 #include <ftw.h>
  23 //#include <limits.h>
  24 #include <signal.h>
  25 //#include <stddef.h>
  26 #include <stdlib.h>
  27 #include <string.h>
  28 #include <sys/stat.h>
  29 //#include <sys/statfs.h>
  30 #include <sys/types.h>
  31 #include <sys/xattr.h>
  32 #include <unistd.h>
  33
  34 #include "alloc-util.h"
  35 #include "cgroup-util.h"
  36 //#include "def.h"
  37 #include "dirent-util.h"
  38 #include "extract-word.h"
  39 #include "fd-util.h"
  40 #include "fileio.h"
  41 #include "format-util.h"
  42 #include "fs-util.h"
  43 //#include "log.h"
  44 #include "login-util.h"
  45 #include "macro.h"
  46 //#include "missing.h"
  47 #include "mkdir.h"
  48 #include "parse-util.h"
  49 #include "path-util.h"
  50 #include "proc-cmdline.h"
  51 #include "process-util.h"
  52 #include "set.h"
  53 //#include "special.h"
  54 #include "stat-util.h"
  55 #include "stdio-util.h"
  56 #include "string-table.h"
  57 #include "string-util.h"
  58 #include "strv.h"
  59 #include "unit-name.h"
  60 #include "user-util.h"
  61
  62 int cg_enumerate_processes(const char *controller, const char *path, FILE **_f) {
  63         _cleanup_free_ char *fs = NULL;
  64         FILE *f;
  65         int r;
  66
  67         assert(_f);
  68
  69         r = cg_get_path(controller, path, "cgroup.procs", &fs);
  70         if (r < 0)
  71                 return r;
  72
  73         f = fopen(fs, "re");
  74         if (!f)
  75                 return -errno;
  76
  77         *_f = f;
  78         return 0;
  79 }
  80
  81 int cg_read_pid(FILE *f, pid_t *_pid) {
  82         unsigned long ul;
  83
  84         /* Note that the cgroup.procs might contain duplicates! See
  85          * cgroups.txt for details. */
  86
  87         assert(f);
  88         assert(_pid);
  89
  90         errno = 0;
  91         if (fscanf(f, "%lu", &ul) != 1) {
  92
  93                 if (feof(f))
  94                         return 0;
  95
  96                 return errno > 0 ? -errno : -EIO;
  97         }
  98
  99         if (ul <= 0)
 100                 return -EIO;
 101
 102         *_pid = (pid_t) ul;
 103         return 1;
 104 }
 105
 106 int cg_read_event(
 107                 const char *controller,
 108                 const char *path,
 109                 const char *event,
 110                 char **val) {
 111
 112         _cleanup_free_ char *events = NULL, *content = NULL;
 113         char *p, *line;
 114         int r;
 115
 116         r = cg_get_path(controller, path, "cgroup.events", &events);
 117         if (r < 0)
 118                 return r;
 119
 120         r = read_full_file(events, &content, NULL);
 121         if (r < 0)
 122                 return r;
 123
 124         p = content;
 125         while ((line = strsep(&p, "\n"))) {
 126                 char *key;
 127
 128                 key = strsep(&line, " ");
 129                 if (!key || !line)
 130                         return -EINVAL;
 131
 132                 if (strcmp(key, event))
 133                         continue;
 134
 135                 *val = strdup(line);
 136                 return 0;
 137         }
 138
 139         return -ENOENT;
 140 }
 141
 142 #if 0 /// UNNEEDED by elogind
 143 bool cg_ns_supported(void) {
 144         static thread_local int enabled = -1;
 145
 146         if (enabled >= 0)
 147                 return enabled;
 148
 149         if (access("/proc/self/ns/cgroup", F_OK) == 0)
 150                 enabled = 1;
 151         else
 152                 enabled = 0;
 153
 154         return enabled;
 155 }
 156 #endif // 0
 157
 158 int cg_enumerate_subgroups(const char *controller, const char *path, DIR **_d) {
 159         _cleanup_free_ char *fs = NULL;
 160         int r;
 161         DIR *d;
 162
 163         assert(_d);
 164
 165         /* This is not recursive! */
 166
 167         r = cg_get_path(controller, path, NULL, &fs);
 168         if (r < 0)
 169                 return r;
 170
 171         d = opendir(fs);
 172         if (!d)
 173                 return -errno;
 174
 175         *_d = d;
 176         return 0;
 177 }
 178
 179 int cg_read_subgroup(DIR *d, char **fn) {
 180         struct dirent *de;
 181
 182         assert(d);
 183         assert(fn);
 184
 185         FOREACH_DIRENT_ALL(de, d, return -errno) {
 186                 char *b;
 187
 188                 if (de->d_type != DT_DIR)
 189                         continue;
 190
 191                 if (dot_or_dot_dot(de->d_name))
 192                         continue;
 193
 194                 b = strdup(de->d_name);
 195                 if (!b)
 196                         return -ENOMEM;
 197
 198                 *fn = b;
 199                 return 1;
 200         }
 201
 202         return 0;
 203 }
 204
 205 int cg_rmdir(const char *controller, const char *path) {
 206         _cleanup_free_ char *p = NULL;
 207         int r;
 208
 209         r = cg_get_path(controller, path, NULL, &p);
 210         if (r < 0)
 211                 return r;
 212
 213         r = rmdir(p);
 214         if (r < 0 && errno != ENOENT)
 215                 return -errno;
 216
 217         r = cg_hybrid_unified();
 218         if (r < 0)
 219                 return r;
 220         if (r == 0)
 221                 return 0;
 222
 223         if (streq(controller, SYSTEMD_CGROUP_CONTROLLER)) {
 224                 r = cg_rmdir(SYSTEMD_CGROUP_CONTROLLER_LEGACY, path);
 225                 if (r < 0)
 226                         log_warning_errno(r, "Failed to remove compat systemd cgroup %s: %m", path);
 227         }
 228
 229         return 0;
 230 }
 231
 232 int cg_kill(
 233                 const char *controller,
 234                 const char *path,
 235                 int sig,
 236                 CGroupFlags flags,
 237                 Set *s,
 238                 cg_kill_log_func_t log_kill,
 239                 void *userdata) {
 240
 241         _cleanup_set_free_ Set *allocated_set = NULL;
 242         bool done = false;
 243         int r, ret = 0;
 244         pid_t my_pid;
 245
 246         assert(sig >= 0);
 247
 248          /* Don't send SIGCONT twice. Also, SIGKILL always works even when process is suspended, hence don't send
 249           * SIGCONT on SIGKILL. */
 250         if (IN_SET(sig, SIGCONT, SIGKILL))
 251                 flags &= ~CGROUP_SIGCONT;
 252
 253         /* This goes through the tasks list and kills them all. This
 254          * is repeated until no further processes are added to the
 255          * tasks list, to properly handle forking processes */
 256
 257         if (!s) {
 258                 s = allocated_set = set_new(NULL);
 259                 if (!s)
 260                         return -ENOMEM;
 261         }
 262
 263         my_pid = getpid_cached();
 264
 265         do {
 266                 _cleanup_fclose_ FILE *f = NULL;
 267                 pid_t pid = 0;
 268                 done = true;
 269
 270                 r = cg_enumerate_processes(controller, path, &f);
 271                 if (r < 0) {
 272                         if (ret >= 0 && r != -ENOENT)
 273                                 return r;
 274
 275                         return ret;
 276                 }
 277
 278                 while ((r = cg_read_pid(f, &pid)) > 0) {
 279
 280                         if ((flags & CGROUP_IGNORE_SELF) && pid == my_pid)
 281                                 continue;
 282
 283                         if (set_get(s, PID_TO_PTR(pid)) == PID_TO_PTR(pid))
 284                                 continue;
 285
 286                         if (log_kill)
 287                                 log_kill(pid, sig, userdata);
 288
 289                         /* If we haven't killed this process yet, kill
 290                          * it */
 291                         if (kill(pid, sig) < 0) {
 292                                 if (ret >= 0 && errno != ESRCH)
 293                                         ret = -errno;
 294                         } else {
 295                                 if (flags & CGROUP_SIGCONT)
 296                                         (void) kill(pid, SIGCONT);
 297
 298                                 if (ret == 0)
 299                                         ret = 1;
 300                         }
 301
 302                         done = false;
 303
 304                         r = set_put(s, PID_TO_PTR(pid));
 305                         if (r < 0) {
 306                                 if (ret >= 0)
 307                                         return r;
 308
 309                                 return ret;
 310                         }
 311                 }
 312
 313                 if (r < 0) {
 314                         if (ret >= 0)
 315                                 return r;
 316
 317                         return ret;
 318                 }
 319
 320                 /* To avoid racing against processes which fork
 321                  * quicker than we can kill them we repeat this until
 322                  * no new pids need to be killed. */
 323
 324         } while (!done);
 325
 326         return ret;
 327 }
 328
 329 int cg_kill_recursive(
 330                 const char *controller,
 331                 const char *path,
 332                 int sig,
 333                 CGroupFlags flags,
 334                 Set *s,
 335                 cg_kill_log_func_t log_kill,
 336                 void *userdata) {
 337
 338         _cleanup_set_free_ Set *allocated_set = NULL;
 339         _cleanup_closedir_ DIR *d = NULL;
 340         int r, ret;
 341         char *fn;
 342
 343         assert(path);
 344         assert(sig >= 0);
 345
 346         if (!s) {
 347                 s = allocated_set = set_new(NULL);
 348                 if (!s)
 349                         return -ENOMEM;
 350         }
 351
 352         ret = cg_kill(controller, path, sig, flags, s, log_kill, userdata);
 353
 354         r = cg_enumerate_subgroups(controller, path, &d);
 355         if (r < 0) {
 356                 if (ret >= 0 && r != -ENOENT)
 357                         return r;
 358
 359                 return ret;
 360         }
 361
 362         while ((r = cg_read_subgroup(d, &fn)) > 0) {
 363                 _cleanup_free_ char *p = NULL;
 364
 365                 p = strjoin(path, "/", fn);
 366                 free(fn);
 367                 if (!p)
 368                         return -ENOMEM;
 369
 370                 r = cg_kill_recursive(controller, p, sig, flags, s, log_kill, userdata);
 371                 if (r != 0 && ret >= 0)
 372                         ret = r;
 373         }
 374         if (ret >= 0 && r < 0)
 375                 ret = r;
 376
 377         if (flags & CGROUP_REMOVE) {
 378                 r = cg_rmdir(controller, path);
 379                 if (r < 0 && ret >= 0 && !IN_SET(r, -ENOENT, -EBUSY))
 380                         return r;
 381         }
 382
 383         return ret;
 384 }
 385
 386 int cg_migrate(
 387                 const char *cfrom,
 388                 const char *pfrom,
 389                 const char *cto,
 390                 const char *pto,
 391                 CGroupFlags flags) {
 392
 393         bool done = false;
 394         _cleanup_set_free_ Set *s = NULL;
 395         int r, ret = 0;
 396         pid_t my_pid;
 397
 398         assert(cfrom);
 399         assert(pfrom);
 400         assert(cto);
 401         assert(pto);
 402
 403         s = set_new(NULL);
 404         if (!s)
 405                 return -ENOMEM;
 406
 407         my_pid = getpid_cached();
 408
 409         log_debug_elogind("Migrating \"%s\"/\"%s\" to \"%s\"/\"%s\" (%s)",
 410                           cfrom, pfrom, cto, pto,
 411                           (flags & CGROUP_IGNORE_SELF)
 412                           ? "ignoring self" : "watching self");
 413         do {
 414                 _cleanup_fclose_ FILE *f = NULL;
 415                 pid_t pid = 0;
 416                 done = true;
 417
 418                 r = cg_enumerate_processes(cfrom, pfrom, &f);
 419                 if (r < 0) {
 420                         if (ret >= 0 && r != -ENOENT)
 421                                 return r;
 422
 423                         return ret;
 424                 }
 425
 426                 while ((r = cg_read_pid(f, &pid)) > 0) {
 427
 428                         /* This might do weird stuff if we aren't a
 429                          * single-threaded program. However, we
 430                          * luckily know we are not */
 431                         if ((flags & CGROUP_IGNORE_SELF) && pid == my_pid)
 432                                 continue;
 433
 434                         if (set_get(s, PID_TO_PTR(pid)) == PID_TO_PTR(pid))
 435                                 continue;
 436
 437                         /* Ignore kernel threads. Since they can only
 438                          * exist in the root cgroup, we only check for
 439                          * them there. */
 440                         if (cfrom &&
 441                             (isempty(pfrom) || path_equal(pfrom, "/")) &&
 442                             is_kernel_thread(pid) > 0)
 443                                 continue;
 444
 445                         r = cg_attach(cto, pto, pid);
 446                         if (r < 0) {
 447                                 if (ret >= 0 && r != -ESRCH)
 448                                         ret = r;
 449                         } else if (ret == 0)
 450                                 ret = 1;
 451
 452                         done = false;
 453
 454                         r = set_put(s, PID_TO_PTR(pid));
 455                         if (r < 0) {
 456                                 if (ret >= 0)
 457                                         return r;
 458
 459                                 return ret;
 460                         }
 461                 }
 462
 463                 if (r < 0) {
 464                         if (ret >= 0)
 465                                 return r;
 466
 467                         return ret;
 468                 }
 469         } while (!done);
 470
 471         return ret;
 472 }
 473
 474 int cg_migrate_recursive(
 475                 const char *cfrom,
 476                 const char *pfrom,
 477                 const char *cto,
 478                 const char *pto,
 479                 CGroupFlags flags) {
 480
 481         _cleanup_closedir_ DIR *d = NULL;
 482         int r, ret = 0;
 483         char *fn;
 484
 485         assert(cfrom);
 486         assert(pfrom);
 487         assert(cto);
 488         assert(pto);
 489
 490         ret = cg_migrate(cfrom, pfrom, cto, pto, flags);
 491
 492         r = cg_enumerate_subgroups(cfrom, pfrom, &d);
 493         if (r < 0) {
 494                 if (ret >= 0 && r != -ENOENT)
 495                         return r;
 496
 497                 return ret;
 498         }
 499
 500         while ((r = cg_read_subgroup(d, &fn)) > 0) {
 501                 _cleanup_free_ char *p = NULL;
 502
 503                 p = strjoin(pfrom, "/", fn);
 504                 free(fn);
 505                 if (!p)
 506                         return -ENOMEM;
 507
 508                 r = cg_migrate_recursive(cfrom, p, cto, pto, flags);
 509                 if (r != 0 && ret >= 0)
 510                         ret = r;
 511         }
 512
 513         if (r < 0 && ret >= 0)
 514                 ret = r;
 515
 516         if (flags & CGROUP_REMOVE) {
 517                 r = cg_rmdir(cfrom, pfrom);
 518                 if (r < 0 && ret >= 0 && !IN_SET(r, -ENOENT, -EBUSY))
 519                         return r;
 520         }
 521
 522         return ret;
 523 }
 524
 525 int cg_migrate_recursive_fallback(
 526                 const char *cfrom,
 527                 const char *pfrom,
 528                 const char *cto,
 529                 const char *pto,
 530                 CGroupFlags flags) {
 531
 532         int r;
 533
 534         assert(cfrom);
 535         assert(pfrom);
 536         assert(cto);
 537         assert(pto);
 538
 539         r = cg_migrate_recursive(cfrom, pfrom, cto, pto, flags);
 540         if (r < 0) {
 541                 char prefix[strlen(pto) + 1];
 542
 543                 /* This didn't work? Then let's try all prefixes of the destination */
 544
 545                 PATH_FOREACH_PREFIX(prefix, pto) {
 546                         int q;
 547
 548                         q = cg_migrate_recursive(cfrom, pfrom, cto, prefix, flags);
 549                         if (q >= 0)
 550                                 return q;
 551                 }
 552         }
 553
 554         return r;
 555 }
 556
 557 static const char *controller_to_dirname(const char *controller) {
 558         const char *e;
 559
 560         assert(controller);
 561
 562         /* Converts a controller name to the directory name below
 563          * /sys/fs/cgroup/ we want to mount it to. Effectively, this
 564          * just cuts off the name= prefixed used for named
 565          * hierarchies, if it is specified. */
 566
 567         if (streq(controller, SYSTEMD_CGROUP_CONTROLLER)) {
 568                 if (cg_hybrid_unified() > 0)
 569                         controller = SYSTEMD_CGROUP_CONTROLLER_HYBRID;
 570                 else
 571                         controller = SYSTEMD_CGROUP_CONTROLLER_LEGACY;
 572         }
 573
 574         e = startswith(controller, "name=");
 575         if (e)
 576                 return e;
 577
 578         return controller;
 579 }
 580
 581 static int join_path_legacy(const char *controller, const char *path, const char *suffix, char **fs) {
 582         const char *dn;
 583         char *t = NULL;
 584
 585         assert(fs);
 586         assert(controller);
 587
 588         dn = controller_to_dirname(controller);
 589
 590         if (isempty(path) && isempty(suffix))
 591                 t = strappend("/sys/fs/cgroup/", dn);
 592         else if (isempty(path))
 593                 t = strjoin("/sys/fs/cgroup/", dn, "/", suffix);
 594         else if (isempty(suffix))
 595                 t = strjoin("/sys/fs/cgroup/", dn, "/", path);
 596         else
 597                 t = strjoin("/sys/fs/cgroup/", dn, "/", path, "/", suffix);
 598         if (!t)
 599                 return -ENOMEM;
 600
 601         *fs = t;
 602         return 0;
 603 }
 604
 605 static int join_path_unified(const char *path, const char *suffix, char **fs) {
 606         char *t;
 607
 608         assert(fs);
 609
 610         if (isempty(path) && isempty(suffix))
 611                 t = strdup("/sys/fs/cgroup");
 612         else if (isempty(path))
 613                 t = strappend("/sys/fs/cgroup/", suffix);
 614         else if (isempty(suffix))
 615                 t = strappend("/sys/fs/cgroup/", path);
 616         else
 617                 t = strjoin("/sys/fs/cgroup/", path, "/", suffix);
 618         if (!t)
 619                 return -ENOMEM;
 620
 621         *fs = t;
 622         return 0;
 623 }
 624
 625 int cg_get_path(const char *controller, const char *path, const char *suffix, char **fs) {
 626         int r;
 627
 628         assert(fs);
 629
 630         if (!controller) {
 631                 char *t;
 632
 633                 /* If no controller is specified, we return the path
 634                  * *below* the controllers, without any prefix. */
 635
 636                 if (!path && !suffix)
 637                         return -EINVAL;
 638
 639                 if (!suffix)
 640                         t = strdup(path);
 641                 else if (!path)
 642                         t = strdup(suffix);
 643                 else
 644                         t = strjoin(path, "/", suffix);
 645                 if (!t)
 646                         return -ENOMEM;
 647
 648                 *fs = path_kill_slashes(t);
 649                 return 0;
 650         }
 651
 652         if (!cg_controller_is_valid(controller))
 653                 return -EINVAL;
 654
 655         r = cg_all_unified();
 656         if (r < 0)
 657                 return r;
 658         if (r > 0)
 659                 r = join_path_unified(path, suffix, fs);
 660         else
 661                 r = join_path_legacy(controller, path, suffix, fs);
 662         if (r < 0)
 663                 return r;
 664
 665         path_kill_slashes(*fs);
 666         return 0;
 667 }
 668
 669 static int controller_is_accessible(const char *controller) {
 670         int r;
 671
 672         assert(controller);
 673
 674         /* Checks whether a specific controller is accessible,
 675          * i.e. its hierarchy mounted. In the unified hierarchy all
 676          * controllers are considered accessible, except for the named
 677          * hierarchies */
 678
 679         if (!cg_controller_is_valid(controller))
 680                 return -EINVAL;
 681
 682         r = cg_all_unified();
 683         if (r < 0)
 684                 return r;
 685         if (r > 0) {
 686                 /* We don't support named hierarchies if we are using
 687                  * the unified hierarchy. */
 688
 689                 if (streq(controller, SYSTEMD_CGROUP_CONTROLLER))
 690                         return 0;
 691
 692                 if (startswith(controller, "name="))
 693                         return -EOPNOTSUPP;
 694
 695         } else {
 696                 const char *cc, *dn;
 697
 698                 dn = controller_to_dirname(controller);
 699                 cc = strjoina("/sys/fs/cgroup/", dn);
 700
 701                 if (laccess(cc, F_OK) < 0)
 702                         return -errno;
 703         }
 704
 705         return 0;
 706 }
 707
 708 int cg_get_path_and_check(const char *controller, const char *path, const char *suffix, char **fs) {
 709         int r;
 710
 711         assert(controller);
 712         assert(fs);
 713
 714         /* Check if the specified controller is actually accessible */
 715         r = controller_is_accessible(controller);
 716         if (r < 0)
 717                 return r;
 718
 719         return cg_get_path(controller, path, suffix, fs);
 720 }
 721
 722 static int trim_cb(const char *path, const struct stat *sb, int typeflag, struct FTW *ftwbuf) {
 723         assert(path);
 724         assert(sb);
 725         assert(ftwbuf);
 726
 727         if (typeflag != FTW_DP)
 728                 return 0;
 729
 730         if (ftwbuf->level < 1)
 731                 return 0;
 732
 733         (void) rmdir(path);
 734         return 0;
 735 }
 736
 737 int cg_trim(const char *controller, const char *path, bool delete_root) {
 738         _cleanup_free_ char *fs = NULL;
 739         int r = 0, q;
 740
 741         assert(path);
 742
 743         r = cg_get_path(controller, path, NULL, &fs);
 744         if (r < 0)
 745                 return r;
 746
 747         errno = 0;
 748         if (nftw(fs, trim_cb, 64, FTW_DEPTH|FTW_MOUNT|FTW_PHYS) != 0) {
 749                 if (errno == ENOENT)
 750                         r = 0;
 751                 else if (errno > 0)
 752                         r = -errno;
 753                 else
 754                         r = -EIO;
 755         }
 756
 757         if (delete_root) {
 758                 if (rmdir(fs) < 0 && errno != ENOENT)
 759                         return -errno;
 760         }
 761
 762         q = cg_hybrid_unified();
 763         if (q < 0)
 764                 return q;
 765         if (q > 0 && streq(controller, SYSTEMD_CGROUP_CONTROLLER)) {
 766                 q = cg_trim(SYSTEMD_CGROUP_CONTROLLER_LEGACY, path, delete_root);
 767                 if (q < 0)
 768                         log_warning_errno(q, "Failed to trim compat systemd cgroup %s: %m", path);
 769         }
 770
 771         return r;
 772 }
 773
 774 int cg_create(const char *controller, const char *path) {
 775         _cleanup_free_ char *fs = NULL;
 776         int r;
 777
 778         r = cg_get_path_and_check(controller, path, NULL, &fs);
 779         if (r < 0)
 780                 return r;
 781
 782         r = mkdir_parents(fs, 0755);
 783         if (r < 0)
 784                 return r;
 785
 786         if (mkdir(fs, 0755) < 0) {
 787
 788                 if (errno == EEXIST)
 789                         return 0;
 790
 791                 return -errno;
 792         }
 793
 794         r = cg_hybrid_unified();
 795         if (r < 0)
 796                 return r;
 797
 798         if (r > 0 && streq(controller, SYSTEMD_CGROUP_CONTROLLER)) {
 799                 r = cg_create(SYSTEMD_CGROUP_CONTROLLER_LEGACY, path);
 800                 if (r < 0)
 801                         log_warning_errno(r, "Failed to create compat systemd cgroup %s: %m", path);
 802         }
 803
 804         return 1;
 805 }
 806
 807 int cg_create_and_attach(const char *controller, const char *path, pid_t pid) {
 808         int r, q;
 809
 810         assert(pid >= 0);
 811
 812         r = cg_create(controller, path);
 813         if (r < 0)
 814                 return r;
 815
 816         q = cg_attach(controller, path, pid);
 817         if (q < 0)
 818                 return q;
 819
 820         /* This does not remove the cgroup on failure */
 821         return r;
 822 }
 823
 824 int cg_attach(const char *controller, const char *path, pid_t pid) {
 825         _cleanup_free_ char *fs = NULL;
 826         char c[DECIMAL_STR_MAX(pid_t) + 2];
 827         int r;
 828
 829         assert(path);
 830         assert(pid >= 0);
 831
 832         r = cg_get_path_and_check(controller, path, "cgroup.procs", &fs);
 833         if (r < 0)
 834                 return r;
 835
 836         if (pid == 0)
 837                 pid = getpid_cached();
 838
 839         xsprintf(c, PID_FMT "\n", pid);
 840
 841         r = write_string_file(fs, c, 0);
 842         if (r < 0)
 843                 return r;
 844
 845         r = cg_hybrid_unified();
 846         if (r < 0)
 847                 return r;
 848
 849         if (r > 0 && streq(controller, SYSTEMD_CGROUP_CONTROLLER)) {
 850                 r = cg_attach(SYSTEMD_CGROUP_CONTROLLER_LEGACY, path, pid);
 851                 if (r < 0)
 852                         log_warning_errno(r, "Failed to attach "PID_FMT" to compat systemd cgroup %s: %m", pid, path);
 853         }
 854
 855         return 0;
 856 }
 857
 858 int cg_attach_fallback(const char *controller, const char *path, pid_t pid) {
 859         int r;
 860
 861         assert(controller);
 862         assert(path);
 863         assert(pid >= 0);
 864
 865         r = cg_attach(controller, path, pid);
 866         if (r < 0) {
 867                 char prefix[strlen(path) + 1];
 868
 869                 /* This didn't work? Then let's try all prefixes of
 870                  * the destination */
 871
 872                 PATH_FOREACH_PREFIX(prefix, path) {
 873                         int q;
 874
 875                         q = cg_attach(controller, prefix, pid);
 876                         if (q >= 0)
 877                                 return q;
 878                 }
 879         }
 880
 881         return r;
 882 }
 883
 884 #if 0 /// UNNEEDED by elogind
 885 int cg_set_group_access(
 886                 const char *controller,
 887                 const char *path,
 888                 mode_t mode,
 889                 uid_t uid,
 890                 gid_t gid) {
 891
 892         _cleanup_free_ char *fs = NULL;
 893         int r;
 894
 895         if (mode == MODE_INVALID && uid == UID_INVALID && gid == GID_INVALID)
 896                 return 0;
 897
 898         if (mode != MODE_INVALID)
 899                 mode &= 0777;
 900
 901         r = cg_get_path(controller, path, NULL, &fs);
 902         if (r < 0)
 903                 return r;
 904
 905         r = chmod_and_chown(fs, mode, uid, gid);
 906         if (r < 0)
 907                 return r;
 908
 909         r = cg_hybrid_unified();
 910         if (r < 0)
 911                 return r;
 912         if (r > 0 && streq(controller, SYSTEMD_CGROUP_CONTROLLER)) {
 913                 r = cg_set_group_access(SYSTEMD_CGROUP_CONTROLLER_LEGACY, path, mode, uid, gid);
 914                 if (r < 0)
 915                         log_debug_errno(r, "Failed to set group access on compatibility systemd cgroup %s, ignoring: %m", path);
 916         }
 917
 918         return 0;
 919 }
 920
 921 int cg_set_task_access(
 922                 const char *controller,
 923                 const char *path,
 924                 mode_t mode,
 925                 uid_t uid,
 926                 gid_t gid) {
 927
 928         _cleanup_free_ char *fs = NULL;
 929         int r;
 930
 931         assert(path);
 932
 933         if (mode == MODE_INVALID && uid == UID_INVALID && gid == GID_INVALID)
 934                 return 0;
 935
 936         if (mode != MODE_INVALID)
 937                 mode &= 0666;
 938
 939         /* For both the legacy and unified hierarchies, "cgroup.procs" is the main entry point for PIDs */
 940         r = cg_get_path(controller, path, "cgroup.procs", &fs);
 941         if (r < 0)
 942                 return r;
 943
 944         r = chmod_and_chown(fs, mode, uid, gid);
 945         if (r < 0)
 946                 return r;
 947
 948         r = cg_unified_controller(controller);
 949         if (r < 0)
 950                 return r;
 951         if (r == 0) {
 952                 const char *fn;
 953
 954                 /* Compatibility: on cgroupsv1 always keep values for the legacy files "tasks" and
 955                  * "cgroup.clone_children" in sync with "cgroup.procs". Since this is legacy stuff, we don't care if
 956                  * this fails. */
 957
 958                 FOREACH_STRING(fn,
 959                                "tasks",
 960                                "cgroup.clone_children") {
 961
 962                         fs = mfree(fs);
 963
 964                         r = cg_get_path(controller, path, fn, &fs);
 965                         if (r < 0)
 966                                 log_debug_errno(r, "Failed to get path for %s of %s, ignoring: %m", fn, path);
 967
 968                         r = chmod_and_chown(fs, mode, uid, gid);
 969                         if (r < 0)
 970                                 log_debug_errno(r, "Failed to to change ownership/access mode for %s of %s, ignoring: %m", fn, path);
 971                 }
 972         } else {
 973                 /* On the unified controller, we want to permit subtree controllers too. */
 974
 975                 fs = mfree(fs);
 976                 r = cg_get_path(controller, path, "cgroup.subtree_control", &fs);
 977                 if (r < 0)
 978                         return r;
 979
 980                 r = chmod_and_chown(fs, mode, uid, gid);
 981                 if (r < 0)
 982                         return r;
 983         }
 984
 985         r = cg_hybrid_unified();
 986         if (r < 0)
 987                 return r;
 988         if (r > 0 && streq(controller, SYSTEMD_CGROUP_CONTROLLER)) {
 989                 /* Always propagate access mode from unified to legacy controller */
 990
 991                 r = cg_set_task_access(SYSTEMD_CGROUP_CONTROLLER_LEGACY, path, mode, uid, gid);
 992                 if (r < 0)
 993                         log_debug_errno(r, "Failed to set task access on compatibility systemd cgroup %s, ignoring: %m", path);
 994         }
 995
 996         return 0;
 997 }
 998
 999 int cg_set_xattr(const char *controller, const char *path, const char *name, const void *value, size_t size, int flags) {
1000         _cleanup_free_ char *fs = NULL;
1001         int r;
1002
1003         assert(path);
1004         assert(name);
1005         assert(value || size <= 0);
1006
1007         r = cg_get_path(controller, path, NULL, &fs);
1008         if (r < 0)
1009                 return r;
1010
1011         if (setxattr(fs, name, value, size, flags) < 0)
1012                 return -errno;
1013
1014         return 0;
1015 }
1016
1017 int cg_get_xattr(const char *controller, const char *path, const char *name, void *value, size_t size) {
1018         _cleanup_free_ char *fs = NULL;
1019         ssize_t n;
1020         int r;
1021
1022         assert(path);
1023         assert(name);
1024
1025         r = cg_get_path(controller, path, NULL, &fs);
1026         if (r < 0)
1027                 return r;
1028
1029         n = getxattr(fs, name, value, size);
1030         if (n < 0)
1031                 return -errno;
1032
1033         return (int) n;
1034 }
1035 #endif // 0
1036
1037 int cg_pid_get_path(const char *controller, pid_t pid, char **path) {
1038         _cleanup_fclose_ FILE *f = NULL;
1039         char line[LINE_MAX];
1040 #if 0 /// At elogind we do not want that (false alarm) "maybe uninitialized" warning
1041         const char *fs, *controller_str;
1042 #else
1043         const char *fs, *controller_str = NULL;
1044 #endif // 0
1045         size_t cs = 0;
1046         int unified;
1047
1048         assert(path);
1049         assert(pid >= 0);
1050
1051         if (controller) {
1052                 if (!cg_controller_is_valid(controller))
1053                         return -EINVAL;
1054         } else
1055                 controller = SYSTEMD_CGROUP_CONTROLLER;
1056
1057         unified = cg_unified_controller(controller);
1058         if (unified < 0)
1059                 return unified;
1060         if (unified == 0) {
1061                 if (streq(controller, SYSTEMD_CGROUP_CONTROLLER))
1062                         controller_str = SYSTEMD_CGROUP_CONTROLLER_LEGACY;
1063                 else
1064                         controller_str = controller;
1065
1066                 cs = strlen(controller_str);
1067         }
1068
1069         fs = procfs_file_alloca(pid, "cgroup");
1070         log_debug_elogind("Searching for PID %u in \"%s\" (controller \"%s\")",
1071                           pid, fs, controller);
1072         f = fopen(fs, "re");
1073         if (!f)
1074                 return errno == ENOENT ? -ESRCH : -errno;
1075
1076         FOREACH_LINE(line, f, return -errno) {
1077                 char *e, *p;
1078
1079                 truncate_nl(line);
1080
1081                 if (unified) {
1082                         e = startswith(line, "0:");
1083                         if (!e)
1084                                 continue;
1085
1086                         e = strchr(e, ':');
1087                         if (!e)
1088                                 continue;
1089                 } else {
1090                         char *l;
1091                         size_t k;
1092                         const char *word, *state;
1093                         bool found = false;
1094
1095                         l = strchr(line, ':');
1096                         if (!l)
1097                                 continue;
1098
1099                         l++;
1100                         e = strchr(l, ':');
1101                         if (!e)
1102                                 continue;
1103
1104                         *e = 0;
1105                         FOREACH_WORD_SEPARATOR(word, k, l, ",", state) {
1106                                 if (k == cs && memcmp(word, controller_str, cs) == 0) {
1107                                         found = true;
1108                                         break;
1109                                 }
1110                         }
1111
1112                         if (!found)
1113                                 continue;
1114                 }
1115
1116                 log_debug_elogind("Found %s:%s", line, e+1);
1117                 p = strdup(e + 1);
1118                 if (!p)
1119                         return -ENOMEM;
1120
1121                 /* Truncate suffix indicating the process is a zombie */
1122                 e = endswith(p, " (deleted)");
1123                 if (e)
1124                         *e = 0;
1125
1126                 *path = p;
1127                 return 0;
1128         }
1129
1130         return -ENODATA;
1131 }
1132
1133 #if 0 /// UNNEEDED by elogind
1134 int cg_install_release_agent(const char *controller, const char *agent) {
1135         _cleanup_free_ char *fs = NULL, *contents = NULL;
1136         const char *sc;
1137         int r;
1138
1139         assert(agent);
1140
1141         r = cg_unified_controller(controller);
1142         if (r < 0)
1143                 return r;
1144         if (r > 0) /* doesn't apply to unified hierarchy */
1145                 return -EOPNOTSUPP;
1146
1147         r = cg_get_path(controller, NULL, "release_agent", &fs);
1148         if (r < 0)
1149                 return r;
1150
1151         r = read_one_line_file(fs, &contents);
1152         if (r < 0)
1153                 return r;
1154
1155         sc = strstrip(contents);
1156         if (isempty(sc)) {
1157                 r = write_string_file(fs, agent, 0);
1158                 if (r < 0)
1159                         return r;
1160         } else if (!path_equal(sc, agent))
1161                 return -EEXIST;
1162
1163         fs = mfree(fs);
1164         r = cg_get_path(controller, NULL, "notify_on_release", &fs);
1165         if (r < 0)
1166                 return r;
1167
1168         contents = mfree(contents);
1169         r = read_one_line_file(fs, &contents);
1170         if (r < 0)
1171                 return r;
1172
1173         sc = strstrip(contents);
1174         if (streq(sc, "0")) {
1175                 r = write_string_file(fs, "1", 0);
1176                 if (r < 0)
1177                         return r;
1178
1179                 return 1;
1180         }
1181
1182         if (!streq(sc, "1"))
1183                 return -EIO;
1184
1185         return 0;
1186 }
1187
1188 int cg_uninstall_release_agent(const char *controller) {
1189         _cleanup_free_ char *fs = NULL;
1190         int r;
1191
1192         r = cg_unified_controller(controller);
1193         if (r < 0)
1194                 return r;
1195         if (r > 0) /* Doesn't apply to unified hierarchy */
1196                 return -EOPNOTSUPP;
1197
1198         r = cg_get_path(controller, NULL, "notify_on_release", &fs);
1199         if (r < 0)
1200                 return r;
1201
1202         r = write_string_file(fs, "0", 0);
1203         if (r < 0)
1204                 return r;
1205
1206         fs = mfree(fs);
1207
1208         r = cg_get_path(controller, NULL, "release_agent", &fs);
1209         if (r < 0)
1210                 return r;
1211
1212         r = write_string_file(fs, "", 0);
1213         if (r < 0)
1214                 return r;
1215
1216         return 0;
1217 }
1218 #endif // 0
1219
1220 int cg_is_empty(const char *controller, const char *path) {
1221         _cleanup_fclose_ FILE *f = NULL;
1222         pid_t pid;
1223         int r;
1224
1225         assert(path);
1226
1227         r = cg_enumerate_processes(controller, path, &f);
1228         if (r == -ENOENT)
1229                 return 1;
1230         if (r < 0)
1231                 return r;
1232
1233         r = cg_read_pid(f, &pid);
1234         if (r < 0)
1235                 return r;
1236
1237         return r == 0;
1238 }
1239
1240 int cg_is_empty_recursive(const char *controller, const char *path) {
1241         int r;
1242
1243         assert(path);
1244
1245         /* The root cgroup is always populated */
1246         if (controller && (isempty(path) || path_equal(path, "/")))
1247                 return false;
1248
1249         r = cg_unified_controller(controller);
1250         if (r < 0)
1251                 return r;
1252         if (r > 0) {
1253                 _cleanup_free_ char *t = NULL;
1254
1255                 /* On the unified hierarchy we can check empty state
1256                  * via the "populated" attribute of "cgroup.events". */
1257
1258                 r = cg_read_event(controller, path, "populated", &t);
1259                 if (r < 0)
1260                         return r;
1261
1262                 return streq(t, "0");
1263         } else {
1264                 _cleanup_closedir_ DIR *d = NULL;
1265                 char *fn;
1266
1267                 r = cg_is_empty(controller, path);
1268                 if (r <= 0)
1269                         return r;
1270
1271                 r = cg_enumerate_subgroups(controller, path, &d);
1272                 if (r == -ENOENT)
1273                         return 1;
1274                 if (r < 0)
1275                         return r;
1276
1277                 while ((r = cg_read_subgroup(d, &fn)) > 0) {
1278                         _cleanup_free_ char *p = NULL;
1279
1280                         p = strjoin(path, "/", fn);
1281                         free(fn);
1282                         if (!p)
1283                                 return -ENOMEM;
1284
1285                         r = cg_is_empty_recursive(controller, p);
1286                         if (r <= 0)
1287                                 return r;
1288                 }
1289                 if (r < 0)
1290                         return r;
1291
1292                 return true;
1293         }
1294 }
1295
1296 int cg_split_spec(const char *spec, char **controller, char **path) {
1297         char *t = NULL, *u = NULL;
1298         const char *e;
1299
1300         assert(spec);
1301
1302         if (*spec == '/') {
1303                 if (!path_is_safe(spec))
1304                         return -EINVAL;
1305
1306                 if (path) {
1307                         t = strdup(spec);
1308                         if (!t)
1309                                 return -ENOMEM;
1310
1311                         *path = path_kill_slashes(t);
1312                 }
1313
1314                 if (controller)
1315                         *controller = NULL;
1316
1317                 return 0;
1318         }
1319
1320         e = strchr(spec, ':');
1321         if (!e) {
1322                 if (!cg_controller_is_valid(spec))
1323                         return -EINVAL;
1324
1325                 if (controller) {
1326                         t = strdup(spec);
1327                         if (!t)
1328                                 return -ENOMEM;
1329
1330                         *controller = t;
1331                 }
1332
1333                 if (path)
1334                         *path = NULL;
1335
1336                 return 0;
1337         }
1338
1339         t = strndup(spec, e-spec);
1340         if (!t)
1341                 return -ENOMEM;
1342         if (!cg_controller_is_valid(t)) {
1343                 free(t);
1344                 return -EINVAL;
1345         }
1346
1347         if (isempty(e+1))
1348                 u = NULL;
1349         else {
1350                 u = strdup(e+1);
1351                 if (!u) {
1352                         free(t);
1353                         return -ENOMEM;
1354                 }
1355
1356                 if (!path_is_safe(u) ||
1357                     !path_is_absolute(u)) {
1358                         free(t);
1359                         free(u);
1360                         return -EINVAL;
1361                 }
1362
1363                 path_kill_slashes(u);
1364         }
1365
1366         if (controller)
1367                 *controller = t;
1368         else
1369                 free(t);
1370
1371         if (path)
1372                 *path = u;
1373         else
1374                 free(u);
1375
1376         return 0;
1377 }
1378
1379 int cg_mangle_path(const char *path, char **result) {
1380         _cleanup_free_ char *c = NULL, *p = NULL;
1381         char *t;
1382         int r;
1383
1384         assert(path);
1385         assert(result);
1386
1387         /* First, check if it already is a filesystem path */
1388         if (path_startswith(path, "/sys/fs/cgroup")) {
1389
1390                 t = strdup(path);
1391                 if (!t)
1392                         return -ENOMEM;
1393
1394                 *result = path_kill_slashes(t);
1395                 return 0;
1396         }
1397
1398         /* Otherwise, treat it as cg spec */
1399         r = cg_split_spec(path, &c, &p);
1400         if (r < 0)
1401                 return r;
1402
1403         return cg_get_path(c ?: SYSTEMD_CGROUP_CONTROLLER, p ?: "/", NULL, result);
1404 }
1405
1406 int cg_get_root_path(char **path) {
1407         char *p, *e;
1408         int r;
1409
1410         assert(path);
1411
1412         r = cg_pid_get_path(SYSTEMD_CGROUP_CONTROLLER, 1, &p);
1413         if (r < 0)
1414                 return r;
1415
1416 #if 0 /// elogind does not support systemd scopes and slices
1417         e = endswith(p, "/" SPECIAL_INIT_SCOPE);
1418         if (!e)
1419                 e = endswith(p, "/" SPECIAL_SYSTEM_SLICE); /* legacy */
1420         if (!e)
1421                 e = endswith(p, "/system"); /* even more legacy */
1422 #else
1423         e = endswith(p, "/elogind");
1424 #endif // 0
1425         if (e)
1426                 *e = 0;
1427
1428         *path = p;
1429         return 0;
1430 }
1431
1432 int cg_shift_path(const char *cgroup, const char *root, const char **shifted) {
1433         _cleanup_free_ char *rt = NULL;
1434         char *p;
1435         int r;
1436
1437         assert(cgroup);
1438         assert(shifted);
1439
1440         if (!root) {
1441                 /* If the root was specified let's use that, otherwise
1442                  * let's determine it from PID 1 */
1443
1444                 r = cg_get_root_path(&rt);
1445                 if (r < 0)
1446                         return r;
1447
1448                 root = rt;
1449                 log_debug_elogind("Determined root path: \"%s\"", root);
1450         }
1451
1452         p = path_startswith(cgroup, root);
1453 #if 0 /// With other controllers, elogind might end up in /elogind, and *p is 0
1454         if (p && p > cgroup)
1455 #else
1456         if (p && p[0] && (p > cgroup))
1457 #endif // 0
1458                 *shifted = p - 1;
1459         else
1460                 *shifted = cgroup;
1461
1462         return 0;
1463 }
1464
1465 int cg_pid_get_path_shifted(pid_t pid, const char *root, char **cgroup) {
1466         _cleanup_free_ char *raw = NULL;
1467         const char *c;
1468         int r;
1469
1470         assert(pid >= 0);
1471         assert(cgroup);
1472
1473         r = cg_pid_get_path(SYSTEMD_CGROUP_CONTROLLER, pid, &raw);
1474         if (r < 0)
1475                 return r;
1476
1477         log_debug_elogind("Shifting path: \"%s\" (PID %u, root: \"%s\")",
1478                           raw, pid, root ? root : "NULL");
1479         r = cg_shift_path(raw, root, &c);
1480         if (r < 0)
1481                 return r;
1482
1483         if (c == raw) {
1484                 *cgroup = raw;
1485                 raw = NULL;
1486         } else {
1487                 char *n;
1488
1489                 n = strdup(c);
1490                 if (!n)
1491                         return -ENOMEM;
1492
1493                 *cgroup = n;
1494         }
1495         log_debug_elogind("Resulting cgroup:\"%s\"", *cgroup);
1496
1497         return 0;
1498 }
1499
1500 #if 0 /// UNNEEDED by elogind
1501 int cg_path_decode_unit(const char *cgroup, char **unit) {
1502         char *c, *s;
1503         size_t n;
1504
1505         assert(cgroup);
1506         assert(unit);
1507
1508         n = strcspn(cgroup, "/");
1509         if (n < 3)
1510                 return -ENXIO;
1511
1512         c = strndupa(cgroup, n);
1513         c = cg_unescape(c);
1514
1515         if (!unit_name_is_valid(c, UNIT_NAME_PLAIN|UNIT_NAME_INSTANCE))
1516                 return -ENXIO;
1517
1518         s = strdup(c);
1519         if (!s)
1520                 return -ENOMEM;
1521
1522         *unit = s;
1523         return 0;
1524 }
1525
1526 static bool valid_slice_name(const char *p, size_t n) {
1527
1528         if (!p)
1529                 return false;
1530
1531         if (n < strlen("x.slice"))
1532                 return false;
1533
1534         if (memcmp(p + n - 6, ".slice", 6) == 0) {
1535                 char buf[n+1], *c;
1536
1537                 memcpy(buf, p, n);
1538                 buf[n] = 0;
1539
1540                 c = cg_unescape(buf);
1541
1542                 return unit_name_is_valid(c, UNIT_NAME_PLAIN);
1543         }
1544
1545         return false;
1546 }
1547
1548 static const char *skip_slices(const char *p) {
1549         assert(p);
1550
1551         /* Skips over all slice assignments */
1552
1553         for (;;) {
1554                 size_t n;
1555
1556                 p += strspn(p, "/");
1557
1558                 n = strcspn(p, "/");
1559                 if (!valid_slice_name(p, n))
1560                         return p;
1561
1562                 p += n;
1563         }
1564 }
1565
1566 int cg_path_get_unit(const char *path, char **ret) {
1567         const char *e;
1568         char *unit;
1569         int r;
1570
1571         assert(path);
1572         assert(ret);
1573
1574         e = skip_slices(path);
1575
1576         r = cg_path_decode_unit(e, &unit);
1577         if (r < 0)
1578                 return r;
1579
1580         /* We skipped over the slices, don't accept any now */
1581         if (endswith(unit, ".slice")) {
1582                 free(unit);
1583                 return -ENXIO;
1584         }
1585
1586         *ret = unit;
1587         return 0;
1588 }
1589
1590 int cg_pid_get_unit(pid_t pid, char **unit) {
1591         _cleanup_free_ char *cgroup = NULL;
1592         int r;
1593
1594         assert(unit);
1595
1596         r = cg_pid_get_path_shifted(pid, NULL, &cgroup);
1597         if (r < 0)
1598                 return r;
1599
1600         return cg_path_get_unit(cgroup, unit);
1601 }
1602
1603 /**
1604  * Skip session-*.scope, but require it to be there.
1605  */
1606 static const char *skip_session(const char *p) {
1607         size_t n;
1608
1609         if (isempty(p))
1610                 return NULL;
1611
1612         p += strspn(p, "/");
1613
1614         n = strcspn(p, "/");
1615         if (n < strlen("session-x.scope"))
1616                 return NULL;
1617
1618         if (memcmp(p, "session-", 8) == 0 && memcmp(p + n - 6, ".scope", 6) == 0) {
1619                 char buf[n - 8 - 6 + 1];
1620
1621                 memcpy(buf, p + 8, n - 8 - 6);
1622                 buf[n - 8 - 6] = 0;
1623
1624                 /* Note that session scopes never need unescaping,
1625                  * since they cannot conflict with the kernel's own
1626                  * names, hence we don't need to call cg_unescape()
1627                  * here. */
1628
1629                 if (!session_id_valid(buf))
1630                         return false;
1631
1632                 p += n;
1633                 p += strspn(p, "/");
1634                 return p;
1635         }
1636
1637         return NULL;
1638 }
1639
1640 /**
1641  * Skip user@*.service, but require it to be there.
1642  */
1643 static const char *skip_user_manager(const char *p) {
1644         size_t n;
1645
1646         if (isempty(p))
1647                 return NULL;
1648
1649         p += strspn(p, "/");
1650
1651         n = strcspn(p, "/");
1652         if (n < strlen("user@x.service"))
1653                 return NULL;
1654
1655         if (memcmp(p, "user@", 5) == 0 && memcmp(p + n - 8, ".service", 8) == 0) {
1656                 char buf[n - 5 - 8 + 1];
1657
1658                 memcpy(buf, p + 5, n - 5 - 8);
1659                 buf[n - 5 - 8] = 0;
1660
1661                 /* Note that user manager services never need unescaping,
1662                  * since they cannot conflict with the kernel's own
1663                  * names, hence we don't need to call cg_unescape()
1664                  * here. */
1665
1666                 if (parse_uid(buf, NULL) < 0)
1667                         return NULL;
1668
1669                 p += n;
1670                 p += strspn(p, "/");
1671
1672                 return p;
1673         }
1674
1675         return NULL;
1676 }
1677
1678 static const char *skip_user_prefix(const char *path) {
1679         const char *e, *t;
1680
1681         assert(path);
1682
1683         /* Skip slices, if there are any */
1684         e = skip_slices(path);
1685
1686         /* Skip the user manager, if it's in the path now... */
1687         t = skip_user_manager(e);
1688         if (t)
1689                 return t;
1690
1691         /* Alternatively skip the user session if it is in the path... */
1692         return skip_session(e);
1693 }
1694
1695 int cg_path_get_user_unit(const char *path, char **ret) {
1696         const char *t;
1697
1698         assert(path);
1699         assert(ret);
1700
1701         t = skip_user_prefix(path);
1702         if (!t)
1703                 return -ENXIO;
1704
1705         /* And from here on it looks pretty much the same as for a
1706          * system unit, hence let's use the same parser from here
1707          * on. */
1708         return cg_path_get_unit(t, ret);
1709 }
1710
1711 int cg_pid_get_user_unit(pid_t pid, char **unit) {
1712         _cleanup_free_ char *cgroup = NULL;
1713         int r;
1714
1715         assert(unit);
1716
1717         r = cg_pid_get_path_shifted(pid, NULL, &cgroup);
1718         if (r < 0)
1719                 return r;
1720
1721         return cg_path_get_user_unit(cgroup, unit);
1722 }
1723
1724 int cg_path_get_machine_name(const char *path, char **machine) {
1725         _cleanup_free_ char *u = NULL;
1726         const char *sl;
1727         int r;
1728
1729         r = cg_path_get_unit(path, &u);
1730         if (r < 0)
1731                 return r;
1732
1733         sl = strjoina("/run/systemd/machines/unit:", u);
1734         return readlink_malloc(sl, machine);
1735 }
1736
1737 int cg_pid_get_machine_name(pid_t pid, char **machine) {
1738         _cleanup_free_ char *cgroup = NULL;
1739         int r;
1740
1741         assert(machine);
1742
1743         r = cg_pid_get_path_shifted(pid, NULL, &cgroup);
1744         if (r < 0)
1745                 return r;
1746
1747         return cg_path_get_machine_name(cgroup, machine);
1748 }
1749 #endif // 0
1750
1751 int cg_path_get_session(const char *path, char **session) {
1752 #if 0 /// UNNEEDED by elogind
1753         _cleanup_free_ char *unit = NULL;
1754         char *start, *end;
1755         int r;
1756
1757         assert(path);
1758
1759         r = cg_path_get_unit(path, &unit);
1760         if (r < 0)
1761                 return r;
1762
1763         start = startswith(unit, "session-");
1764         if (!start)
1765                 return -ENXIO;
1766         end = endswith(start, ".scope");
1767         if (!end)
1768                 return -ENXIO;
1769
1770         *end = 0;
1771         if (!session_id_valid(start))
1772                 return -ENXIO;
1773 #else
1774         /* Elogind uses a flat hierarchy, just "/SESSION".  The only
1775            wrinkle is that SESSION might be escaped.  */
1776         const char *e, *n, *start;
1777
1778         assert(path);
1779         log_debug_elogind("path is \"%s\"", path);
1780         assert(path[0] == '/');
1781
1782         e = path + 1;
1783         n = strchrnul(e, '/');
1784         if (e == n)
1785                 return -ENOENT;
1786
1787         start = strndupa(e, n - e);
1788         start = cg_unescape(start);
1789
1790         if (!start[0])
1791                 return -ENOENT;
1792 #endif // 0
1793
1794         if (session) {
1795                 char *rr;
1796
1797                 log_debug_elogind("found session: \"%s\"", start);
1798                 rr = strdup(start);
1799                 if (!rr)
1800                         return -ENOMEM;
1801
1802                 *session = rr;
1803         }
1804
1805         return 0;
1806 }
1807
1808 int cg_pid_get_session(pid_t pid, char **session) {
1809         _cleanup_free_ char *cgroup = NULL;
1810         int r;
1811
1812         r = cg_pid_get_path_shifted(pid, NULL, &cgroup);
1813         if (r < 0)
1814                 return r;
1815
1816         return cg_path_get_session(cgroup, session);
1817 }
1818
1819 int cg_path_get_owner_uid(const char *path, uid_t *uid) {
1820 #if 0 /// elogind needs one more value
1821         _cleanup_free_ char *slice = NULL;
1822         char *start, *end;
1823 #else
1824         _cleanup_free_ char *slice = NULL, *p = NULL, *s = NULL;
1825 #endif // 0
1826         int r;
1827
1828         assert(path);
1829
1830         r = cg_path_get_slice(path, &slice);
1831         if (r < 0)
1832                 return r;
1833
1834 #if 0 /// elogind does not support systemd slices
1835         start = startswith(slice, "user-");
1836         if (!start)
1837                 return -ENXIO;
1838         end = endswith(start, ".slice");
1839         if (!end)
1840                 return -ENXIO;
1841
1842         *end = 0;
1843         if (parse_uid(start, uid) < 0)
1844                 return -ENXIO;
1845 #else
1846         p = strappend("/run/systemd/sessions/", slice);
1847
1848         r = parse_env_file(p, NEWLINE, "UID", &s, NULL);
1849         if (r == -ENOENT)
1850                 return -ENXIO;
1851         if (r < 0)
1852                 return r;
1853         if (isempty(s))
1854                 return -EIO;
1855
1856         if (parse_uid(s, uid) < 0)
1857                 return -ENXIO;
1858 #endif // 0
1859
1860         return 0;
1861 }
1862
1863 int cg_pid_get_owner_uid(pid_t pid, uid_t *uid) {
1864         _cleanup_free_ char *cgroup = NULL;
1865         int r;
1866
1867         r = cg_pid_get_path_shifted(pid, NULL, &cgroup);
1868         if (r < 0)
1869                 return r;
1870
1871         return cg_path_get_owner_uid(cgroup, uid);
1872 }
1873
1874 int cg_path_get_slice(const char *p, char **slice) {
1875         const char *e = NULL;
1876
1877         assert(p);
1878         assert(slice);
1879
1880 #if 0 /// elogind does not support systemd slices
1881         /* Finds the right-most slice unit from the beginning, but
1882          * stops before we come to the first non-slice unit. */
1883
1884         for (;;) {
1885                 size_t n;
1886
1887                 p += strspn(p, "/");
1888
1889                 n = strcspn(p, "/");
1890                 if (!valid_slice_name(p, n)) {
1891
1892                         if (!e) {
1893                                 char *s;
1894
1895                                 s = strdup(SPECIAL_ROOT_SLICE);
1896                                 if (!s)
1897                                         return -ENOMEM;
1898
1899                                 *slice = s;
1900                                 return 0;
1901                         }
1902
1903                         return cg_path_decode_unit(e, slice);
1904                 }
1905
1906                 e = p;
1907                 p += n;
1908         }
1909 #else
1910         /* In elogind, what is reported here, is the location of
1911          * the session. This is derived from /proc/<self|PID>/cgroup.
1912          * In there we look at the controller, which will look something
1913          * like "1:name=openrc:/3".
1914          * The last part gets extracted (and is now p), which is "/3" in
1915          * this case. The three is the session id, and that can be mapped.
1916          */
1917         e = startswith(p, "/");
1918
1919         if (e)
1920                 *slice = strdup(e);
1921         else
1922                 *slice = strdup(p);
1923
1924         return 0;
1925 #endif // 0
1926 }
1927
1928 int cg_pid_get_slice(pid_t pid, char **slice) {
1929         _cleanup_free_ char *cgroup = NULL;
1930         int r;
1931
1932         assert(slice);
1933
1934         r = cg_pid_get_path_shifted(pid, NULL, &cgroup);
1935         log_debug_elogind("Found cgroup %s for pid %u (result %d)",
1936                           cgroup, pid, r);
1937         if (r < 0)
1938                 return r;
1939
1940         return cg_path_get_slice(cgroup, slice);
1941 }
1942
1943 int cg_path_get_user_slice(const char *p, char **slice) {
1944 #if 0 /// UNNEEDED by elogind
1945         const char *t;
1946 #endif // 0
1947         assert(p);
1948         assert(slice);
1949
1950 #if 0 /// nothing to skip in elogind
1951         t = skip_user_prefix(p);
1952         if (!t)
1953                 return -ENXIO;
1954 #endif // 0
1955
1956 #if 0 /// UNNEEDED by elogind
1957         /* And now it looks pretty much the same as for a system
1958          * slice, so let's just use the same parser from here on. */
1959         return cg_path_get_slice(t, slice);
1960 #else
1961         /* In elogind there is nothing to skip, we can use the path
1962          * directly. Generally speaking this is always a session id
1963          * to user mapping. */
1964         return cg_path_get_slice(p, slice);
1965 #endif // 0
1966 }
1967
1968 int cg_pid_get_user_slice(pid_t pid, char **slice) {
1969         _cleanup_free_ char *cgroup = NULL;
1970         int r;
1971
1972         assert(slice);
1973
1974         r = cg_pid_get_path_shifted(pid, NULL, &cgroup);
1975         if (r < 0)
1976                 return r;
1977
1978         return cg_path_get_user_slice(cgroup, slice);
1979 }
1980
1981 char *cg_escape(const char *p) {
1982         bool need_prefix = false;
1983
1984         /* This implements very minimal escaping for names to be used
1985          * as file names in the cgroup tree: any name which might
1986          * conflict with a kernel name or is prefixed with '_' is
1987          * prefixed with a '_'. That way, when reading cgroup names it
1988          * is sufficient to remove a single prefixing underscore if
1989          * there is one. */
1990
1991         /* The return value of this function (unlike cg_unescape())
1992          * needs free()! */
1993
1994         if (IN_SET(p[0], 0, '_', '.') ||
1995             streq(p, "notify_on_release") ||
1996             streq(p, "release_agent") ||
1997             streq(p, "tasks") ||
1998             startswith(p, "cgroup."))
1999                 need_prefix = true;
2000         else {
2001                 const char *dot;
2002
2003                 dot = strrchr(p, '.');
2004                 if (dot) {
2005                         CGroupController c;
2006                         size_t l = dot - p;
2007
2008                         for (c = 0; c < _CGROUP_CONTROLLER_MAX; c++) {
2009                                 const char *n;
2010
2011                                 n = cgroup_controller_to_string(c);
2012
2013                                 if (l != strlen(n))
2014                                         continue;
2015
2016                                 if (memcmp(p, n, l) != 0)
2017                                         continue;
2018
2019                                 need_prefix = true;
2020                                 break;
2021                         }
2022                 }
2023         }
2024
2025         if (need_prefix)
2026                 return strappend("_", p);
2027
2028         return strdup(p);
2029 }
2030
2031 char *cg_unescape(const char *p) {
2032         assert(p);
2033
2034         /* The return value of this function (unlike cg_escape())
2035          * doesn't need free()! */
2036
2037         if (p[0] == '_')
2038                 return (char*) p+1;
2039
2040         return (char*) p;
2041 }
2042
2043 #define CONTROLLER_VALID                        \
2044         DIGITS LETTERS                          \
2045         "_"
2046
2047 bool cg_controller_is_valid(const char *p) {
2048         const char *t, *s;
2049
2050         if (!p)
2051                 return false;
2052
2053         if (streq(p, SYSTEMD_CGROUP_CONTROLLER))
2054                 return true;
2055
2056         s = startswith(p, "name=");
2057         if (s)
2058                 p = s;
2059
2060         if (IN_SET(*p, 0, '_'))
2061                 return false;
2062
2063         for (t = p; *t; t++)
2064                 if (!strchr(CONTROLLER_VALID, *t))
2065                         return false;
2066
2067         if (t - p > FILENAME_MAX)
2068                 return false;
2069
2070         return true;
2071 }
2072
2073 #if 0 /// UNNEEDED by elogind
2074 int cg_slice_to_path(const char *unit, char **ret) {
2075         _cleanup_free_ char *p = NULL, *s = NULL, *e = NULL;
2076         const char *dash;
2077         int r;
2078
2079         assert(unit);
2080         assert(ret);
2081
2082         if (streq(unit, SPECIAL_ROOT_SLICE)) {
2083                 char *x;
2084
2085                 x = strdup("");
2086                 if (!x)
2087                         return -ENOMEM;
2088                 *ret = x;
2089                 return 0;
2090         }
2091
2092         if (!unit_name_is_valid(unit, UNIT_NAME_PLAIN))
2093                 return -EINVAL;
2094
2095         if (!endswith(unit, ".slice"))
2096                 return -EINVAL;
2097
2098         r = unit_name_to_prefix(unit, &p);
2099         if (r < 0)
2100                 return r;
2101
2102         dash = strchr(p, '-');
2103
2104         /* Don't allow initial dashes */
2105         if (dash == p)
2106                 return -EINVAL;
2107
2108         while (dash) {
2109                 _cleanup_free_ char *escaped = NULL;
2110                 char n[dash - p + sizeof(".slice")];
2111
2112                 /* Don't allow trailing or double dashes */
2113                 if (IN_SET(dash[1], 0, '-'))
2114                         return -EINVAL;
2115
2116                 strcpy(stpncpy(n, p, dash - p), ".slice");
2117                 if (!unit_name_is_valid(n, UNIT_NAME_PLAIN))
2118                         return -EINVAL;
2119
2120                 escaped = cg_escape(n);
2121                 if (!escaped)
2122                         return -ENOMEM;
2123
2124                 if (!strextend(&s, escaped, "/", NULL))
2125                         return -ENOMEM;
2126
2127                 dash = strchr(dash+1, '-');
2128         }
2129
2130         e = cg_escape(unit);
2131         if (!e)
2132                 return -ENOMEM;
2133
2134         if (!strextend(&s, e, NULL))
2135                 return -ENOMEM;
2136
2137         *ret = s;
2138         s = NULL;
2139
2140         return 0;
2141 }
2142 #endif // 0
2143
2144 int cg_set_attribute(const char *controller, const char *path, const char *attribute, const char *value) {
2145         _cleanup_free_ char *p = NULL;
2146         int r;
2147
2148         r = cg_get_path(controller, path, attribute, &p);
2149         if (r < 0)
2150                 return r;
2151
2152         return write_string_file(p, value, 0);
2153 }
2154
2155 int cg_get_attribute(const char *controller, const char *path, const char *attribute, char **ret) {
2156         _cleanup_free_ char *p = NULL;
2157         int r;
2158
2159         r = cg_get_path(controller, path, attribute, &p);
2160         if (r < 0)
2161                 return r;
2162
2163         return read_one_line_file(p, ret);
2164 }
2165
2166 #if 0 /// UNNEEDED by elogind
2167 int cg_get_keyed_attribute(const char *controller, const char *path, const char *attribute, const char **keys, char **values) {
2168         _cleanup_free_ char *filename = NULL, *content = NULL;
2169         char *line, *p;
2170         int i, r;
2171
2172         for (i = 0; keys[i]; i++)
2173                 values[i] = NULL;
2174
2175         r = cg_get_path(controller, path, attribute, &filename);
2176         if (r < 0)
2177                 return r;
2178
2179         r = read_full_file(filename, &content, NULL);
2180         if (r < 0)
2181                 return r;
2182
2183         p = content;
2184         while ((line = strsep(&p, "\n"))) {
2185                 char *key;
2186
2187                 key = strsep(&line, " ");
2188
2189                 for (i = 0; keys[i]; i++) {
2190                         if (streq(key, keys[i])) {
2191                                 values[i] = strdup(line);
2192                                 break;
2193                         }
2194                 }
2195         }
2196
2197         for (i = 0; keys[i]; i++) {
2198                 if (!values[i]) {
2199                         for (i = 0; keys[i]; i++) {
2200                                 values[i] = mfree(values[i]);
2201                         }
2202                         return -ENOENT;
2203                 }
2204         }
2205
2206         return 0;
2207 }
2208
2209 int cg_create_everywhere(CGroupMask supported, CGroupMask mask, const char *path) {
2210         CGroupController c;
2211         int r;
2212
2213         /* This one will create a cgroup in our private tree, but also
2214          * duplicate it in the trees specified in mask, and remove it
2215          * in all others */
2216
2217         /* First create the cgroup in our own hierarchy. */
2218         r = cg_create(SYSTEMD_CGROUP_CONTROLLER, path);
2219         if (r < 0)
2220                 return r;
2221
2222         /* If we are in the unified hierarchy, we are done now */
2223         r = cg_all_unified();
2224         if (r < 0)
2225                 return r;
2226         if (r > 0)
2227                 return 0;
2228
2229         /* Otherwise, do the same in the other hierarchies */
2230         for (c = 0; c < _CGROUP_CONTROLLER_MAX; c++) {
2231                 CGroupMask bit = CGROUP_CONTROLLER_TO_MASK(c);
2232                 const char *n;
2233
2234                 n = cgroup_controller_to_string(c);
2235
2236                 if (mask & bit)
2237                         (void) cg_create(n, path);
2238                 else if (supported & bit)
2239                         (void) cg_trim(n, path, true);
2240         }
2241
2242         return 0;
2243 }
2244
2245 int cg_attach_everywhere(CGroupMask supported, const char *path, pid_t pid, cg_migrate_callback_t path_callback, void *userdata) {
2246         CGroupController c;
2247         int r;
2248
2249         r = cg_attach(SYSTEMD_CGROUP_CONTROLLER, path, pid);
2250         if (r < 0)
2251                 return r;
2252
2253         r = cg_all_unified();
2254         if (r < 0)
2255                 return r;
2256         if (r > 0)
2257                 return 0;
2258
2259         for (c = 0; c < _CGROUP_CONTROLLER_MAX; c++) {
2260                 CGroupMask bit = CGROUP_CONTROLLER_TO_MASK(c);
2261                 const char *p = NULL;
2262
2263                 if (!(supported & bit))
2264                         continue;
2265
2266                 if (path_callback)
2267                         p = path_callback(bit, userdata);
2268
2269                 if (!p)
2270                         p = path;
2271
2272                 (void) cg_attach_fallback(cgroup_controller_to_string(c), p, pid);
2273         }
2274
2275         return 0;
2276 }
2277
2278 int cg_attach_many_everywhere(CGroupMask supported, const char *path, Set* pids, cg_migrate_callback_t path_callback, void *userdata) {
2279         Iterator i;
2280         void *pidp;
2281         int r = 0;
2282
2283         SET_FOREACH(pidp, pids, i) {
2284                 pid_t pid = PTR_TO_PID(pidp);
2285                 int q;
2286
2287                 q = cg_attach_everywhere(supported, path, pid, path_callback, userdata);
2288                 if (q < 0 && r >= 0)
2289                         r = q;
2290         }
2291
2292         return r;
2293 }
2294
2295 int cg_migrate_everywhere(CGroupMask supported, const char *from, const char *to, cg_migrate_callback_t to_callback, void *userdata) {
2296         CGroupController c;
2297         int r = 0, q;
2298
2299         if (!path_equal(from, to))  {
2300                 r = cg_migrate_recursive(SYSTEMD_CGROUP_CONTROLLER, from, SYSTEMD_CGROUP_CONTROLLER, to, CGROUP_REMOVE);
2301                 if (r < 0)
2302                         return r;
2303         }
2304
2305         q = cg_all_unified();
2306         if (q < 0)
2307                 return q;
2308         if (q > 0)
2309                 return r;
2310
2311         for (c = 0; c < _CGROUP_CONTROLLER_MAX; c++) {
2312                 CGroupMask bit = CGROUP_CONTROLLER_TO_MASK(c);
2313                 const char *p = NULL;
2314
2315                 if (!(supported & bit))
2316                         continue;
2317
2318                 if (to_callback)
2319                         p = to_callback(bit, userdata);
2320
2321                 if (!p)
2322                         p = to;
2323
2324                 (void) cg_migrate_recursive_fallback(SYSTEMD_CGROUP_CONTROLLER, to, cgroup_controller_to_string(c), p, 0);
2325         }
2326
2327         return 0;
2328 }
2329
2330 int cg_trim_everywhere(CGroupMask supported, const char *path, bool delete_root) {
2331         CGroupController c;
2332         int r, q;
2333
2334         r = cg_trim(SYSTEMD_CGROUP_CONTROLLER, path, delete_root);
2335         if (r < 0)
2336                 return r;
2337
2338         q = cg_all_unified();
2339         if (q < 0)
2340                 return q;
2341         if (q > 0)
2342                 return r;
2343
2344         for (c = 0; c < _CGROUP_CONTROLLER_MAX; c++) {
2345                 CGroupMask bit = CGROUP_CONTROLLER_TO_MASK(c);
2346
2347                 if (!(supported & bit))
2348                         continue;
2349
2350                 (void) cg_trim(cgroup_controller_to_string(c), path, delete_root);
2351         }
2352
2353         return 0;
2354 }
2355 #endif // 0
2356
2357 int cg_mask_to_string(CGroupMask mask, char **ret) {
2358         const char *controllers[_CGROUP_CONTROLLER_MAX + 1];
2359         CGroupController c;
2360         int i = 0;
2361         char *s;
2362
2363         assert(ret);
2364
2365         if (mask == 0) {
2366                 *ret = NULL;
2367                 return 0;
2368         }
2369
2370         for (c = 0; c < _CGROUP_CONTROLLER_MAX; c++) {
2371
2372                 if (!(mask & CGROUP_CONTROLLER_TO_MASK(c)))
2373                         continue;
2374
2375                 controllers[i++] = cgroup_controller_to_string(c);
2376                 controllers[i] = NULL;
2377         }
2378
2379         s = strv_join((char **)controllers, NULL);
2380         if (!s)
2381                 return -ENOMEM;
2382
2383         *ret = s;
2384         return 0;
2385 }
2386
2387 int cg_mask_from_string(const char *value, CGroupMask *mask) {
2388         assert(mask);
2389         assert(value);
2390
2391         for (;;) {
2392                 _cleanup_free_ char *n = NULL;
2393                 CGroupController v;
2394                 int r;
2395
2396                 r = extract_first_word(&value, &n, NULL, 0);
2397                 if (r < 0)
2398                         return r;
2399                 if (r == 0)
2400                         break;
2401
2402                 v = cgroup_controller_from_string(n);
2403                 if (v < 0)
2404                         continue;
2405
2406                 *mask |= CGROUP_CONTROLLER_TO_MASK(v);
2407         }
2408         return 0;
2409 }
2410
2411 int cg_mask_supported(CGroupMask *ret) {
2412         CGroupMask mask = 0;
2413         int r;
2414
2415         /* Determines the mask of supported cgroup controllers. Only
2416          * includes controllers we can make sense of and that are
2417          * actually accessible. */
2418
2419         r = cg_all_unified();
2420         if (r < 0)
2421                 return r;
2422         if (r > 0) {
2423                 _cleanup_free_ char *root = NULL, *controllers = NULL, *path = NULL;
2424
2425                 /* In the unified hierarchy we can read the supported
2426                  * and accessible controllers from a the top-level
2427                  * cgroup attribute */
2428
2429                 r = cg_get_root_path(&root);
2430                 if (r < 0)
2431                         return r;
2432
2433                 r = cg_get_path(SYSTEMD_CGROUP_CONTROLLER, root, "cgroup.controllers", &path);
2434                 if (r < 0)
2435                         return r;
2436
2437                 r = read_one_line_file(path, &controllers);
2438                 if (r < 0)
2439                         return r;
2440
2441                 r = cg_mask_from_string(controllers, &mask);
2442                 if (r < 0)
2443                         return r;
2444
2445                 /* Currently, we support the cpu, memory, io and pids
2446                  * controller in the unified hierarchy, mask
2447                  * everything else off. */
2448                 mask &= CGROUP_MASK_CPU | CGROUP_MASK_MEMORY | CGROUP_MASK_IO | CGROUP_MASK_PIDS;
2449
2450         } else {
2451                 CGroupController c;
2452
2453                 /* In the legacy hierarchy, we check whether which
2454                  * hierarchies are mounted. */
2455
2456                 for (c = 0; c < _CGROUP_CONTROLLER_MAX; c++) {
2457                         const char *n;
2458
2459                         n = cgroup_controller_to_string(c);
2460                         if (controller_is_accessible(n) >= 0)
2461                                 mask |= CGROUP_CONTROLLER_TO_MASK(c);
2462                 }
2463         }
2464
2465         *ret = mask;
2466         return 0;
2467 }
2468
2469 #if 0 /// UNNEEDED by elogind
2470 int cg_kernel_controllers(Set *controllers) {
2471         _cleanup_fclose_ FILE *f = NULL;
2472         int r;
2473
2474         assert(controllers);
2475
2476         /* Determines the full list of kernel-known controllers. Might
2477          * include controllers we don't actually support, arbitrary
2478          * named hierarchies and controllers that aren't currently
2479          * accessible (because not mounted). */
2480
2481         f = fopen("/proc/cgroups", "re");
2482         if (!f) {
2483                 if (errno == ENOENT)
2484                         return 0;
2485                 return -errno;
2486         }
2487
2488         /* Ignore the header line */
2489         (void) read_line(f, (size_t) -1, NULL);
2490
2491         for (;;) {
2492                 char *controller;
2493                 int enabled = 0;
2494
2495                 errno = 0;
2496                 if (fscanf(f, "%ms %*i %*i %i", &controller, &enabled) != 2) {
2497
2498                         if (feof(f))
2499                                 break;
2500
2501                         if (ferror(f) && errno > 0)
2502                                 return -errno;
2503
2504                         return -EBADMSG;
2505                 }
2506
2507                 if (!enabled) {
2508                         free(controller);
2509                         continue;
2510                 }
2511
2512                 if (!cg_controller_is_valid(controller)) {
2513                         free(controller);
2514                         return -EBADMSG;
2515                 }
2516
2517                 r = set_consume(controllers, controller);
2518                 if (r < 0)
2519                         return r;
2520         }
2521
2522         return 0;
2523 }
2524 #endif // 0
2525
2526 static thread_local CGroupUnified unified_cache = CGROUP_UNIFIED_UNKNOWN;
2527
2528 /* The hybrid mode was initially implemented in v232 and simply mounted cgroup v2 on /sys/fs/cgroup/systemd.  This
2529  * unfortunately broke other tools (such as docker) which expected the v1 "name=systemd" hierarchy on
2530  * /sys/fs/cgroup/systemd.  From v233 and on, the hybrid mode mountnbs v2 on /sys/fs/cgroup/unified and maintains
2531  * "name=systemd" hierarchy on /sys/fs/cgroup/systemd for compatibility with other tools.
2532  *
2533  * To keep live upgrade working, we detect and support v232 layout.  When v232 layout is detected, to keep cgroup v2
2534  * process management but disable the compat dual layout, we return %true on
2535  * cg_unified_controller(SYSTEMD_CGROUP_CONTROLLER) and %false on cg_hybrid_unified().
2536  */
2537 static thread_local bool unified_systemd_v232;
2538
2539 static int cg_unified_update(void) {
2540
2541         struct statfs fs;
2542
2543         /* Checks if we support the unified hierarchy. Returns an
2544          * error when the cgroup hierarchies aren't mounted yet or we
2545          * have any other trouble determining if the unified hierarchy
2546          * is supported. */
2547
2548         if (unified_cache >= CGROUP_UNIFIED_NONE)
2549                 return 0;
2550
2551         if (statfs("/sys/fs/cgroup/", &fs) < 0)
2552                 return -errno;
2553
2554         if (F_TYPE_EQUAL(fs.f_type, CGROUP2_SUPER_MAGIC))
2555                 unified_cache = CGROUP_UNIFIED_ALL;
2556 #if 0 /// The handling of cgroups is a bit different with elogind
2557         else if (F_TYPE_EQUAL(fs.f_type, TMPFS_MAGIC)) {
2558 #else
2559         else if (F_TYPE_EQUAL(fs.f_type, CGROUP_SUPER_MAGIC)
2560               || F_TYPE_EQUAL(fs.f_type, TMPFS_MAGIC)) {
2561 #endif // 0
2562                 if (statfs("/sys/fs/cgroup/unified/", &fs) == 0 &&
2563                     F_TYPE_EQUAL(fs.f_type, CGROUP2_SUPER_MAGIC)) {
2564                         unified_cache = CGROUP_UNIFIED_SYSTEMD;
2565                         unified_systemd_v232 = false;
2566 #if 0 /// elogind uses its own name
2567                 } else if (statfs("/sys/fs/cgroup/systemd/", &fs) == 0 &&
2568 #else
2569                 } else if (statfs("/sys/fs/cgroup/elogind/", &fs) == 0 &&
2570 #endif // 0
2571                            F_TYPE_EQUAL(fs.f_type, CGROUP2_SUPER_MAGIC)) {
2572                         unified_cache = CGROUP_UNIFIED_SYSTEMD;
2573                         unified_systemd_v232 = true;
2574                 } else {
2575 #if 0 /// There is no sub-grouping within elogind
2576                         if (statfs("/sys/fs/cgroup/systemd/", &fs) < 0)
2577                                 return -errno;
2578                         if (!F_TYPE_EQUAL(fs.f_type, CGROUP_SUPER_MAGIC))
2579                                 return -ENOMEDIUM;
2580 #endif // 0
2581                         unified_cache = CGROUP_UNIFIED_NONE;
2582                 }
2583         } else
2584                 return -ENOMEDIUM;
2585
2586         return 0;
2587 }
2588
2589 int cg_unified_controller(const char *controller) {
2590         int r;
2591
2592         r = cg_unified_update();
2593         if (r < 0)
2594                 return r;
2595
2596         if (unified_cache == CGROUP_UNIFIED_NONE)
2597                 return false;
2598
2599         if (unified_cache >= CGROUP_UNIFIED_ALL)
2600                 return true;
2601
2602 #if 0 /// only if elogind is the controller we can use cgroups2 in hybrid mode
2603         return streq_ptr(controller, SYSTEMD_CGROUP_CONTROLLER);
2604 #else
2605         return streq_ptr(controller, SYSTEMD_CGROUP_CONTROLLER_HYBRID);
2606 #endif // 0
2607 }
2608
2609 int cg_all_unified(void) {
2610         int r;
2611
2612         r = cg_unified_update();
2613         if (r < 0)
2614                 return r;
2615
2616         return unified_cache >= CGROUP_UNIFIED_ALL;
2617 }
2618
2619 int cg_hybrid_unified(void) {
2620         int r;
2621
2622         r = cg_unified_update();
2623         if (r < 0)
2624                 return r;
2625
2626         return unified_cache == CGROUP_UNIFIED_SYSTEMD && !unified_systemd_v232;
2627 }
2628
2629 int cg_unified_flush(void) {
2630         unified_cache = CGROUP_UNIFIED_UNKNOWN;
2631
2632         return cg_unified_update();
2633 }
2634
2635 #if 0 /// UNNEEDED by elogind
2636 int cg_enable_everywhere(CGroupMask supported, CGroupMask mask, const char *p) {
2637         _cleanup_free_ char *fs = NULL;
2638         CGroupController c;
2639         int r;
2640
2641         assert(p);
2642
2643         if (supported == 0)
2644                 return 0;
2645
2646         r = cg_all_unified();
2647         if (r < 0)
2648                 return r;
2649         if (r == 0) /* on the legacy hiearchy there's no joining of controllers defined */
2650                 return 0;
2651
2652         r = cg_get_path(SYSTEMD_CGROUP_CONTROLLER, p, "cgroup.subtree_control", &fs);
2653         if (r < 0)
2654                 return r;
2655
2656         for (c = 0; c < _CGROUP_CONTROLLER_MAX; c++) {
2657                 CGroupMask bit = CGROUP_CONTROLLER_TO_MASK(c);
2658                 const char *n;
2659
2660                 if (!(supported & bit))
2661                         continue;
2662
2663                 n = cgroup_controller_to_string(c);
2664                 {
2665                         char s[1 + strlen(n) + 1];
2666
2667                         s[0] = mask & bit ? '+' : '-';
2668                         strcpy(s + 1, n);
2669
2670                         r = write_string_file(fs, s, 0);
2671                         if (r < 0)
2672                                 log_debug_errno(r, "Failed to enable controller %s for %s (%s): %m", n, p, fs);
2673                 }
2674         }
2675
2676         return 0;
2677 }
2678 #endif // 0
2679
2680 bool cg_is_unified_wanted(void) {
2681         static thread_local int wanted = -1;
2682         int r;
2683         bool b;
2684         const bool is_default = DEFAULT_HIERARCHY == CGROUP_UNIFIED_ALL;
2685
2686         /* If we have a cached value, return that. */
2687         if (wanted >= 0)
2688                 return wanted;
2689
2690         /* If the hierarchy is already mounted, then follow whatever
2691          * was chosen for it. */
2692         if (cg_unified_flush() >= 0)
2693                 return (wanted = unified_cache >= CGROUP_UNIFIED_ALL);
2694
2695 #if 0 /// elogind is not init and has no business with kernel command line
2696         /* Otherwise, let's see what the kernel command line has to say.
2697          * Since checking is expensive, cache a non-error result. */
2698         r = proc_cmdline_get_bool("systemd.unified_cgroup_hierarchy", &b);
2699 #endif // 0
2700
2701         return (wanted = r > 0 ? b : is_default);
2702 }
2703
2704 bool cg_is_legacy_wanted(void) {
2705         static thread_local int wanted = -1;
2706
2707         /* If we have a cached value, return that. */
2708         if (wanted >= 0)
2709                 return wanted;
2710
2711         /* Check if we have cgroups2 already mounted. */
2712         if (cg_unified_flush() >= 0 &&
2713             unified_cache == CGROUP_UNIFIED_ALL)
2714                 return (wanted = false);
2715
2716         /* Otherwise, assume that at least partial legacy is wanted,
2717          * since cgroups2 should already be mounted at this point. */
2718         return (wanted = true);
2719 }
2720
2721 bool cg_is_hybrid_wanted(void) {
2722         static thread_local int wanted = -1;
2723         int r;
2724         bool b;
2725         const bool is_default = DEFAULT_HIERARCHY >= CGROUP_UNIFIED_SYSTEMD;
2726         /* We default to true if the default is "hybrid", obviously,
2727          * but also when the default is "unified", because if we get
2728          * called, it means that unified hierarchy was not mounted. */
2729
2730         /* If we have a cached value, return that. */
2731         if (wanted >= 0)
2732                 return wanted;
2733
2734         /* If the hierarchy is already mounted, then follow whatever
2735          * was chosen for it. */
2736         if (cg_unified_flush() >= 0 &&
2737             unified_cache == CGROUP_UNIFIED_ALL)
2738                 return (wanted = false);
2739
2740 #if 0 /// elogind is not init and has no business with kernel command line
2741         /* Otherwise, let's see what the kernel command line has to say.
2742          * Since checking is expensive, cache a non-error result. */
2743         r = proc_cmdline_get_bool("systemd.legacy_systemd_cgroup_controller", &b);
2744 #endif // 0
2745
2746         /* The meaning of the kernel option is reversed wrt. to the return value
2747          * of this function, hence the negation. */
2748         return (wanted = r > 0 ? !b : is_default);
2749 }
2750
2751 #if 0 /// UNNEEDED by elogind
2752 int cg_weight_parse(const char *s, uint64_t *ret) {
2753         uint64_t u;
2754         int r;
2755
2756         if (isempty(s)) {
2757                 *ret = CGROUP_WEIGHT_INVALID;
2758                 return 0;
2759         }
2760
2761         r = safe_atou64(s, &u);
2762         if (r < 0)
2763                 return r;
2764
2765         if (u < CGROUP_WEIGHT_MIN || u > CGROUP_WEIGHT_MAX)
2766                 return -ERANGE;
2767
2768         *ret = u;
2769         return 0;
2770 }
2771
2772 const uint64_t cgroup_io_limit_defaults[_CGROUP_IO_LIMIT_TYPE_MAX] = {
2773         [CGROUP_IO_RBPS_MAX]    = CGROUP_LIMIT_MAX,
2774         [CGROUP_IO_WBPS_MAX]    = CGROUP_LIMIT_MAX,
2775         [CGROUP_IO_RIOPS_MAX]   = CGROUP_LIMIT_MAX,
2776         [CGROUP_IO_WIOPS_MAX]   = CGROUP_LIMIT_MAX,
2777 };
2778
2779 static const char* const cgroup_io_limit_type_table[_CGROUP_IO_LIMIT_TYPE_MAX] = {
2780         [CGROUP_IO_RBPS_MAX]    = "IOReadBandwidthMax",
2781         [CGROUP_IO_WBPS_MAX]    = "IOWriteBandwidthMax",
2782         [CGROUP_IO_RIOPS_MAX]   = "IOReadIOPSMax",
2783         [CGROUP_IO_WIOPS_MAX]   = "IOWriteIOPSMax",
2784 };
2785
2786 DEFINE_STRING_TABLE_LOOKUP(cgroup_io_limit_type, CGroupIOLimitType);
2787
2788 int cg_cpu_shares_parse(const char *s, uint64_t *ret) {
2789         uint64_t u;
2790         int r;
2791
2792         if (isempty(s)) {
2793                 *ret = CGROUP_CPU_SHARES_INVALID;
2794                 return 0;
2795         }
2796
2797         r = safe_atou64(s, &u);
2798         if (r < 0)
2799                 return r;
2800
2801         if (u < CGROUP_CPU_SHARES_MIN || u > CGROUP_CPU_SHARES_MAX)
2802                 return -ERANGE;
2803
2804         *ret = u;
2805         return 0;
2806 }
2807
2808 int cg_blkio_weight_parse(const char *s, uint64_t *ret) {
2809         uint64_t u;
2810         int r;
2811
2812         if (isempty(s)) {
2813                 *ret = CGROUP_BLKIO_WEIGHT_INVALID;
2814                 return 0;
2815         }
2816
2817         r = safe_atou64(s, &u);
2818         if (r < 0)
2819                 return r;
2820
2821         if (u < CGROUP_BLKIO_WEIGHT_MIN || u > CGROUP_BLKIO_WEIGHT_MAX)
2822                 return -ERANGE;
2823
2824         *ret = u;
2825         return 0;
2826 }
2827 #endif // 0
2828
2829 bool is_cgroup_fs(const struct statfs *s) {
2830         return is_fs_type(s, CGROUP_SUPER_MAGIC) ||
2831                is_fs_type(s, CGROUP2_SUPER_MAGIC);
2832 }
2833
2834 bool fd_is_cgroup_fs(int fd) {
2835         struct statfs s;
2836
2837         if (fstatfs(fd, &s) < 0)
2838                 return -errno;
2839
2840         return is_cgroup_fs(&s);
2841 }
2842
2843 static const char *cgroup_controller_table[_CGROUP_CONTROLLER_MAX] = {
2844         [CGROUP_CONTROLLER_CPU] = "cpu",
2845         [CGROUP_CONTROLLER_CPUACCT] = "cpuacct",
2846         [CGROUP_CONTROLLER_IO] = "io",
2847         [CGROUP_CONTROLLER_BLKIO] = "blkio",
2848         [CGROUP_CONTROLLER_MEMORY] = "memory",
2849         [CGROUP_CONTROLLER_DEVICES] = "devices",
2850         [CGROUP_CONTROLLER_PIDS] = "pids",
2851 };
2852
2853 DEFINE_STRING_TABLE_LOOKUP(cgroup_controller, CGroupController);