diff options
Diffstat (limited to 'src/sysusers/sysusers.c')
-rw-r--r-- | src/sysusers/sysusers.c | 1919 |
1 files changed, 0 insertions, 1919 deletions
diff --git a/src/sysusers/sysusers.c b/src/sysusers/sysusers.c deleted file mode 100644 index e549df6d3e..0000000000 --- a/src/sysusers/sysusers.c +++ /dev/null @@ -1,1919 +0,0 @@ -/*-*- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil -*-*/ - -/*** - This file is part of systemd. - - Copyright 2014 Lennart Poettering - - systemd is free software; you can redistribute it and/or modify it - under the terms of the GNU Lesser General Public License as published by - the Free Software Foundation; either version 2.1 of the License, or - (at your option) any later version. - - systemd is distributed in the hope that it will be useful, but - WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - Lesser General Public License for more details. - - You should have received a copy of the GNU Lesser General Public License - along with systemd; If not, see <http://www.gnu.org/licenses/>. -***/ - -#include <pwd.h> -#include <grp.h> -#include <shadow.h> -#include <gshadow.h> -#include <getopt.h> -#include <utmp.h> - -#include "util.h" -#include "hashmap.h" -#include "specifier.h" -#include "path-util.h" -#include "build.h" -#include "strv.h" -#include "conf-files.h" -#include "copy.h" -#include "utf8.h" -#include "fileio-label.h" -#include "uid-range.h" -#include "selinux-util.h" - -typedef enum ItemType { - ADD_USER = 'u', - ADD_GROUP = 'g', - ADD_MEMBER = 'm', - ADD_RANGE = 'r', -} ItemType; -typedef struct Item { - ItemType type; - - char *name; - char *uid_path; - char *gid_path; - char *description; - char *home; - - gid_t gid; - uid_t uid; - - bool gid_set:1; - bool uid_set:1; - - bool todo_user:1; - bool todo_group:1; -} Item; - -static char *arg_root = NULL; - -static const char conf_file_dirs[] = CONF_DIRS_NULSTR("sysusers"); - -static Hashmap *users = NULL, *groups = NULL; -static Hashmap *todo_uids = NULL, *todo_gids = NULL; -static Hashmap *members = NULL; - -static Hashmap *database_uid = NULL, *database_user = NULL; -static Hashmap *database_gid = NULL, *database_group = NULL; - -static uid_t search_uid = UID_INVALID; -static UidRange *uid_range = NULL; -static unsigned n_uid_range = 0; - -#define fix_root(x) (arg_root ? strjoina(arg_root, x) : x) - -static int load_user_database(void) { - _cleanup_fclose_ FILE *f = NULL; - const char *passwd_path; - struct passwd *pw; - int r; - - passwd_path = fix_root("/etc/passwd"); - f = fopen(passwd_path, "re"); - if (!f) - return errno == ENOENT ? 0 : -errno; - - r = hashmap_ensure_allocated(&database_user, &string_hash_ops); - if (r < 0) - return r; - - r = hashmap_ensure_allocated(&database_uid, NULL); - if (r < 0) - return r; - - errno = 0; - while ((pw = fgetpwent(f))) { - char *n; - int k, q; - - n = strdup(pw->pw_name); - if (!n) - return -ENOMEM; - - k = hashmap_put(database_user, n, UID_TO_PTR(pw->pw_uid)); - if (k < 0 && k != -EEXIST) { - free(n); - return k; - } - - q = hashmap_put(database_uid, UID_TO_PTR(pw->pw_uid), n); - if (q < 0 && q != -EEXIST) { - if (k < 0) - free(n); - return q; - } - - if (q < 0 && k < 0) - free(n); - - errno = 0; - } - if (!IN_SET(errno, 0, ENOENT)) - return -errno; - - return 0; -} - -static int load_group_database(void) { - _cleanup_fclose_ FILE *f = NULL; - const char *group_path; - struct group *gr; - int r; - - group_path = fix_root("/etc/group"); - f = fopen(group_path, "re"); - if (!f) - return errno == ENOENT ? 0 : -errno; - - r = hashmap_ensure_allocated(&database_group, &string_hash_ops); - if (r < 0) - return r; - - r = hashmap_ensure_allocated(&database_gid, NULL); - if (r < 0) - return r; - - errno = 0; - while ((gr = fgetgrent(f))) { - char *n; - int k, q; - - n = strdup(gr->gr_name); - if (!n) - return -ENOMEM; - - k = hashmap_put(database_group, n, GID_TO_PTR(gr->gr_gid)); - if (k < 0 && k != -EEXIST) { - free(n); - return k; - } - - q = hashmap_put(database_gid, GID_TO_PTR(gr->gr_gid), n); - if (q < 0 && q != -EEXIST) { - if (k < 0) - free(n); - return q; - } - - if (q < 0 && k < 0) - free(n); - - errno = 0; - } - if (!IN_SET(errno, 0, ENOENT)) - return -errno; - - return 0; -} - -static int make_backup(const char *target, const char *x) { - _cleanup_close_ int src = -1; - _cleanup_fclose_ FILE *dst = NULL; - char *backup, *temp; - struct timespec ts[2]; - struct stat st; - int r; - - src = open(x, O_RDONLY|O_CLOEXEC|O_NOCTTY); - if (src < 0) { - if (errno == ENOENT) /* No backup necessary... */ - return 0; - - return -errno; - } - - if (fstat(src, &st) < 0) - return -errno; - - r = fopen_temporary_label(target, x, &dst, &temp); - if (r < 0) - return r; - - r = copy_bytes(src, fileno(dst), (off_t) -1, true); - if (r < 0) - goto fail; - - /* Don't fail on chmod() or chown(). If it stays owned by us - * and/or unreadable by others, then it isn't too bad... */ - - backup = strjoina(x, "-"); - - /* Copy over the access mask */ - if (fchmod(fileno(dst), st.st_mode & 07777) < 0) - log_warning_errno(errno, "Failed to change mode on %s: %m", backup); - - if (fchown(fileno(dst), st.st_uid, st.st_gid)< 0) - log_warning_errno(errno, "Failed to change ownership of %s: %m", backup); - - ts[0] = st.st_atim; - ts[1] = st.st_mtim; - if (futimens(fileno(dst), ts) < 0) - log_warning_errno(errno, "Failed to fix access and modification time of %s: %m", backup); - - if (rename(temp, backup) < 0) - goto fail; - - return 0; - -fail: - unlink(temp); - return r; -} - -static int putgrent_with_members(const struct group *gr, FILE *group) { - char **a; - - assert(gr); - assert(group); - - a = hashmap_get(members, gr->gr_name); - if (a) { - _cleanup_strv_free_ char **l = NULL; - bool added = false; - char **i; - - l = strv_copy(gr->gr_mem); - if (!l) - return -ENOMEM; - - STRV_FOREACH(i, a) { - if (strv_find(l, *i)) - continue; - - if (strv_extend(&l, *i) < 0) - return -ENOMEM; - - added = true; - } - - if (added) { - struct group t; - - strv_uniq(l); - strv_sort(l); - - t = *gr; - t.gr_mem = l; - - errno = 0; - if (putgrent(&t, group) != 0) - return errno ? -errno : -EIO; - - return 1; - } - } - - errno = 0; - if (putgrent(gr, group) != 0) - return errno ? -errno : -EIO; - - return 0; -} - -static int putsgent_with_members(const struct sgrp *sg, FILE *gshadow) { - char **a; - - assert(sg); - assert(gshadow); - - a = hashmap_get(members, sg->sg_namp); - if (a) { - _cleanup_strv_free_ char **l = NULL; - bool added = false; - char **i; - - l = strv_copy(sg->sg_mem); - if (!l) - return -ENOMEM; - - STRV_FOREACH(i, a) { - if (strv_find(l, *i)) - continue; - - if (strv_extend(&l, *i) < 0) - return -ENOMEM; - - added = true; - } - - if (added) { - struct sgrp t; - - strv_uniq(l); - strv_sort(l); - - t = *sg; - t.sg_mem = l; - - errno = 0; - if (putsgent(&t, gshadow) != 0) - return errno ? -errno : -EIO; - - return 1; - } - } - - errno = 0; - if (putsgent(sg, gshadow) != 0) - return errno ? -errno : -EIO; - - return 0; -} - -static int sync_rights(FILE *from, FILE *to) { - struct stat st; - - if (fstat(fileno(from), &st) < 0) - return -errno; - - if (fchmod(fileno(to), st.st_mode & 07777) < 0) - return -errno; - - if (fchown(fileno(to), st.st_uid, st.st_gid) < 0) - return -errno; - - return 0; -} - -static int write_files(void) { - - _cleanup_fclose_ FILE *passwd = NULL, *group = NULL, *shadow = NULL, *gshadow = NULL; - _cleanup_free_ char *passwd_tmp = NULL, *group_tmp = NULL, *shadow_tmp = NULL, *gshadow_tmp = NULL; - const char *passwd_path = NULL, *group_path = NULL, *shadow_path = NULL, *gshadow_path = NULL; - bool group_changed = false; - Iterator iterator; - Item *i; - int r; - - if (hashmap_size(todo_gids) > 0 || hashmap_size(members) > 0) { - _cleanup_fclose_ FILE *original = NULL; - - /* First we update the actual group list file */ - group_path = fix_root("/etc/group"); - r = fopen_temporary_label("/etc/group", group_path, &group, &group_tmp); - if (r < 0) - goto finish; - - original = fopen(group_path, "re"); - if (original) { - struct group *gr; - - r = sync_rights(original, group); - if (r < 0) - goto finish; - - errno = 0; - while ((gr = fgetgrent(original))) { - /* Safety checks against name and GID - * collisions. Normally, this should - * be unnecessary, but given that we - * look at the entries anyway here, - * let's make an extra verification - * step that we don't generate - * duplicate entries. */ - - i = hashmap_get(groups, gr->gr_name); - if (i && i->todo_group) { - r = -EEXIST; - goto finish; - } - - if (hashmap_contains(todo_gids, GID_TO_PTR(gr->gr_gid))) { - r = -EEXIST; - goto finish; - } - - r = putgrent_with_members(gr, group); - if (r < 0) - goto finish; - if (r > 0) - group_changed = true; - - errno = 0; - } - if (!IN_SET(errno, 0, ENOENT)) { - r = -errno; - goto finish; - } - - } else if (errno != ENOENT) { - r = -errno; - goto finish; - } else if (fchmod(fileno(group), 0644) < 0) { - r = -errno; - goto finish; - } - - HASHMAP_FOREACH(i, todo_gids, iterator) { - struct group n = { - .gr_name = i->name, - .gr_gid = i->gid, - .gr_passwd = (char*) "x", - }; - - r = putgrent_with_members(&n, group); - if (r < 0) - goto finish; - - group_changed = true; - } - - r = fflush_and_check(group); - if (r < 0) - goto finish; - - if (original) { - fclose(original); - original = NULL; - } - - /* OK, now also update the shadow file for the group list */ - gshadow_path = fix_root("/etc/gshadow"); - r = fopen_temporary_label("/etc/gshadow", gshadow_path, &gshadow, &gshadow_tmp); - if (r < 0) - goto finish; - - original = fopen(gshadow_path, "re"); - if (original) { - struct sgrp *sg; - - r = sync_rights(original, gshadow); - if (r < 0) - goto finish; - - errno = 0; - while ((sg = fgetsgent(original))) { - - i = hashmap_get(groups, sg->sg_namp); - if (i && i->todo_group) { - r = -EEXIST; - goto finish; - } - - r = putsgent_with_members(sg, gshadow); - if (r < 0) - goto finish; - if (r > 0) - group_changed = true; - - errno = 0; - } - if (!IN_SET(errno, 0, ENOENT)) { - r = -errno; - goto finish; - } - - } else if (errno != ENOENT) { - r = -errno; - goto finish; - } else if (fchmod(fileno(gshadow), 0000) < 0) { - r = -errno; - goto finish; - } - - HASHMAP_FOREACH(i, todo_gids, iterator) { - struct sgrp n = { - .sg_namp = i->name, - .sg_passwd = (char*) "!!", - }; - - r = putsgent_with_members(&n, gshadow); - if (r < 0) - goto finish; - - group_changed = true; - } - - r = fflush_and_check(gshadow); - if (r < 0) - goto finish; - } - - if (hashmap_size(todo_uids) > 0) { - _cleanup_fclose_ FILE *original = NULL; - long lstchg; - - /* First we update the user database itself */ - passwd_path = fix_root("/etc/passwd"); - r = fopen_temporary_label("/etc/passwd", passwd_path, &passwd, &passwd_tmp); - if (r < 0) - goto finish; - - original = fopen(passwd_path, "re"); - if (original) { - struct passwd *pw; - - r = sync_rights(original, passwd); - if (r < 0) - goto finish; - - errno = 0; - while ((pw = fgetpwent(original))) { - - i = hashmap_get(users, pw->pw_name); - if (i && i->todo_user) { - r = -EEXIST; - goto finish; - } - - if (hashmap_contains(todo_uids, UID_TO_PTR(pw->pw_uid))) { - r = -EEXIST; - goto finish; - } - - errno = 0; - if (putpwent(pw, passwd) < 0) { - r = errno ? -errno : -EIO; - goto finish; - } - - errno = 0; - } - if (!IN_SET(errno, 0, ENOENT)) { - r = -errno; - goto finish; - } - - } else if (errno != ENOENT) { - r = -errno; - goto finish; - } else if (fchmod(fileno(passwd), 0644) < 0) { - r = -errno; - goto finish; - } - - HASHMAP_FOREACH(i, todo_uids, iterator) { - struct passwd n = { - .pw_name = i->name, - .pw_uid = i->uid, - .pw_gid = i->gid, - .pw_gecos = i->description, - - /* "x" means the password is stored in - * the shadow file */ - .pw_passwd = (char*) "x", - - /* We default to the root directory as home */ - .pw_dir = i->home ? i->home : (char*) "/", - - /* Initialize the shell to nologin, - * with one exception: for root we - * patch in something special */ - .pw_shell = i->uid == 0 ? (char*) "/bin/sh" : (char*) "/sbin/nologin", - }; - - errno = 0; - if (putpwent(&n, passwd) != 0) { - r = errno ? -errno : -EIO; - goto finish; - } - } - - r = fflush_and_check(passwd); - if (r < 0) - goto finish; - - if (original) { - fclose(original); - original = NULL; - } - - /* The we update the shadow database */ - shadow_path = fix_root("/etc/shadow"); - r = fopen_temporary_label("/etc/shadow", shadow_path, &shadow, &shadow_tmp); - if (r < 0) - goto finish; - - lstchg = (long) (now(CLOCK_REALTIME) / USEC_PER_DAY); - - original = fopen(shadow_path, "re"); - if (original) { - struct spwd *sp; - - r = sync_rights(original, shadow); - if (r < 0) - goto finish; - - errno = 0; - while ((sp = fgetspent(original))) { - - i = hashmap_get(users, sp->sp_namp); - if (i && i->todo_user) { - /* we will update the existing entry */ - sp->sp_lstchg = lstchg; - - /* only the /etc/shadow stage is left, so we can - * safely remove the item from the todo set */ - i->todo_user = false; - hashmap_remove(todo_uids, UID_TO_PTR(i->uid)); - } - - errno = 0; - if (putspent(sp, shadow) < 0) { - r = errno ? -errno : -EIO; - goto finish; - } - - errno = 0; - } - if (!IN_SET(errno, 0, ENOENT)) { - r = -errno; - goto finish; - } - } else if (errno != ENOENT) { - r = -errno; - goto finish; - } else if (fchmod(fileno(shadow), 0000) < 0) { - r = -errno; - goto finish; - } - - HASHMAP_FOREACH(i, todo_uids, iterator) { - struct spwd n = { - .sp_namp = i->name, - .sp_pwdp = (char*) "!!", - .sp_lstchg = lstchg, - .sp_min = -1, - .sp_max = -1, - .sp_warn = -1, - .sp_inact = -1, - .sp_expire = -1, - .sp_flag = (unsigned long) -1, /* this appears to be what everybody does ... */ - }; - - errno = 0; - if (putspent(&n, shadow) != 0) { - r = errno ? -errno : -EIO; - goto finish; - } - } - - r = fflush_and_check(shadow); - if (r < 0) - goto finish; - } - - /* Make a backup of the old files */ - if (group_changed) { - if (group) { - r = make_backup("/etc/group", group_path); - if (r < 0) - goto finish; - } - if (gshadow) { - r = make_backup("/etc/gshadow", gshadow_path); - if (r < 0) - goto finish; - } - } - - if (passwd) { - r = make_backup("/etc/passwd", passwd_path); - if (r < 0) - goto finish; - } - if (shadow) { - r = make_backup("/etc/shadow", shadow_path); - if (r < 0) - goto finish; - } - - /* And make the new files count */ - if (group_changed) { - if (group) { - if (rename(group_tmp, group_path) < 0) { - r = -errno; - goto finish; - } - - free(group_tmp); - group_tmp = NULL; - } - if (gshadow) { - if (rename(gshadow_tmp, gshadow_path) < 0) { - r = -errno; - goto finish; - } - - free(gshadow_tmp); - gshadow_tmp = NULL; - } - } - - if (passwd) { - if (rename(passwd_tmp, passwd_path) < 0) { - r = -errno; - goto finish; - } - - free(passwd_tmp); - passwd_tmp = NULL; - } - if (shadow) { - if (rename(shadow_tmp, shadow_path) < 0) { - r = -errno; - goto finish; - } - - free(shadow_tmp); - shadow_tmp = NULL; - } - - r = 0; - -finish: - if (passwd_tmp) - unlink(passwd_tmp); - if (shadow_tmp) - unlink(shadow_tmp); - if (group_tmp) - unlink(group_tmp); - if (gshadow_tmp) - unlink(gshadow_tmp); - - return r; -} - -static int uid_is_ok(uid_t uid, const char *name) { - struct passwd *p; - struct group *g; - const char *n; - Item *i; - - /* Let's see if we already have assigned the UID a second time */ - if (hashmap_get(todo_uids, UID_TO_PTR(uid))) - return 0; - - /* Try to avoid using uids that are already used by a group - * that doesn't have the same name as our new user. */ - i = hashmap_get(todo_gids, GID_TO_PTR(uid)); - if (i && !streq(i->name, name)) - return 0; - - /* Let's check the files directly */ - if (hashmap_contains(database_uid, UID_TO_PTR(uid))) - return 0; - - n = hashmap_get(database_gid, GID_TO_PTR(uid)); - if (n && !streq(n, name)) - return 0; - - /* Let's also check via NSS, to avoid UID clashes over LDAP and such, just in case */ - if (!arg_root) { - errno = 0; - p = getpwuid(uid); - if (p) - return 0; - if (!IN_SET(errno, 0, ENOENT)) - return -errno; - - errno = 0; - g = getgrgid((gid_t) uid); - if (g) { - if (!streq(g->gr_name, name)) - return 0; - } else if (!IN_SET(errno, 0, ENOENT)) - return -errno; - } - - return 1; -} - -static int root_stat(const char *p, struct stat *st) { - const char *fix; - - fix = fix_root(p); - if (stat(fix, st) < 0) - return -errno; - - return 0; -} - -static int read_id_from_file(Item *i, uid_t *_uid, gid_t *_gid) { - struct stat st; - bool found_uid = false, found_gid = false; - uid_t uid = 0; - gid_t gid = 0; - - assert(i); - - /* First, try to get the gid directly */ - if (_gid && i->gid_path && root_stat(i->gid_path, &st) >= 0) { - gid = st.st_gid; - found_gid = true; - } - - /* Then, try to get the uid directly */ - if ((_uid || (_gid && !found_gid)) - && i->uid_path - && root_stat(i->uid_path, &st) >= 0) { - - uid = st.st_uid; - found_uid = true; - - /* If we need the gid, but had no success yet, also derive it from the uid path */ - if (_gid && !found_gid) { - gid = st.st_gid; - found_gid = true; - } - } - - /* If that didn't work yet, then let's reuse the gid as uid */ - if (_uid && !found_uid && i->gid_path) { - - if (found_gid) { - uid = (uid_t) gid; - found_uid = true; - } else if (root_stat(i->gid_path, &st) >= 0) { - uid = (uid_t) st.st_gid; - found_uid = true; - } - } - - if (_uid) { - if (!found_uid) - return 0; - - *_uid = uid; - } - - if (_gid) { - if (!found_gid) - return 0; - - *_gid = gid; - } - - return 1; -} - -static int add_user(Item *i) { - void *z; - int r; - - assert(i); - - /* Check the database directly */ - z = hashmap_get(database_user, i->name); - if (z) { - log_debug("User %s already exists.", i->name); - i->uid = PTR_TO_UID(z); - i->uid_set = true; - return 0; - } - - if (!arg_root) { - struct passwd *p; - - /* Also check NSS */ - errno = 0; - p = getpwnam(i->name); - if (p) { - log_debug("User %s already exists.", i->name); - i->uid = p->pw_uid; - i->uid_set = true; - - free(i->description); - i->description = strdup(p->pw_gecos); - return 0; - } - if (!IN_SET(errno, 0, ENOENT)) - return log_error_errno(errno, "Failed to check if user %s already exists: %m", i->name); - } - - /* Try to use the suggested numeric uid */ - if (i->uid_set) { - r = uid_is_ok(i->uid, i->name); - if (r < 0) - return log_error_errno(r, "Failed to verify uid " UID_FMT ": %m", i->uid); - if (r == 0) { - log_debug("Suggested user ID " UID_FMT " for %s already used.", i->uid, i->name); - i->uid_set = false; - } - } - - /* If that didn't work, try to read it from the specified path */ - if (!i->uid_set) { - uid_t c; - - if (read_id_from_file(i, &c, NULL) > 0) { - - if (c <= 0 || !uid_range_contains(uid_range, n_uid_range, c)) - log_debug("User ID " UID_FMT " of file not suitable for %s.", c, i->name); - else { - r = uid_is_ok(c, i->name); - if (r < 0) - return log_error_errno(r, "Failed to verify uid " UID_FMT ": %m", i->uid); - else if (r > 0) { - i->uid = c; - i->uid_set = true; - } else - log_debug("User ID " UID_FMT " of file for %s is already used.", c, i->name); - } - } - } - - /* Otherwise try to reuse the group ID */ - if (!i->uid_set && i->gid_set) { - r = uid_is_ok((uid_t) i->gid, i->name); - if (r < 0) - return log_error_errno(r, "Failed to verify uid " UID_FMT ": %m", i->uid); - if (r > 0) { - i->uid = (uid_t) i->gid; - i->uid_set = true; - } - } - - /* And if that didn't work either, let's try to find a free one */ - if (!i->uid_set) { - for (;;) { - r = uid_range_next_lower(uid_range, n_uid_range, &search_uid); - if (r < 0) { - log_error("No free user ID available for %s.", i->name); - return r; - } - - r = uid_is_ok(search_uid, i->name); - if (r < 0) - return log_error_errno(r, "Failed to verify uid " UID_FMT ": %m", i->uid); - else if (r > 0) - break; - } - - i->uid_set = true; - i->uid = search_uid; - } - - r = hashmap_ensure_allocated(&todo_uids, NULL); - if (r < 0) - return log_oom(); - - r = hashmap_put(todo_uids, UID_TO_PTR(i->uid), i); - if (r < 0) - return log_oom(); - - i->todo_user = true; - log_info("Creating user %s (%s) with uid " UID_FMT " and gid " GID_FMT ".", i->name, strna(i->description), i->uid, i->gid); - - return 0; -} - -static int gid_is_ok(gid_t gid) { - struct group *g; - struct passwd *p; - - if (hashmap_get(todo_gids, GID_TO_PTR(gid))) - return 0; - - /* Avoid reusing gids that are already used by a different user */ - if (hashmap_get(todo_uids, UID_TO_PTR(gid))) - return 0; - - if (hashmap_contains(database_gid, GID_TO_PTR(gid))) - return 0; - - if (hashmap_contains(database_uid, UID_TO_PTR(gid))) - return 0; - - if (!arg_root) { - errno = 0; - g = getgrgid(gid); - if (g) - return 0; - if (!IN_SET(errno, 0, ENOENT)) - return -errno; - - errno = 0; - p = getpwuid((uid_t) gid); - if (p) - return 0; - if (!IN_SET(errno, 0, ENOENT)) - return -errno; - } - - return 1; -} - -static int add_group(Item *i) { - void *z; - int r; - - assert(i); - - /* Check the database directly */ - z = hashmap_get(database_group, i->name); - if (z) { - log_debug("Group %s already exists.", i->name); - i->gid = PTR_TO_GID(z); - i->gid_set = true; - return 0; - } - - /* Also check NSS */ - if (!arg_root) { - struct group *g; - - errno = 0; - g = getgrnam(i->name); - if (g) { - log_debug("Group %s already exists.", i->name); - i->gid = g->gr_gid; - i->gid_set = true; - return 0; - } - if (!IN_SET(errno, 0, ENOENT)) - return log_error_errno(errno, "Failed to check if group %s already exists: %m", i->name); - } - - /* Try to use the suggested numeric gid */ - if (i->gid_set) { - r = gid_is_ok(i->gid); - if (r < 0) - return log_error_errno(r, "Failed to verify gid " GID_FMT ": %m", i->gid); - if (r == 0) { - log_debug("Suggested group ID " GID_FMT " for %s already used.", i->gid, i->name); - i->gid_set = false; - } - } - - /* Try to reuse the numeric uid, if there's one */ - if (!i->gid_set && i->uid_set) { - r = gid_is_ok((gid_t) i->uid); - if (r < 0) - return log_error_errno(r, "Failed to verify gid " GID_FMT ": %m", i->gid); - if (r > 0) { - i->gid = (gid_t) i->uid; - i->gid_set = true; - } - } - - /* If that didn't work, try to read it from the specified path */ - if (!i->gid_set) { - gid_t c; - - if (read_id_from_file(i, NULL, &c) > 0) { - - if (c <= 0 || !uid_range_contains(uid_range, n_uid_range, c)) - log_debug("Group ID " GID_FMT " of file not suitable for %s.", c, i->name); - else { - r = gid_is_ok(c); - if (r < 0) - return log_error_errno(r, "Failed to verify gid " GID_FMT ": %m", i->gid); - else if (r > 0) { - i->gid = c; - i->gid_set = true; - } else - log_debug("Group ID " GID_FMT " of file for %s already used.", c, i->name); - } - } - } - - /* And if that didn't work either, let's try to find a free one */ - if (!i->gid_set) { - for (;;) { - /* We look for new GIDs in the UID pool! */ - r = uid_range_next_lower(uid_range, n_uid_range, &search_uid); - if (r < 0) { - log_error("No free group ID available for %s.", i->name); - return r; - } - - r = gid_is_ok(search_uid); - if (r < 0) - return log_error_errno(r, "Failed to verify gid " GID_FMT ": %m", i->gid); - else if (r > 0) - break; - } - - i->gid_set = true; - i->gid = search_uid; - } - - r = hashmap_ensure_allocated(&todo_gids, NULL); - if (r < 0) - return log_oom(); - - r = hashmap_put(todo_gids, GID_TO_PTR(i->gid), i); - if (r < 0) - return log_oom(); - - i->todo_group = true; - log_info("Creating group %s with gid " GID_FMT ".", i->name, i->gid); - - return 0; -} - -static int process_item(Item *i) { - int r; - - assert(i); - - switch (i->type) { - - case ADD_USER: - r = add_group(i); - if (r < 0) - return r; - - return add_user(i); - - case ADD_GROUP: { - Item *j; - - j = hashmap_get(users, i->name); - if (j) { - /* There's already user to be created for this - * name, let's process that in one step */ - - if (i->gid_set) { - j->gid = i->gid; - j->gid_set = true; - } - - if (i->gid_path) { - free(j->gid_path); - j->gid_path = strdup(i->gid_path); - if (!j->gid_path) - return log_oom(); - } - - return 0; - } - - return add_group(i); - } - - default: - assert_not_reached("Unknown item type"); - } -} - -static void item_free(Item *i) { - - if (!i) - return; - - free(i->name); - free(i->uid_path); - free(i->gid_path); - free(i->description); - free(i); -} - -DEFINE_TRIVIAL_CLEANUP_FUNC(Item*, item_free); - -static int add_implicit(void) { - char *g, **l; - Iterator iterator; - int r; - - /* Implicitly create additional users and groups, if they were listed in "m" lines */ - - HASHMAP_FOREACH_KEY(l, g, members, iterator) { - Item *i; - char **m; - - i = hashmap_get(groups, g); - if (!i) { - _cleanup_(item_freep) Item *j = NULL; - - r = hashmap_ensure_allocated(&groups, &string_hash_ops); - if (r < 0) - return log_oom(); - - j = new0(Item, 1); - if (!j) - return log_oom(); - - j->type = ADD_GROUP; - j->name = strdup(g); - if (!j->name) - return log_oom(); - - r = hashmap_put(groups, j->name, j); - if (r < 0) - return log_oom(); - - log_debug("Adding implicit group '%s' due to m line", j->name); - j = NULL; - } - - STRV_FOREACH(m, l) { - - i = hashmap_get(users, *m); - if (!i) { - _cleanup_(item_freep) Item *j = NULL; - - r = hashmap_ensure_allocated(&users, &string_hash_ops); - if (r < 0) - return log_oom(); - - j = new0(Item, 1); - if (!j) - return log_oom(); - - j->type = ADD_USER; - j->name = strdup(*m); - if (!j->name) - return log_oom(); - - r = hashmap_put(users, j->name, j); - if (r < 0) - return log_oom(); - - log_debug("Adding implicit user '%s' due to m line", j->name); - j = NULL; - } - } - } - - return 0; -} - -static bool item_equal(Item *a, Item *b) { - assert(a); - assert(b); - - if (a->type != b->type) - return false; - - if (!streq_ptr(a->name, b->name)) - return false; - - if (!streq_ptr(a->uid_path, b->uid_path)) - return false; - - if (!streq_ptr(a->gid_path, b->gid_path)) - return false; - - if (!streq_ptr(a->description, b->description)) - return false; - - if (a->uid_set != b->uid_set) - return false; - - if (a->uid_set && a->uid != b->uid) - return false; - - if (a->gid_set != b->gid_set) - return false; - - if (a->gid_set && a->gid != b->gid) - return false; - - if (!streq_ptr(a->home, b->home)) - return false; - - return true; -} - -static bool valid_user_group_name(const char *u) { - const char *i; - long sz; - - if (isempty(u)) - return false; - - if (!(u[0] >= 'a' && u[0] <= 'z') && - !(u[0] >= 'A' && u[0] <= 'Z') && - u[0] != '_') - return false; - - for (i = u+1; *i; i++) { - if (!(*i >= 'a' && *i <= 'z') && - !(*i >= 'A' && *i <= 'Z') && - !(*i >= '0' && *i <= '9') && - *i != '_' && - *i != '-') - return false; - } - - sz = sysconf(_SC_LOGIN_NAME_MAX); - assert_se(sz > 0); - - if ((size_t) (i-u) > (size_t) sz) - return false; - - if ((size_t) (i-u) > UT_NAMESIZE - 1) - return false; - - return true; -} - -static bool valid_gecos(const char *d) { - - if (!d) - return false; - - if (!utf8_is_valid(d)) - return false; - - if (string_has_cc(d, NULL)) - return false; - - /* Colons are used as field separators, and hence not OK */ - if (strchr(d, ':')) - return false; - - return true; -} - -static bool valid_home(const char *p) { - - if (isempty(p)) - return false; - - if (!utf8_is_valid(p)) - return false; - - if (string_has_cc(p, NULL)) - return false; - - if (!path_is_absolute(p)) - return false; - - if (!path_is_safe(p)) - return false; - - /* Colons are used as field separators, and hence not OK */ - if (strchr(p, ':')) - return false; - - return true; -} - -static int parse_line(const char *fname, unsigned line, const char *buffer) { - - static const Specifier specifier_table[] = { - { 'm', specifier_machine_id, NULL }, - { 'b', specifier_boot_id, NULL }, - { 'H', specifier_host_name, NULL }, - { 'v', specifier_kernel_release, NULL }, - {} - }; - - _cleanup_free_ char *action = NULL, *name = NULL, *id = NULL, *resolved_name = NULL, *resolved_id = NULL, *description = NULL, *home = NULL; - _cleanup_(item_freep) Item *i = NULL; - Item *existing; - Hashmap *h; - int r; - const char *p; - - assert(fname); - assert(line >= 1); - assert(buffer); - - /* Parse columns */ - p = buffer; - r = unquote_many_words(&p, 0, &action, &name, &id, &description, &home, NULL); - if (r < 0) { - log_error("[%s:%u] Syntax error.", fname, line); - return r; - } - if (r < 2) { - log_error("[%s:%u] Missing action and name columns.", fname, line); - return -EINVAL; - } - if (*p != 0) { - log_error("[%s:%u] Trailing garbage.", fname, line); - return -EINVAL; - } - - /* Verify action */ - if (strlen(action) != 1) { - log_error("[%s:%u] Unknown modifier '%s'", fname, line, action); - return -EINVAL; - } - - if (!IN_SET(action[0], ADD_USER, ADD_GROUP, ADD_MEMBER, ADD_RANGE)) { - log_error("[%s:%u] Unknown command command type '%c'.", fname, line, action[0]); - return -EBADMSG; - } - - /* Verify name */ - if (isempty(name) || streq(name, "-")) { - free(name); - name = NULL; - } - - if (name) { - r = specifier_printf(name, specifier_table, NULL, &resolved_name); - if (r < 0) { - log_error("[%s:%u] Failed to replace specifiers: %s", fname, line, name); - return r; - } - - if (!valid_user_group_name(resolved_name)) { - log_error("[%s:%u] '%s' is not a valid user or group name.", fname, line, resolved_name); - return -EINVAL; - } - } - - /* Verify id */ - if (isempty(id) || streq(id, "-")) { - free(id); - id = NULL; - } - - if (id) { - r = specifier_printf(id, specifier_table, NULL, &resolved_id); - if (r < 0) { - log_error("[%s:%u] Failed to replace specifiers: %s", fname, line, name); - return r; - } - } - - /* Verify description */ - if (isempty(description) || streq(description, "-")) { - free(description); - description = NULL; - } - - if (description) { - if (!valid_gecos(description)) { - log_error("[%s:%u] '%s' is not a valid GECOS field.", fname, line, description); - return -EINVAL; - } - } - - /* Verify home */ - if (isempty(home) || streq(home, "-")) { - free(home); - home = NULL; - } - - if (home) { - if (!valid_home(home)) { - log_error("[%s:%u] '%s' is not a valid home directory field.", fname, line, home); - return -EINVAL; - } - } - - switch (action[0]) { - - case ADD_RANGE: - if (resolved_name) { - log_error("[%s:%u] Lines of type 'r' don't take a name field.", fname, line); - return -EINVAL; - } - - if (!resolved_id) { - log_error("[%s:%u] Lines of type 'r' require a ID range in the third field.", fname, line); - return -EINVAL; - } - - if (description) { - log_error("[%s:%u] Lines of type 'r' don't take a GECOS field.", fname, line); - return -EINVAL; - } - - if (home) { - log_error("[%s:%u] Lines of type 'r' don't take a home directory field.", fname, line); - return -EINVAL; - } - - r = uid_range_add_str(&uid_range, &n_uid_range, resolved_id); - if (r < 0) { - log_error("[%s:%u] Invalid UID range %s.", fname, line, resolved_id); - return -EINVAL; - } - - return 0; - - case ADD_MEMBER: { - char **l; - - /* Try to extend an existing member or group item */ - if (!name) { - log_error("[%s:%u] Lines of type 'm' require a user name in the second field.", fname, line); - return -EINVAL; - } - - if (!resolved_id) { - log_error("[%s:%u] Lines of type 'm' require a group name in the third field.", fname, line); - return -EINVAL; - } - - if (!valid_user_group_name(resolved_id)) { - log_error("[%s:%u] '%s' is not a valid user or group name.", fname, line, resolved_id); - return -EINVAL; - } - - if (description) { - log_error("[%s:%u] Lines of type 'm' don't take a GECOS field.", fname, line); - return -EINVAL; - } - - if (home) { - log_error("[%s:%u] Lines of type 'm' don't take a home directory field.", fname, line); - return -EINVAL; - } - - r = hashmap_ensure_allocated(&members, &string_hash_ops); - if (r < 0) - return log_oom(); - - l = hashmap_get(members, resolved_id); - if (l) { - /* A list for this group name already exists, let's append to it */ - r = strv_push(&l, resolved_name); - if (r < 0) - return log_oom(); - - resolved_name = NULL; - - assert_se(hashmap_update(members, resolved_id, l) >= 0); - } else { - /* No list for this group name exists yet, create one */ - - l = new0(char *, 2); - if (!l) - return -ENOMEM; - - l[0] = resolved_name; - l[1] = NULL; - - r = hashmap_put(members, resolved_id, l); - if (r < 0) { - free(l); - return log_oom(); - } - - resolved_id = resolved_name = NULL; - } - - return 0; - } - - case ADD_USER: - if (!name) { - log_error("[%s:%u] Lines of type 'u' require a user name in the second field.", fname, line); - return -EINVAL; - } - - r = hashmap_ensure_allocated(&users, &string_hash_ops); - if (r < 0) - return log_oom(); - - i = new0(Item, 1); - if (!i) - return log_oom(); - - if (resolved_id) { - if (path_is_absolute(resolved_id)) { - i->uid_path = resolved_id; - resolved_id = NULL; - - path_kill_slashes(i->uid_path); - } else { - r = parse_uid(resolved_id, &i->uid); - if (r < 0) { - log_error("Failed to parse UID: %s", id); - return -EBADMSG; - } - - i->uid_set = true; - } - } - - i->description = description; - description = NULL; - - i->home = home; - home = NULL; - - h = users; - break; - - case ADD_GROUP: - if (!name) { - log_error("[%s:%u] Lines of type 'g' require a user name in the second field.", fname, line); - return -EINVAL; - } - - if (description) { - log_error("[%s:%u] Lines of type 'g' don't take a GECOS field.", fname, line); - return -EINVAL; - } - - if (home) { - log_error("[%s:%u] Lines of type 'g' don't take a home directory field.", fname, line); - return -EINVAL; - } - - r = hashmap_ensure_allocated(&groups, &string_hash_ops); - if (r < 0) - return log_oom(); - - i = new0(Item, 1); - if (!i) - return log_oom(); - - if (resolved_id) { - if (path_is_absolute(resolved_id)) { - i->gid_path = resolved_id; - resolved_id = NULL; - - path_kill_slashes(i->gid_path); - } else { - r = parse_gid(resolved_id, &i->gid); - if (r < 0) { - log_error("Failed to parse GID: %s", id); - return -EBADMSG; - } - - i->gid_set = true; - } - } - - h = groups; - break; - - default: - return -EBADMSG; - } - - i->type = action[0]; - i->name = resolved_name; - resolved_name = NULL; - - existing = hashmap_get(h, i->name); - if (existing) { - - /* Two identical items are fine */ - if (!item_equal(existing, i)) - log_warning("Two or more conflicting lines for %s configured, ignoring.", i->name); - - return 0; - } - - r = hashmap_put(h, i->name, i); - if (r < 0) - return log_oom(); - - i = NULL; - return 0; -} - -static int read_config_file(const char *fn, bool ignore_enoent) { - _cleanup_fclose_ FILE *rf = NULL; - FILE *f = NULL; - char line[LINE_MAX]; - unsigned v = 0; - int r = 0; - - assert(fn); - - if (streq(fn, "-")) - f = stdin; - else { - r = search_and_fopen_nulstr(fn, "re", arg_root, conf_file_dirs, &rf); - if (r < 0) { - if (ignore_enoent && r == -ENOENT) - return 0; - - return log_error_errno(r, "Failed to open '%s', ignoring: %m", fn); - } - - f = rf; - } - - FOREACH_LINE(line, f, break) { - char *l; - int k; - - v++; - - l = strstrip(line); - if (*l == '#' || *l == 0) - continue; - - k = parse_line(fn, v, l); - if (k < 0 && r == 0) - r = k; - } - - if (ferror(f)) { - log_error_errno(errno, "Failed to read from file %s: %m", fn); - if (r == 0) - r = -EIO; - } - - return r; -} - -static void free_database(Hashmap *by_name, Hashmap *by_id) { - char *name; - - for (;;) { - name = hashmap_first(by_id); - if (!name) - break; - - hashmap_remove(by_name, name); - - hashmap_steal_first_key(by_id); - free(name); - } - - while ((name = hashmap_steal_first_key(by_name))) - free(name); - - hashmap_free(by_name); - hashmap_free(by_id); -} - -static void help(void) { - printf("%s [OPTIONS...] [CONFIGURATION FILE...]\n\n" - "Creates system user accounts.\n\n" - " -h --help Show this help\n" - " --version Show package version\n" - " --root=PATH Operate on an alternate filesystem root\n" - , program_invocation_short_name); -} - -static int parse_argv(int argc, char *argv[]) { - - enum { - ARG_VERSION = 0x100, - ARG_ROOT, - }; - - static const struct option options[] = { - { "help", no_argument, NULL, 'h' }, - { "version", no_argument, NULL, ARG_VERSION }, - { "root", required_argument, NULL, ARG_ROOT }, - {} - }; - - int c; - - assert(argc >= 0); - assert(argv); - - while ((c = getopt_long(argc, argv, "h", options, NULL)) >= 0) - - switch (c) { - - case 'h': - help(); - return 0; - - case ARG_VERSION: - puts(PACKAGE_STRING); - puts(SYSTEMD_FEATURES); - return 0; - - case ARG_ROOT: - free(arg_root); - arg_root = path_make_absolute_cwd(optarg); - if (!arg_root) - return log_oom(); - - path_kill_slashes(arg_root); - break; - - case '?': - return -EINVAL; - - default: - assert_not_reached("Unhandled option"); - } - - return 1; -} - -int main(int argc, char *argv[]) { - - _cleanup_close_ int lock = -1; - Iterator iterator; - int r, k; - Item *i; - char *n; - - r = parse_argv(argc, argv); - if (r <= 0) - goto finish; - - log_set_target(LOG_TARGET_AUTO); - log_parse_environment(); - log_open(); - - umask(0022); - - r = mac_selinux_init(NULL); - if (r < 0) { - log_error_errno(r, "SELinux setup failed: %m"); - goto finish; - } - - if (optind < argc) { - int j; - - for (j = optind; j < argc; j++) { - k = read_config_file(argv[j], false); - if (k < 0 && r == 0) - r = k; - } - } else { - _cleanup_strv_free_ char **files = NULL; - char **f; - - r = conf_files_list_nulstr(&files, ".conf", arg_root, conf_file_dirs); - if (r < 0) { - log_error_errno(r, "Failed to enumerate sysusers.d files: %m"); - goto finish; - } - - STRV_FOREACH(f, files) { - k = read_config_file(*f, true); - if (k < 0 && r == 0) - r = k; - } - } - - if (!uid_range) { - /* Default to default range of 1..SYSTEMD_UID_MAX */ - r = uid_range_add(&uid_range, &n_uid_range, 1, SYSTEM_UID_MAX); - if (r < 0) { - log_oom(); - goto finish; - } - } - - r = add_implicit(); - if (r < 0) - goto finish; - - lock = take_password_lock(arg_root); - if (lock < 0) { - log_error_errno(lock, "Failed to take lock: %m"); - goto finish; - } - - r = load_user_database(); - if (r < 0) { - log_error_errno(r, "Failed to load user database: %m"); - goto finish; - } - - r = load_group_database(); - if (r < 0) { - log_error_errno(r, "Failed to read group database: %m"); - goto finish; - } - - HASHMAP_FOREACH(i, groups, iterator) - process_item(i); - - HASHMAP_FOREACH(i, users, iterator) - process_item(i); - - r = write_files(); - if (r < 0) - log_error_errno(r, "Failed to write files: %m"); - -finish: - while ((i = hashmap_steal_first(groups))) - item_free(i); - - while ((i = hashmap_steal_first(users))) - item_free(i); - - while ((n = hashmap_first_key(members))) { - strv_free(hashmap_steal_first(members)); - free(n); - } - - hashmap_free(groups); - hashmap_free(users); - hashmap_free(members); - hashmap_free(todo_uids); - hashmap_free(todo_gids); - - free_database(database_user, database_uid); - free_database(database_group, database_gid); - - free(arg_root); - - return r < 0 ? EXIT_FAILURE : EXIT_SUCCESS; -} |