src/sysusers/sysusers.c

   1 /***
   2   This file is part of systemd.
   3
   4   Copyright 2014 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 <getopt.h>
  21 #include <grp.h>
  22 #include <gshadow.h>
  23 #include <pwd.h>
  24 #include <shadow.h>
  25 #include <utmp.h>
  26
  27 #include "alloc-util.h"
  28 #include "conf-files.h"
  29 #include "copy.h"
  30 #include "def.h"
  31 #include "fd-util.h"
  32 #include "fileio-label.h"
  33 #include "formats-util.h"
  34 #include "hashmap.h"
  35 #include "path-util.h"
  36 #include "selinux-util.h"
  37 #include "smack-util.h"
  38 #include "specifier.h"
  39 #include "string-util.h"
  40 #include "strv.h"
  41 #include "uid-range.h"
  42 #include "user-util.h"
  43 #include "utf8.h"
  44 #include "util.h"
  45
  46 typedef enum ItemType {
  47         ADD_USER = 'u',
  48         ADD_GROUP = 'g',
  49         ADD_MEMBER = 'm',
  50         ADD_RANGE = 'r',
  51 } ItemType;
  52 typedef struct Item {
  53         ItemType type;
  54
  55         char *name;
  56         char *uid_path;
  57         char *gid_path;
  58         char *description;
  59         char *home;
  60
  61         gid_t gid;
  62         uid_t uid;
  63
  64         bool gid_set:1;
  65         bool uid_set:1;
  66
  67         bool todo_user:1;
  68         bool todo_group:1;
  69 } Item;
  70
  71 static char *arg_root = NULL;
  72
  73 static const char conf_file_dirs[] = CONF_PATHS_NULSTR("sysusers.d");
  74
  75 static Hashmap *users = NULL, *groups = NULL;
  76 static Hashmap *todo_uids = NULL, *todo_gids = NULL;
  77 static Hashmap *members = NULL;
  78
  79 static Hashmap *database_uid = NULL, *database_user = NULL;
  80 static Hashmap *database_gid = NULL, *database_group = NULL;
  81
  82 static uid_t search_uid = UID_INVALID;
  83 static UidRange *uid_range = NULL;
  84 static unsigned n_uid_range = 0;
  85
  86 static int load_user_database(void) {
  87         _cleanup_fclose_ FILE *f = NULL;
  88         const char *passwd_path;
  89         struct passwd *pw;
  90         int r;
  91
  92         passwd_path = prefix_roota(arg_root, "/etc/passwd");
  93         f = fopen(passwd_path, "re");
  94         if (!f)
  95                 return errno == ENOENT ? 0 : -errno;
  96
  97         r = hashmap_ensure_allocated(&database_user, &string_hash_ops);
  98         if (r < 0)
  99                 return r;
 100
 101         r = hashmap_ensure_allocated(&database_uid, NULL);
 102         if (r < 0)
 103                 return r;
 104
 105         errno = 0;
 106         while ((pw = fgetpwent(f))) {
 107                 char *n;
 108                 int k, q;
 109
 110                 n = strdup(pw->pw_name);
 111                 if (!n)
 112                         return -ENOMEM;
 113
 114                 k = hashmap_put(database_user, n, UID_TO_PTR(pw->pw_uid));
 115                 if (k < 0 && k != -EEXIST) {
 116                         free(n);
 117                         return k;
 118                 }
 119
 120                 q = hashmap_put(database_uid, UID_TO_PTR(pw->pw_uid), n);
 121                 if (q < 0 && q != -EEXIST) {
 122                         if (k < 0)
 123                                 free(n);
 124                         return q;
 125                 }
 126
 127                 if (q < 0 && k < 0)
 128                         free(n);
 129
 130                 errno = 0;
 131         }
 132         if (!IN_SET(errno, 0, ENOENT))
 133                 return -errno;
 134
 135         return 0;
 136 }
 137
 138 static int load_group_database(void) {
 139         _cleanup_fclose_ FILE *f = NULL;
 140         const char *group_path;
 141         struct group *gr;
 142         int r;
 143
 144         group_path = prefix_roota(arg_root, "/etc/group");
 145         f = fopen(group_path, "re");
 146         if (!f)
 147                 return errno == ENOENT ? 0 : -errno;
 148
 149         r = hashmap_ensure_allocated(&database_group, &string_hash_ops);
 150         if (r < 0)
 151                 return r;
 152
 153         r = hashmap_ensure_allocated(&database_gid, NULL);
 154         if (r < 0)
 155                 return r;
 156
 157         errno = 0;
 158         while ((gr = fgetgrent(f))) {
 159                 char *n;
 160                 int k, q;
 161
 162                 n = strdup(gr->gr_name);
 163                 if (!n)
 164                         return -ENOMEM;
 165
 166                 k = hashmap_put(database_group, n, GID_TO_PTR(gr->gr_gid));
 167                 if (k < 0 && k != -EEXIST) {
 168                         free(n);
 169                         return k;
 170                 }
 171
 172                 q = hashmap_put(database_gid, GID_TO_PTR(gr->gr_gid), n);
 173                 if (q < 0 && q != -EEXIST) {
 174                         if (k < 0)
 175                                 free(n);
 176                         return q;
 177                 }
 178
 179                 if (q < 0 && k < 0)
 180                         free(n);
 181
 182                 errno = 0;
 183         }
 184         if (!IN_SET(errno, 0, ENOENT))
 185                 return -errno;
 186
 187         return 0;
 188 }
 189
 190 static int make_backup(const char *target, const char *x) {
 191         _cleanup_close_ int src = -1;
 192         _cleanup_fclose_ FILE *dst = NULL;
 193         char *backup, *temp;
 194         struct timespec ts[2];
 195         struct stat st;
 196         int r;
 197
 198         src = open(x, O_RDONLY|O_CLOEXEC|O_NOCTTY);
 199         if (src < 0) {
 200                 if (errno == ENOENT) /* No backup necessary... */
 201                         return 0;
 202
 203                 return -errno;
 204         }
 205
 206         if (fstat(src, &st) < 0)
 207                 return -errno;
 208
 209         r = fopen_temporary_label(target, x, &dst, &temp);
 210         if (r < 0)
 211                 return r;
 212
 213         r = copy_bytes(src, fileno(dst), (uint64_t) -1, true);
 214         if (r < 0)
 215                 goto fail;
 216
 217         /* Don't fail on chmod() or chown(). If it stays owned by us
 218          * and/or unreadable by others, then it isn't too bad... */
 219
 220         backup = strjoina(x, "-");
 221
 222         /* Copy over the access mask */
 223         if (fchmod(fileno(dst), st.st_mode & 07777) < 0)
 224                 log_warning_errno(errno, "Failed to change mode on %s: %m", backup);
 225
 226         if (fchown(fileno(dst), st.st_uid, st.st_gid)< 0)
 227                 log_warning_errno(errno, "Failed to change ownership of %s: %m", backup);
 228
 229         ts[0] = st.st_atim;
 230         ts[1] = st.st_mtim;
 231         if (futimens(fileno(dst), ts) < 0)
 232                 log_warning_errno(errno, "Failed to fix access and modification time of %s: %m", backup);
 233
 234         if (rename(temp, backup) < 0)
 235                 goto fail;
 236
 237         return 0;
 238
 239 fail:
 240         unlink(temp);
 241         return r;
 242 }
 243
 244 static int putgrent_with_members(const struct group *gr, FILE *group) {
 245         char **a;
 246
 247         assert(gr);
 248         assert(group);
 249
 250         a = hashmap_get(members, gr->gr_name);
 251         if (a) {
 252                 _cleanup_strv_free_ char **l = NULL;
 253                 bool added = false;
 254                 char **i;
 255
 256                 l = strv_copy(gr->gr_mem);
 257                 if (!l)
 258                         return -ENOMEM;
 259
 260                 STRV_FOREACH(i, a) {
 261                         if (strv_find(l, *i))
 262                                 continue;
 263
 264                         if (strv_extend(&l, *i) < 0)
 265                                 return -ENOMEM;
 266
 267                         added = true;
 268                 }
 269
 270                 if (added) {
 271                         struct group t;
 272
 273                         strv_uniq(l);
 274                         strv_sort(l);
 275
 276                         t = *gr;
 277                         t.gr_mem = l;
 278
 279                         errno = 0;
 280                         if (putgrent(&t, group) != 0)
 281                                 return errno > 0 ? -errno : -EIO;
 282
 283                         return 1;
 284                 }
 285         }
 286
 287         errno = 0;
 288         if (putgrent(gr, group) != 0)
 289                 return errno > 0 ? -errno : -EIO;
 290
 291         return 0;
 292 }
 293
 294 static int putsgent_with_members(const struct sgrp *sg, FILE *gshadow) {
 295         char **a;
 296
 297         assert(sg);
 298         assert(gshadow);
 299
 300         a = hashmap_get(members, sg->sg_namp);
 301         if (a) {
 302                 _cleanup_strv_free_ char **l = NULL;
 303                 bool added = false;
 304                 char **i;
 305
 306                 l = strv_copy(sg->sg_mem);
 307                 if (!l)
 308                         return -ENOMEM;
 309
 310                 STRV_FOREACH(i, a) {
 311                         if (strv_find(l, *i))
 312                                 continue;
 313
 314                         if (strv_extend(&l, *i) < 0)
 315                                 return -ENOMEM;
 316
 317                         added = true;
 318                 }
 319
 320                 if (added) {
 321                         struct sgrp t;
 322
 323                         strv_uniq(l);
 324                         strv_sort(l);
 325
 326                         t = *sg;
 327                         t.sg_mem = l;
 328
 329                         errno = 0;
 330                         if (putsgent(&t, gshadow) != 0)
 331                                 return errno > 0 ? -errno : -EIO;
 332
 333                         return 1;
 334                 }
 335         }
 336
 337         errno = 0;
 338         if (putsgent(sg, gshadow) != 0)
 339                 return errno > 0 ? -errno : -EIO;
 340
 341         return 0;
 342 }
 343
 344 static int sync_rights(FILE *from, FILE *to) {
 345         struct stat st;
 346
 347         if (fstat(fileno(from), &st) < 0)
 348                 return -errno;
 349
 350         if (fchmod(fileno(to), st.st_mode & 07777) < 0)
 351                 return -errno;
 352
 353         if (fchown(fileno(to), st.st_uid, st.st_gid) < 0)
 354                 return -errno;
 355
 356         return 0;
 357 }
 358
 359 static int rename_and_apply_smack(const char *temp_path, const char *dest_path) {
 360         int r = 0;
 361         if (rename(temp_path, dest_path) < 0)
 362                 return -errno;
 363
 364 #ifdef SMACK_RUN_LABEL
 365         r = mac_smack_apply(dest_path, SMACK_ATTR_ACCESS, SMACK_FLOOR_LABEL);
 366         if (r < 0)
 367                 return r;
 368 #endif
 369         return r;
 370 }
 371
 372 static int write_files(void) {
 373
 374         _cleanup_fclose_ FILE *passwd = NULL, *group = NULL, *shadow = NULL, *gshadow = NULL;
 375         _cleanup_free_ char *passwd_tmp = NULL, *group_tmp = NULL, *shadow_tmp = NULL, *gshadow_tmp = NULL;
 376         const char *passwd_path = NULL, *group_path = NULL, *shadow_path = NULL, *gshadow_path = NULL;
 377         bool group_changed = false;
 378         Iterator iterator;
 379         Item *i;
 380         int r;
 381
 382         if (hashmap_size(todo_gids) > 0 || hashmap_size(members) > 0) {
 383                 _cleanup_fclose_ FILE *original = NULL;
 384
 385                 /* First we update the actual group list file */
 386                 group_path = prefix_roota(arg_root, "/etc/group");
 387                 r = fopen_temporary_label("/etc/group", group_path, &group, &group_tmp);
 388                 if (r < 0)
 389                         goto finish;
 390
 391                 original = fopen(group_path, "re");
 392                 if (original) {
 393                         struct group *gr;
 394
 395                         r = sync_rights(original, group);
 396                         if (r < 0)
 397                                 goto finish;
 398
 399                         errno = 0;
 400                         while ((gr = fgetgrent(original))) {
 401                                 /* Safety checks against name and GID
 402                                  * collisions. Normally, this should
 403                                  * be unnecessary, but given that we
 404                                  * look at the entries anyway here,
 405                                  * let's make an extra verification
 406                                  * step that we don't generate
 407                                  * duplicate entries. */
 408
 409                                 i = hashmap_get(groups, gr->gr_name);
 410                                 if (i && i->todo_group) {
 411                                         log_error("%s: Group \"%s\" already exists.", group_path, gr->gr_name);
 412                                         r = -EEXIST;
 413                                         goto finish;
 414                                 }
 415
 416                                 if (hashmap_contains(todo_gids, GID_TO_PTR(gr->gr_gid))) {
 417                                         log_error("%s: Detected collision for GID " GID_FMT ".", group_path, gr->gr_gid);
 418                                         r = -EEXIST;
 419                                         goto finish;
 420                                 }
 421
 422                                 r = putgrent_with_members(gr, group);
 423                                 if (r < 0)
 424                                         goto finish;
 425                                 if (r > 0)
 426                                         group_changed = true;
 427
 428                                 errno = 0;
 429                         }
 430                         if (!IN_SET(errno, 0, ENOENT)) {
 431                                 r = -errno;
 432                                 goto finish;
 433                         }
 434
 435                 } else if (errno != ENOENT) {
 436                         r = -errno;
 437                         goto finish;
 438                 } else if (fchmod(fileno(group), 0644) < 0) {
 439                         r = -errno;
 440                         goto finish;
 441                 }
 442
 443                 HASHMAP_FOREACH(i, todo_gids, iterator) {
 444                         struct group n = {
 445                                 .gr_name = i->name,
 446                                 .gr_gid = i->gid,
 447                                 .gr_passwd = (char*) "x",
 448                         };
 449
 450                         r = putgrent_with_members(&n, group);
 451                         if (r < 0)
 452                                 goto finish;
 453
 454                         group_changed = true;
 455                 }
 456
 457                 r = fflush_and_check(group);
 458                 if (r < 0)
 459                         goto finish;
 460
 461                 if (original) {
 462                         fclose(original);
 463                         original = NULL;
 464                 }
 465
 466                 /* OK, now also update the shadow file for the group list */
 467                 gshadow_path = prefix_roota(arg_root, "/etc/gshadow");
 468                 r = fopen_temporary_label("/etc/gshadow", gshadow_path, &gshadow, &gshadow_tmp);
 469                 if (r < 0)
 470                         goto finish;
 471
 472                 original = fopen(gshadow_path, "re");
 473                 if (original) {
 474                         struct sgrp *sg;
 475
 476                         r = sync_rights(original, gshadow);
 477                         if (r < 0)
 478                                 goto finish;
 479
 480                         errno = 0;
 481                         while ((sg = fgetsgent(original))) {
 482
 483                                 i = hashmap_get(groups, sg->sg_namp);
 484                                 if (i && i->todo_group) {
 485                                         log_error("%s: Group \"%s\" already exists.", gshadow_path, sg->sg_namp);
 486                                         r = -EEXIST;
 487                                         goto finish;
 488                                 }
 489
 490                                 r = putsgent_with_members(sg, gshadow);
 491                                 if (r < 0)
 492                                         goto finish;
 493                                 if (r > 0)
 494                                         group_changed = true;
 495
 496                                 errno = 0;
 497                         }
 498                         if (!IN_SET(errno, 0, ENOENT)) {
 499                                 r = -errno;
 500                                 goto finish;
 501                         }
 502
 503                 } else if (errno != ENOENT) {
 504                         r = -errno;
 505                         goto finish;
 506                 } else if (fchmod(fileno(gshadow), 0000) < 0) {
 507                         r = -errno;
 508                         goto finish;
 509                 }
 510
 511                 HASHMAP_FOREACH(i, todo_gids, iterator) {
 512                         struct sgrp n = {
 513                                 .sg_namp = i->name,
 514                                 .sg_passwd = (char*) "!!",
 515                         };
 516
 517                         r = putsgent_with_members(&n, gshadow);
 518                         if (r < 0)
 519                                 goto finish;
 520
 521                         group_changed = true;
 522                 }
 523
 524                 r = fflush_and_check(gshadow);
 525                 if (r < 0)
 526                         goto finish;
 527         }
 528
 529         if (hashmap_size(todo_uids) > 0) {
 530                 _cleanup_fclose_ FILE *original = NULL;
 531                 long lstchg;
 532
 533                 /* First we update the user database itself */
 534                 passwd_path = prefix_roota(arg_root, "/etc/passwd");
 535                 r = fopen_temporary_label("/etc/passwd", passwd_path, &passwd, &passwd_tmp);
 536                 if (r < 0)
 537                         goto finish;
 538
 539                 original = fopen(passwd_path, "re");
 540                 if (original) {
 541                         struct passwd *pw;
 542
 543                         r = sync_rights(original, passwd);
 544                         if (r < 0)
 545                                 goto finish;
 546
 547                         errno = 0;
 548                         while ((pw = fgetpwent(original))) {
 549
 550                                 i = hashmap_get(users, pw->pw_name);
 551                                 if (i && i->todo_user) {
 552                                         log_error("%s: User \"%s\" already exists.", passwd_path, pw->pw_name);
 553                                         r = -EEXIST;
 554                                         goto finish;
 555                                 }
 556
 557                                 if (hashmap_contains(todo_uids, UID_TO_PTR(pw->pw_uid))) {
 558                                         log_error("%s: Detected collision for UID " UID_FMT ".", passwd_path, pw->pw_uid);
 559                                         r = -EEXIST;
 560                                         goto finish;
 561                                 }
 562
 563                                 errno = 0;
 564                                 if (putpwent(pw, passwd) < 0) {
 565                                         r = errno ? -errno : -EIO;
 566                                         goto finish;
 567                                 }
 568
 569                                 errno = 0;
 570                         }
 571                         if (!IN_SET(errno, 0, ENOENT)) {
 572                                 r = -errno;
 573                                 goto finish;
 574                         }
 575
 576                 } else if (errno != ENOENT) {
 577                         r = -errno;
 578                         goto finish;
 579                 } else if (fchmod(fileno(passwd), 0644) < 0) {
 580                         r = -errno;
 581                         goto finish;
 582                 }
 583
 584                 HASHMAP_FOREACH(i, todo_uids, iterator) {
 585                         struct passwd n = {
 586                                 .pw_name = i->name,
 587                                 .pw_uid = i->uid,
 588                                 .pw_gid = i->gid,
 589                                 .pw_gecos = i->description,
 590
 591                                 /* "x" means the password is stored in
 592                                  * the shadow file */
 593                                 .pw_passwd = (char*) "x",
 594
 595                                 /* We default to the root directory as home */
 596                                 .pw_dir = i->home ? i->home : (char*) "/",
 597
 598                                 /* Initialize the shell to nologin,
 599                                  * with one exception: for root we
 600                                  * patch in something special */
 601                                 .pw_shell = i->uid == 0 ? (char*) "/bin/sh" : (char*) "/sbin/nologin",
 602                         };
 603
 604                         errno = 0;
 605                         if (putpwent(&n, passwd) != 0) {
 606                                 r = errno ? -errno : -EIO;
 607                                 goto finish;
 608                         }
 609                 }
 610
 611                 r = fflush_and_check(passwd);
 612                 if (r < 0)
 613                         goto finish;
 614
 615                 if (original) {
 616                         fclose(original);
 617                         original = NULL;
 618                 }
 619
 620                 /* The we update the shadow database */
 621                 shadow_path = prefix_roota(arg_root, "/etc/shadow");
 622                 r = fopen_temporary_label("/etc/shadow", shadow_path, &shadow, &shadow_tmp);
 623                 if (r < 0)
 624                         goto finish;
 625
 626                 lstchg = (long) (now(CLOCK_REALTIME) / USEC_PER_DAY);
 627
 628                 original = fopen(shadow_path, "re");
 629                 if (original) {
 630                         struct spwd *sp;
 631
 632                         r = sync_rights(original, shadow);
 633                         if (r < 0)
 634                                 goto finish;
 635
 636                         errno = 0;
 637                         while ((sp = fgetspent(original))) {
 638
 639                                 i = hashmap_get(users, sp->sp_namp);
 640                                 if (i && i->todo_user) {
 641                                         /* we will update the existing entry */
 642                                         sp->sp_lstchg = lstchg;
 643
 644                                         /* only the /etc/shadow stage is left, so we can
 645                                          * safely remove the item from the todo set */
 646                                         i->todo_user = false;
 647                                         hashmap_remove(todo_uids, UID_TO_PTR(i->uid));
 648                                 }
 649
 650                                 errno = 0;
 651                                 if (putspent(sp, shadow) < 0) {
 652                                         r = errno ? -errno : -EIO;
 653                                         goto finish;
 654                                 }
 655
 656                                 errno = 0;
 657                         }
 658                         if (!IN_SET(errno, 0, ENOENT)) {
 659                                 r = -errno;
 660                                 goto finish;
 661                         }
 662                 } else if (errno != ENOENT) {
 663                         r = -errno;
 664                         goto finish;
 665                 } else if (fchmod(fileno(shadow), 0000) < 0) {
 666                         r = -errno;
 667                         goto finish;
 668                 }
 669
 670                 HASHMAP_FOREACH(i, todo_uids, iterator) {
 671                         struct spwd n = {
 672                                 .sp_namp = i->name,
 673                                 .sp_pwdp = (char*) "!!",
 674                                 .sp_lstchg = lstchg,
 675                                 .sp_min = -1,
 676                                 .sp_max = -1,
 677                                 .sp_warn = -1,
 678                                 .sp_inact = -1,
 679                                 .sp_expire = -1,
 680                                 .sp_flag = (unsigned long) -1, /* this appears to be what everybody does ... */
 681                         };
 682
 683                         errno = 0;
 684                         if (putspent(&n, shadow) != 0) {
 685                                 r = errno ? -errno : -EIO;
 686                                 goto finish;
 687                         }
 688                 }
 689
 690                 r = fflush_and_check(shadow);
 691                 if (r < 0)
 692                         goto finish;
 693         }
 694
 695         /* Make a backup of the old files */
 696         if (group_changed) {
 697                 if (group) {
 698                         r = make_backup("/etc/group", group_path);
 699                         if (r < 0)
 700                                 goto finish;
 701                 }
 702                 if (gshadow) {
 703                         r = make_backup("/etc/gshadow", gshadow_path);
 704                         if (r < 0)
 705                                 goto finish;
 706                 }
 707         }
 708
 709         if (passwd) {
 710                 r = make_backup("/etc/passwd", passwd_path);
 711                 if (r < 0)
 712                         goto finish;
 713         }
 714         if (shadow) {
 715                 r = make_backup("/etc/shadow", shadow_path);
 716                 if (r < 0)
 717                         goto finish;
 718         }
 719
 720         /* And make the new files count */
 721         if (group_changed) {
 722                 if (group) {
 723                         r = rename_and_apply_smack(group_tmp, group_path);
 724                         if (r < 0)
 725                                 goto finish;
 726
 727                         group_tmp = mfree(group_tmp);
 728                 }
 729                 if (gshadow) {
 730                         r = rename_and_apply_smack(gshadow_tmp, gshadow_path);
 731                         if (r < 0)
 732                                 goto finish;
 733
 734                         gshadow_tmp = mfree(gshadow_tmp);
 735                 }
 736         }
 737
 738         if (passwd) {
 739                 r = rename_and_apply_smack(passwd_tmp, passwd_path);
 740                 if (r < 0)
 741                         goto finish;
 742
 743                 passwd_tmp = mfree(passwd_tmp);
 744         }
 745         if (shadow) {
 746                 r = rename_and_apply_smack(shadow_tmp, shadow_path);
 747                 if (r < 0)
 748                         goto finish;
 749
 750                 shadow_tmp = mfree(shadow_tmp);
 751         }
 752
 753         r = 0;
 754
 755 finish:
 756         if (passwd_tmp)
 757                 unlink(passwd_tmp);
 758         if (shadow_tmp)
 759                 unlink(shadow_tmp);
 760         if (group_tmp)
 761                 unlink(group_tmp);
 762         if (gshadow_tmp)
 763                 unlink(gshadow_tmp);
 764
 765         return r;
 766 }
 767
 768 static int uid_is_ok(uid_t uid, const char *name) {
 769         struct passwd *p;
 770         struct group *g;
 771         const char *n;
 772         Item *i;
 773
 774         /* Let's see if we already have assigned the UID a second time */
 775         if (hashmap_get(todo_uids, UID_TO_PTR(uid)))
 776                 return 0;
 777
 778         /* Try to avoid using uids that are already used by a group
 779          * that doesn't have the same name as our new user. */
 780         i = hashmap_get(todo_gids, GID_TO_PTR(uid));
 781         if (i && !streq(i->name, name))
 782                 return 0;
 783
 784         /* Let's check the files directly */
 785         if (hashmap_contains(database_uid, UID_TO_PTR(uid)))
 786                 return 0;
 787
 788         n = hashmap_get(database_gid, GID_TO_PTR(uid));
 789         if (n && !streq(n, name))
 790                 return 0;
 791
 792         /* Let's also check via NSS, to avoid UID clashes over LDAP and such, just in case */
 793         if (!arg_root) {
 794                 errno = 0;
 795                 p = getpwuid(uid);
 796                 if (p)
 797                         return 0;
 798                 if (!IN_SET(errno, 0, ENOENT))
 799                         return -errno;
 800
 801                 errno = 0;
 802                 g = getgrgid((gid_t) uid);
 803                 if (g) {
 804                         if (!streq(g->gr_name, name))
 805                                 return 0;
 806                 } else if (!IN_SET(errno, 0, ENOENT))
 807                         return -errno;
 808         }
 809
 810         return 1;
 811 }
 812
 813 static int root_stat(const char *p, struct stat *st) {
 814         const char *fix;
 815
 816         fix = prefix_roota(arg_root, p);
 817         if (stat(fix, st) < 0)
 818                 return -errno;
 819
 820         return 0;
 821 }
 822
 823 static int read_id_from_file(Item *i, uid_t *_uid, gid_t *_gid) {
 824         struct stat st;
 825         bool found_uid = false, found_gid = false;
 826         uid_t uid = 0;
 827         gid_t gid = 0;
 828
 829         assert(i);
 830
 831         /* First, try to get the gid directly */
 832         if (_gid && i->gid_path && root_stat(i->gid_path, &st) >= 0) {
 833                 gid = st.st_gid;
 834                 found_gid = true;
 835         }
 836
 837         /* Then, try to get the uid directly */
 838         if ((_uid || (_gid && !found_gid))
 839             && i->uid_path
 840             && root_stat(i->uid_path, &st) >= 0) {
 841
 842                 uid = st.st_uid;
 843                 found_uid = true;
 844
 845                 /* If we need the gid, but had no success yet, also derive it from the uid path */
 846                 if (_gid && !found_gid) {
 847                         gid = st.st_gid;
 848                         found_gid = true;
 849                 }
 850         }
 851
 852         /* If that didn't work yet, then let's reuse the gid as uid */
 853         if (_uid && !found_uid && i->gid_path) {
 854
 855                 if (found_gid) {
 856                         uid = (uid_t) gid;
 857                         found_uid = true;
 858                 } else if (root_stat(i->gid_path, &st) >= 0) {
 859                         uid = (uid_t) st.st_gid;
 860                         found_uid = true;
 861                 }
 862         }
 863
 864         if (_uid) {
 865                 if (!found_uid)
 866                         return 0;
 867
 868                 *_uid = uid;
 869         }
 870
 871         if (_gid) {
 872                 if (!found_gid)
 873                         return 0;
 874
 875                 *_gid = gid;
 876         }
 877
 878         return 1;
 879 }
 880
 881 static int add_user(Item *i) {
 882         void *z;
 883         int r;
 884
 885         assert(i);
 886
 887         /* Check the database directly */
 888         z = hashmap_get(database_user, i->name);
 889         if (z) {
 890                 log_debug("User %s already exists.", i->name);
 891                 i->uid = PTR_TO_UID(z);
 892                 i->uid_set = true;
 893                 return 0;
 894         }
 895
 896         if (!arg_root) {
 897                 struct passwd *p;
 898
 899                 /* Also check NSS */
 900                 errno = 0;
 901                 p = getpwnam(i->name);
 902                 if (p) {
 903                         log_debug("User %s already exists.", i->name);
 904                         i->uid = p->pw_uid;
 905                         i->uid_set = true;
 906
 907                         r = free_and_strdup(&i->description, p->pw_gecos);
 908                         if (r < 0)
 909                                 return log_oom();
 910
 911                         return 0;
 912                 }
 913                 if (!IN_SET(errno, 0, ENOENT))
 914                         return log_error_errno(errno, "Failed to check if user %s already exists: %m", i->name);
 915         }
 916
 917         /* Try to use the suggested numeric uid */
 918         if (i->uid_set) {
 919                 r = uid_is_ok(i->uid, i->name);
 920                 if (r < 0)
 921                         return log_error_errno(r, "Failed to verify uid " UID_FMT ": %m", i->uid);
 922                 if (r == 0) {
 923                         log_debug("Suggested user ID " UID_FMT " for %s already used.", i->uid, i->name);
 924                         i->uid_set = false;
 925                 }
 926         }
 927
 928         /* If that didn't work, try to read it from the specified path */
 929         if (!i->uid_set) {
 930                 uid_t c;
 931
 932                 if (read_id_from_file(i, &c, NULL) > 0) {
 933
 934                         if (c <= 0 || !uid_range_contains(uid_range, n_uid_range, c))
 935                                 log_debug("User ID " UID_FMT " of file not suitable for %s.", c, i->name);
 936                         else {
 937                                 r = uid_is_ok(c, i->name);
 938                                 if (r < 0)
 939                                         return log_error_errno(r, "Failed to verify uid " UID_FMT ": %m", i->uid);
 940                                 else if (r > 0) {
 941                                         i->uid = c;
 942                                         i->uid_set = true;
 943                                 } else
 944                                         log_debug("User ID " UID_FMT " of file for %s is already used.", c, i->name);
 945                         }
 946                 }
 947         }
 948
 949         /* Otherwise, try to reuse the group ID */
 950         if (!i->uid_set && i->gid_set) {
 951                 r = uid_is_ok((uid_t) i->gid, i->name);
 952                 if (r < 0)
 953                         return log_error_errno(r, "Failed to verify uid " UID_FMT ": %m", i->uid);
 954                 if (r > 0) {
 955                         i->uid = (uid_t) i->gid;
 956                         i->uid_set = true;
 957                 }
 958         }
 959
 960         /* And if that didn't work either, let's try to find a free one */
 961         if (!i->uid_set) {
 962                 for (;;) {
 963                         r = uid_range_next_lower(uid_range, n_uid_range, &search_uid);
 964                         if (r < 0) {
 965                                 log_error("No free user ID available for %s.", i->name);
 966                                 return r;
 967                         }
 968
 969                         r = uid_is_ok(search_uid, i->name);
 970                         if (r < 0)
 971                                 return log_error_errno(r, "Failed to verify uid " UID_FMT ": %m", i->uid);
 972                         else if (r > 0)
 973                                 break;
 974                 }
 975
 976                 i->uid_set = true;
 977                 i->uid = search_uid;
 978         }
 979
 980         r = hashmap_ensure_allocated(&todo_uids, NULL);
 981         if (r < 0)
 982                 return log_oom();
 983
 984         r = hashmap_put(todo_uids, UID_TO_PTR(i->uid), i);
 985         if (r < 0)
 986                 return log_oom();
 987
 988         i->todo_user = true;
 989         log_info("Creating user %s (%s) with uid " UID_FMT " and gid " GID_FMT ".", i->name, strna(i->description), i->uid, i->gid);
 990
 991         return 0;
 992 }
 993
 994 static int gid_is_ok(gid_t gid) {
 995         struct group *g;
 996         struct passwd *p;
 997
 998         if (hashmap_get(todo_gids, GID_TO_PTR(gid)))
 999                 return 0;
1000
1001         /* Avoid reusing gids that are already used by a different user */
1002         if (hashmap_get(todo_uids, UID_TO_PTR(gid)))
1003                 return 0;
1004
1005         if (hashmap_contains(database_gid, GID_TO_PTR(gid)))
1006                 return 0;
1007
1008         if (hashmap_contains(database_uid, UID_TO_PTR(gid)))
1009                 return 0;
1010
1011         if (!arg_root) {
1012                 errno = 0;
1013                 g = getgrgid(gid);
1014                 if (g)
1015                         return 0;
1016                 if (!IN_SET(errno, 0, ENOENT))
1017                         return -errno;
1018
1019                 errno = 0;
1020                 p = getpwuid((uid_t) gid);
1021                 if (p)
1022                         return 0;
1023                 if (!IN_SET(errno, 0, ENOENT))
1024                         return -errno;
1025         }
1026
1027         return 1;
1028 }
1029
1030 static int add_group(Item *i) {
1031         void *z;
1032         int r;
1033
1034         assert(i);
1035
1036         /* Check the database directly */
1037         z = hashmap_get(database_group, i->name);
1038         if (z) {
1039                 log_debug("Group %s already exists.", i->name);
1040                 i->gid = PTR_TO_GID(z);
1041                 i->gid_set = true;
1042                 return 0;
1043         }
1044
1045         /* Also check NSS */
1046         if (!arg_root) {
1047                 struct group *g;
1048
1049                 errno = 0;
1050                 g = getgrnam(i->name);
1051                 if (g) {
1052                         log_debug("Group %s already exists.", i->name);
1053                         i->gid = g->gr_gid;
1054                         i->gid_set = true;
1055                         return 0;
1056                 }
1057                 if (!IN_SET(errno, 0, ENOENT))
1058                         return log_error_errno(errno, "Failed to check if group %s already exists: %m", i->name);
1059         }
1060
1061         /* Try to use the suggested numeric gid */
1062         if (i->gid_set) {
1063                 r = gid_is_ok(i->gid);
1064                 if (r < 0)
1065                         return log_error_errno(r, "Failed to verify gid " GID_FMT ": %m", i->gid);
1066                 if (r == 0) {
1067                         log_debug("Suggested group ID " GID_FMT " for %s already used.", i->gid, i->name);
1068                         i->gid_set = false;
1069                 }
1070         }
1071
1072         /* Try to reuse the numeric uid, if there's one */
1073         if (!i->gid_set && i->uid_set) {
1074                 r = gid_is_ok((gid_t) i->uid);
1075                 if (r < 0)
1076                         return log_error_errno(r, "Failed to verify gid " GID_FMT ": %m", i->gid);
1077                 if (r > 0) {
1078                         i->gid = (gid_t) i->uid;
1079                         i->gid_set = true;
1080                 }
1081         }
1082
1083         /* If that didn't work, try to read it from the specified path */
1084         if (!i->gid_set) {
1085                 gid_t c;
1086
1087                 if (read_id_from_file(i, NULL, &c) > 0) {
1088
1089                         if (c <= 0 || !uid_range_contains(uid_range, n_uid_range, c))
1090                                 log_debug("Group ID " GID_FMT " of file not suitable for %s.", c, i->name);
1091                         else {
1092                                 r = gid_is_ok(c);
1093                                 if (r < 0)
1094                                         return log_error_errno(r, "Failed to verify gid " GID_FMT ": %m", i->gid);
1095                                 else if (r > 0) {
1096                                         i->gid = c;
1097                                         i->gid_set = true;
1098                                 } else
1099                                         log_debug("Group ID " GID_FMT " of file for %s already used.", c, i->name);
1100                         }
1101                 }
1102         }
1103
1104         /* And if that didn't work either, let's try to find a free one */
1105         if (!i->gid_set) {
1106                 for (;;) {
1107                         /* We look for new GIDs in the UID pool! */
1108                         r = uid_range_next_lower(uid_range, n_uid_range, &search_uid);
1109                         if (r < 0) {
1110                                 log_error("No free group ID available for %s.", i->name);
1111                                 return r;
1112                         }
1113
1114                         r = gid_is_ok(search_uid);
1115                         if (r < 0)
1116                                 return log_error_errno(r, "Failed to verify gid " GID_FMT ": %m", i->gid);
1117                         else if (r > 0)
1118                                 break;
1119                 }
1120
1121                 i->gid_set = true;
1122                 i->gid = search_uid;
1123         }
1124
1125         r = hashmap_ensure_allocated(&todo_gids, NULL);
1126         if (r < 0)
1127                 return log_oom();
1128
1129         r = hashmap_put(todo_gids, GID_TO_PTR(i->gid), i);
1130         if (r < 0)
1131                 return log_oom();
1132
1133         i->todo_group = true;
1134         log_info("Creating group %s with gid " GID_FMT ".", i->name, i->gid);
1135
1136         return 0;
1137 }
1138
1139 static int process_item(Item *i) {
1140         int r;
1141
1142         assert(i);
1143
1144         switch (i->type) {
1145
1146         case ADD_USER:
1147                 r = add_group(i);
1148                 if (r < 0)
1149                         return r;
1150
1151                 return add_user(i);
1152
1153         case ADD_GROUP: {
1154                 Item *j;
1155
1156                 j = hashmap_get(users, i->name);
1157                 if (j) {
1158                         /* There's already user to be created for this
1159                          * name, let's process that in one step */
1160
1161                         if (i->gid_set) {
1162                                 j->gid = i->gid;
1163                                 j->gid_set = true;
1164                         }
1165
1166                         if (i->gid_path) {
1167                                 r = free_and_strdup(&j->gid_path, i->gid_path);
1168                                 if (r < 0)
1169                                         return log_oom();
1170                         }
1171
1172                         return 0;
1173                 }
1174
1175                 return add_group(i);
1176         }
1177
1178         default:
1179                 assert_not_reached("Unknown item type");
1180         }
1181 }
1182
1183 static void item_free(Item *i) {
1184
1185         if (!i)
1186                 return;
1187
1188         free(i->name);
1189         free(i->uid_path);
1190         free(i->gid_path);
1191         free(i->description);
1192         free(i);
1193 }
1194
1195 DEFINE_TRIVIAL_CLEANUP_FUNC(Item*, item_free);
1196
1197 static int add_implicit(void) {
1198         char *g, **l;
1199         Iterator iterator;
1200         int r;
1201
1202         /* Implicitly create additional users and groups, if they were listed in "m" lines */
1203
1204         HASHMAP_FOREACH_KEY(l, g, members, iterator) {
1205                 Item *i;
1206                 char **m;
1207
1208                 i = hashmap_get(groups, g);
1209                 if (!i) {
1210                         _cleanup_(item_freep) Item *j = NULL;
1211
1212                         r = hashmap_ensure_allocated(&groups, &string_hash_ops);
1213                         if (r < 0)
1214                                 return log_oom();
1215
1216                         j = new0(Item, 1);
1217                         if (!j)
1218                                 return log_oom();
1219
1220                         j->type = ADD_GROUP;
1221                         j->name = strdup(g);
1222                         if (!j->name)
1223                                 return log_oom();
1224
1225                         r = hashmap_put(groups, j->name, j);
1226                         if (r < 0)
1227                                 return log_oom();
1228
1229                         log_debug("Adding implicit group '%s' due to m line", j->name);
1230                         j = NULL;
1231                 }
1232
1233                 STRV_FOREACH(m, l) {
1234
1235                         i = hashmap_get(users, *m);
1236                         if (!i) {
1237                                 _cleanup_(item_freep) Item *j = NULL;
1238
1239                                 r = hashmap_ensure_allocated(&users, &string_hash_ops);
1240                                 if (r < 0)
1241                                         return log_oom();
1242
1243                                 j = new0(Item, 1);
1244                                 if (!j)
1245                                         return log_oom();
1246
1247                                 j->type = ADD_USER;
1248                                 j->name = strdup(*m);
1249                                 if (!j->name)
1250                                         return log_oom();
1251
1252                                 r = hashmap_put(users, j->name, j);
1253                                 if (r < 0)
1254                                         return log_oom();
1255
1256                                 log_debug("Adding implicit user '%s' due to m line", j->name);
1257                                 j = NULL;
1258                         }
1259                 }
1260         }
1261
1262         return 0;
1263 }
1264
1265 static bool item_equal(Item *a, Item *b) {
1266         assert(a);
1267         assert(b);
1268
1269         if (a->type != b->type)
1270                 return false;
1271
1272         if (!streq_ptr(a->name, b->name))
1273                 return false;
1274
1275         if (!streq_ptr(a->uid_path, b->uid_path))
1276                 return false;
1277
1278         if (!streq_ptr(a->gid_path, b->gid_path))
1279                 return false;
1280
1281         if (!streq_ptr(a->description, b->description))
1282                 return false;
1283
1284         if (a->uid_set != b->uid_set)
1285                 return false;
1286
1287         if (a->uid_set && a->uid != b->uid)
1288                 return false;
1289
1290         if (a->gid_set != b->gid_set)
1291                 return false;
1292
1293         if (a->gid_set && a->gid != b->gid)
1294                 return false;
1295
1296         if (!streq_ptr(a->home, b->home))
1297                 return false;
1298
1299         return true;
1300 }
1301
1302 static bool valid_user_group_name(const char *u) {
1303         const char *i;
1304         long sz;
1305
1306         if (isempty(u))
1307                 return false;
1308
1309         if (!(u[0] >= 'a' && u[0] <= 'z') &&
1310             !(u[0] >= 'A' && u[0] <= 'Z') &&
1311             u[0] != '_')
1312                 return false;
1313
1314         for (i = u+1; *i; i++) {
1315                 if (!(*i >= 'a' && *i <= 'z') &&
1316                     !(*i >= 'A' && *i <= 'Z') &&
1317                     !(*i >= '0' && *i <= '9') &&
1318                     *i != '_' &&
1319                     *i != '-')
1320                         return false;
1321         }
1322
1323         sz = sysconf(_SC_LOGIN_NAME_MAX);
1324         assert_se(sz > 0);
1325
1326         if ((size_t) (i-u) > (size_t) sz)
1327                 return false;
1328
1329         if ((size_t) (i-u) > UT_NAMESIZE - 1)
1330                 return false;
1331
1332         return true;
1333 }
1334
1335 static bool valid_gecos(const char *d) {
1336
1337         if (!d)
1338                 return false;
1339
1340         if (!utf8_is_valid(d))
1341                 return false;
1342
1343         if (string_has_cc(d, NULL))
1344                 return false;
1345
1346         /* Colons are used as field separators, and hence not OK */
1347         if (strchr(d, ':'))
1348                 return false;
1349
1350         return true;
1351 }
1352
1353 static bool valid_home(const char *p) {
1354
1355         if (isempty(p))
1356                 return false;
1357
1358         if (!utf8_is_valid(p))
1359                 return false;
1360
1361         if (string_has_cc(p, NULL))
1362                 return false;
1363
1364         if (!path_is_absolute(p))
1365                 return false;
1366
1367         if (!path_is_safe(p))
1368                 return false;
1369
1370         /* Colons are used as field separators, and hence not OK */
1371         if (strchr(p, ':'))
1372                 return false;
1373
1374         return true;
1375 }
1376
1377 static int parse_line(const char *fname, unsigned line, const char *buffer) {
1378
1379         static const Specifier specifier_table[] = {
1380                 { 'm', specifier_machine_id, NULL },
1381                 { 'b', specifier_boot_id, NULL },
1382                 { 'H', specifier_host_name, NULL },
1383                 { 'v', specifier_kernel_release, NULL },
1384                 {}
1385         };
1386
1387         _cleanup_free_ char *action = NULL, *name = NULL, *id = NULL, *resolved_name = NULL, *resolved_id = NULL, *description = NULL, *home = NULL;
1388         _cleanup_(item_freep) Item *i = NULL;
1389         Item *existing;
1390         Hashmap *h;
1391         int r;
1392         const char *p;
1393
1394         assert(fname);
1395         assert(line >= 1);
1396         assert(buffer);
1397
1398         /* Parse columns */
1399         p = buffer;
1400         r = extract_many_words(&p, NULL, EXTRACT_QUOTES, &action, &name, &id, &description, &home, NULL);
1401         if (r < 0) {
1402                 log_error("[%s:%u] Syntax error.", fname, line);
1403                 return r;
1404         }
1405         if (r < 2) {
1406                 log_error("[%s:%u] Missing action and name columns.", fname, line);
1407                 return -EINVAL;
1408         }
1409         if (!isempty(p)) {
1410                 log_error("[%s:%u] Trailing garbage.", fname, line);
1411                 return -EINVAL;
1412         }
1413
1414         /* Verify action */
1415         if (strlen(action) != 1) {
1416                 log_error("[%s:%u] Unknown modifier '%s'", fname, line, action);
1417                 return -EINVAL;
1418         }
1419
1420         if (!IN_SET(action[0], ADD_USER, ADD_GROUP, ADD_MEMBER, ADD_RANGE)) {
1421                 log_error("[%s:%u] Unknown command command type '%c'.", fname, line, action[0]);
1422                 return -EBADMSG;
1423         }
1424
1425         /* Verify name */
1426         if (isempty(name) || streq(name, "-"))
1427                 name = mfree(name);
1428
1429         if (name) {
1430                 r = specifier_printf(name, specifier_table, NULL, &resolved_name);
1431                 if (r < 0) {
1432                         log_error("[%s:%u] Failed to replace specifiers: %s", fname, line, name);
1433                         return r;
1434                 }
1435
1436                 if (!valid_user_group_name(resolved_name)) {
1437                         log_error("[%s:%u] '%s' is not a valid user or group name.", fname, line, resolved_name);
1438                         return -EINVAL;
1439                 }
1440         }
1441
1442         /* Verify id */
1443         if (isempty(id) || streq(id, "-"))
1444                 id = mfree(id);
1445
1446         if (id) {
1447                 r = specifier_printf(id, specifier_table, NULL, &resolved_id);
1448                 if (r < 0) {
1449                         log_error("[%s:%u] Failed to replace specifiers: %s", fname, line, name);
1450                         return r;
1451                 }
1452         }
1453
1454         /* Verify description */
1455         if (isempty(description) || streq(description, "-"))
1456                 description = mfree(description);
1457
1458         if (description) {
1459                 if (!valid_gecos(description)) {
1460                         log_error("[%s:%u] '%s' is not a valid GECOS field.", fname, line, description);
1461                         return -EINVAL;
1462                 }
1463         }
1464
1465         /* Verify home */
1466         if (isempty(home) || streq(home, "-"))
1467                 home = mfree(home);
1468
1469         if (home) {
1470                 if (!valid_home(home)) {
1471                         log_error("[%s:%u] '%s' is not a valid home directory field.", fname, line, home);
1472                         return -EINVAL;
1473                 }
1474         }
1475
1476         switch (action[0]) {
1477
1478         case ADD_RANGE:
1479                 if (resolved_name) {
1480                         log_error("[%s:%u] Lines of type 'r' don't take a name field.", fname, line);
1481                         return -EINVAL;
1482                 }
1483
1484                 if (!resolved_id) {
1485                         log_error("[%s:%u] Lines of type 'r' require a ID range in the third field.", fname, line);
1486                         return -EINVAL;
1487                 }
1488
1489                 if (description) {
1490                         log_error("[%s:%u] Lines of type 'r' don't take a GECOS field.", fname, line);
1491                         return -EINVAL;
1492                 }
1493
1494                 if (home) {
1495                         log_error("[%s:%u] Lines of type 'r' don't take a home directory field.", fname, line);
1496                         return -EINVAL;
1497                 }
1498
1499                 r = uid_range_add_str(&uid_range, &n_uid_range, resolved_id);
1500                 if (r < 0) {
1501                         log_error("[%s:%u] Invalid UID range %s.", fname, line, resolved_id);
1502                         return -EINVAL;
1503                 }
1504
1505                 return 0;
1506
1507         case ADD_MEMBER: {
1508                 char **l;
1509
1510                 /* Try to extend an existing member or group item */
1511                 if (!name) {
1512                         log_error("[%s:%u] Lines of type 'm' require a user name in the second field.", fname, line);
1513                         return -EINVAL;
1514                 }
1515
1516                 if (!resolved_id) {
1517                         log_error("[%s:%u] Lines of type 'm' require a group name in the third field.", fname, line);
1518                         return -EINVAL;
1519                 }
1520
1521                 if (!valid_user_group_name(resolved_id)) {
1522                         log_error("[%s:%u] '%s' is not a valid user or group name.", fname, line, resolved_id);
1523                         return -EINVAL;
1524                 }
1525
1526                 if (description) {
1527                         log_error("[%s:%u] Lines of type 'm' don't take a GECOS field.", fname, line);
1528                         return -EINVAL;
1529                 }
1530
1531                 if (home) {
1532                         log_error("[%s:%u] Lines of type 'm' don't take a home directory field.", fname, line);
1533                         return -EINVAL;
1534                 }
1535
1536                 r = hashmap_ensure_allocated(&members, &string_hash_ops);
1537                 if (r < 0)
1538                         return log_oom();
1539
1540                 l = hashmap_get(members, resolved_id);
1541                 if (l) {
1542                         /* A list for this group name already exists, let's append to it */
1543                         r = strv_push(&l, resolved_name);
1544                         if (r < 0)
1545                                 return log_oom();
1546
1547                         resolved_name = NULL;
1548
1549                         assert_se(hashmap_update(members, resolved_id, l) >= 0);
1550                 } else {
1551                         /* No list for this group name exists yet, create one */
1552
1553                         l = new0(char *, 2);
1554                         if (!l)
1555                                 return -ENOMEM;
1556
1557                         l[0] = resolved_name;
1558                         l[1] = NULL;
1559
1560                         r = hashmap_put(members, resolved_id, l);
1561                         if (r < 0) {
1562                                 free(l);
1563                                 return log_oom();
1564                         }
1565
1566                         resolved_id = resolved_name = NULL;
1567                 }
1568
1569                 return 0;
1570         }
1571
1572         case ADD_USER:
1573                 if (!name) {
1574                         log_error("[%s:%u] Lines of type 'u' require a user name in the second field.", fname, line);
1575                         return -EINVAL;
1576                 }
1577
1578                 r = hashmap_ensure_allocated(&users, &string_hash_ops);
1579                 if (r < 0)
1580                         return log_oom();
1581
1582                 i = new0(Item, 1);
1583                 if (!i)
1584                         return log_oom();
1585
1586                 if (resolved_id) {
1587                         if (path_is_absolute(resolved_id)) {
1588                                 i->uid_path = resolved_id;
1589                                 resolved_id = NULL;
1590
1591                                 path_kill_slashes(i->uid_path);
1592                         } else {
1593                                 r = parse_uid(resolved_id, &i->uid);
1594                                 if (r < 0) {
1595                                         log_error("Failed to parse UID: %s", id);
1596                                         return -EBADMSG;
1597                                 }
1598
1599                                 i->uid_set = true;
1600                         }
1601                 }
1602
1603                 i->description = description;
1604                 description = NULL;
1605
1606                 i->home = home;
1607                 home = NULL;
1608
1609                 h = users;
1610                 break;
1611
1612         case ADD_GROUP:
1613                 if (!name) {
1614                         log_error("[%s:%u] Lines of type 'g' require a user name in the second field.", fname, line);
1615                         return -EINVAL;
1616                 }
1617
1618                 if (description) {
1619                         log_error("[%s:%u] Lines of type 'g' don't take a GECOS field.", fname, line);
1620                         return -EINVAL;
1621                 }
1622
1623                 if (home) {
1624                         log_error("[%s:%u] Lines of type 'g' don't take a home directory field.", fname, line);
1625                         return -EINVAL;
1626                 }
1627
1628                 r = hashmap_ensure_allocated(&groups, &string_hash_ops);
1629                 if (r < 0)
1630                         return log_oom();
1631
1632                 i = new0(Item, 1);
1633                 if (!i)
1634                         return log_oom();
1635
1636                 if (resolved_id) {
1637                         if (path_is_absolute(resolved_id)) {
1638                                 i->gid_path = resolved_id;
1639                                 resolved_id = NULL;
1640
1641                                 path_kill_slashes(i->gid_path);
1642                         } else {
1643                                 r = parse_gid(resolved_id, &i->gid);
1644                                 if (r < 0) {
1645                                         log_error("Failed to parse GID: %s", id);
1646                                         return -EBADMSG;
1647                                 }
1648
1649                                 i->gid_set = true;
1650                         }
1651                 }
1652
1653                 h = groups;
1654                 break;
1655
1656         default:
1657                 return -EBADMSG;
1658         }
1659
1660         i->type = action[0];
1661         i->name = resolved_name;
1662         resolved_name = NULL;
1663
1664         existing = hashmap_get(h, i->name);
1665         if (existing) {
1666
1667                 /* Two identical items are fine */
1668                 if (!item_equal(existing, i))
1669                         log_warning("Two or more conflicting lines for %s configured, ignoring.", i->name);
1670
1671                 return 0;
1672         }
1673
1674         r = hashmap_put(h, i->name, i);
1675         if (r < 0)
1676                 return log_oom();
1677
1678         i = NULL;
1679         return 0;
1680 }
1681
1682 static int read_config_file(const char *fn, bool ignore_enoent) {
1683         _cleanup_fclose_ FILE *rf = NULL;
1684         FILE *f = NULL;
1685         char line[LINE_MAX];
1686         unsigned v = 0;
1687         int r = 0;
1688
1689         assert(fn);
1690
1691         if (streq(fn, "-"))
1692                 f = stdin;
1693         else {
1694                 r = search_and_fopen_nulstr(fn, "re", arg_root, conf_file_dirs, &rf);
1695                 if (r < 0) {
1696                         if (ignore_enoent && r == -ENOENT)
1697                                 return 0;
1698
1699                         return log_error_errno(r, "Failed to open '%s', ignoring: %m", fn);
1700                 }
1701
1702                 f = rf;
1703         }
1704
1705         FOREACH_LINE(line, f, break) {
1706                 char *l;
1707                 int k;
1708
1709                 v++;
1710
1711                 l = strstrip(line);
1712                 if (*l == '#' || *l == 0)
1713                         continue;
1714
1715                 k = parse_line(fn, v, l);
1716                 if (k < 0 && r == 0)
1717                         r = k;
1718         }
1719
1720         if (ferror(f)) {
1721                 log_error_errno(errno, "Failed to read from file %s: %m", fn);
1722                 if (r == 0)
1723                         r = -EIO;
1724         }
1725
1726         return r;
1727 }
1728
1729 static void free_database(Hashmap *by_name, Hashmap *by_id) {
1730         char *name;
1731
1732         for (;;) {
1733                 name = hashmap_first(by_id);
1734                 if (!name)
1735                         break;
1736
1737                 hashmap_remove(by_name, name);
1738
1739                 hashmap_steal_first_key(by_id);
1740                 free(name);
1741         }
1742
1743         while ((name = hashmap_steal_first_key(by_name)))
1744                 free(name);
1745
1746         hashmap_free(by_name);
1747         hashmap_free(by_id);
1748 }
1749
1750 static void help(void) {
1751         printf("%s [OPTIONS...] [CONFIGURATION FILE...]\n\n"
1752                "Creates system user accounts.\n\n"
1753                "  -h --help                 Show this help\n"
1754                "     --version              Show package version\n"
1755                "     --root=PATH            Operate on an alternate filesystem root\n"
1756                , program_invocation_short_name);
1757 }
1758
1759 static int parse_argv(int argc, char *argv[]) {
1760
1761         enum {
1762                 ARG_VERSION = 0x100,
1763                 ARG_ROOT,
1764         };
1765
1766         static const struct option options[] = {
1767                 { "help",    no_argument,       NULL, 'h'         },
1768                 { "version", no_argument,       NULL, ARG_VERSION },
1769                 { "root",    required_argument, NULL, ARG_ROOT    },
1770                 {}
1771         };
1772
1773         int c, r;
1774
1775         assert(argc >= 0);
1776         assert(argv);
1777
1778         while ((c = getopt_long(argc, argv, "h", options, NULL)) >= 0)
1779
1780                 switch (c) {
1781
1782                 case 'h':
1783                         help();
1784                         return 0;
1785
1786                 case ARG_VERSION:
1787                         return version();
1788
1789                 case ARG_ROOT:
1790                         r = parse_path_argument_and_warn(optarg, true, &arg_root);
1791                         if (r < 0)
1792                                 return r;
1793                         break;
1794
1795                 case '?':
1796                         return -EINVAL;
1797
1798                 default:
1799                         assert_not_reached("Unhandled option");
1800                 }
1801
1802         return 1;
1803 }
1804
1805 int main(int argc, char *argv[]) {
1806
1807         _cleanup_close_ int lock = -1;
1808         Iterator iterator;
1809         int r, k;
1810         Item *i;
1811         char *n;
1812
1813         r = parse_argv(argc, argv);
1814         if (r <= 0)
1815                 goto finish;
1816
1817         log_set_target(LOG_TARGET_AUTO);
1818         log_parse_environment();
1819         log_open();
1820
1821         umask(0022);
1822
1823         r = mac_selinux_init();
1824         if (r < 0) {
1825                 log_error_errno(r, "SELinux setup failed: %m");
1826                 goto finish;
1827         }
1828
1829         if (optind < argc) {
1830                 int j;
1831
1832                 for (j = optind; j < argc; j++) {
1833                         k = read_config_file(argv[j], false);
1834                         if (k < 0 && r == 0)
1835                                 r = k;
1836                 }
1837         } else {
1838                 _cleanup_strv_free_ char **files = NULL;
1839                 char **f;
1840
1841                 r = conf_files_list_nulstr(&files, ".conf", arg_root, conf_file_dirs);
1842                 if (r < 0) {
1843                         log_error_errno(r, "Failed to enumerate sysusers.d files: %m");
1844                         goto finish;
1845                 }
1846
1847                 STRV_FOREACH(f, files) {
1848                         k = read_config_file(*f, true);
1849                         if (k < 0 && r == 0)
1850                                 r = k;
1851                 }
1852         }
1853
1854         if (!uid_range) {
1855                 /* Default to default range of 1..SYSTEMD_UID_MAX */
1856                 r = uid_range_add(&uid_range, &n_uid_range, 1, SYSTEM_UID_MAX);
1857                 if (r < 0) {
1858                         log_oom();
1859                         goto finish;
1860                 }
1861         }
1862
1863         r = add_implicit();
1864         if (r < 0)
1865                 goto finish;
1866
1867         lock = take_etc_passwd_lock(arg_root);
1868         if (lock < 0) {
1869                 log_error_errno(lock, "Failed to take lock: %m");
1870                 goto finish;
1871         }
1872
1873         r = load_user_database();
1874         if (r < 0) {
1875                 log_error_errno(r, "Failed to load user database: %m");
1876                 goto finish;
1877         }
1878
1879         r = load_group_database();
1880         if (r < 0) {
1881                 log_error_errno(r, "Failed to read group database: %m");
1882                 goto finish;
1883         }
1884
1885         HASHMAP_FOREACH(i, groups, iterator)
1886                 process_item(i);
1887
1888         HASHMAP_FOREACH(i, users, iterator)
1889                 process_item(i);
1890
1891         r = write_files();
1892         if (r < 0)
1893                 log_error_errno(r, "Failed to write files: %m");
1894
1895 finish:
1896         while ((i = hashmap_steal_first(groups)))
1897                 item_free(i);
1898
1899         while ((i = hashmap_steal_first(users)))
1900                 item_free(i);
1901
1902         while ((n = hashmap_first_key(members))) {
1903                 strv_free(hashmap_steal_first(members));
1904                 free(n);
1905         }
1906
1907         hashmap_free(groups);
1908         hashmap_free(users);
1909         hashmap_free(members);
1910         hashmap_free(todo_uids);
1911         hashmap_free(todo_gids);
1912
1913         free_database(database_user, database_uid);
1914         free_database(database_group, database_gid);
1915
1916         free(arg_root);
1917
1918         return r < 0 ? EXIT_FAILURE : EXIT_SUCCESS;
1919 }