src/core/machine-id-setup.c

   1 /*-*- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil -*-*/
   2
   3 /***
   4   This file is part of systemd.
   5
   6   Copyright 2010 Lennart Poettering
   7
   8   systemd is free software; you can redistribute it and/or modify it
   9   under the terms of the GNU Lesser General Public License as published by
  10   the Free Software Foundation; either version 2.1 of the License, or
  11   (at your option) any later version.
  12
  13   systemd is distributed in the hope that it will be useful, but
  14   WITHOUT ANY WARRANTY; without even the implied warranty of
  15   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  16   Lesser General Public License for more details.
  17
  18   You should have received a copy of the GNU Lesser General Public License
  19   along with systemd; If not, see <http://www.gnu.org/licenses/>.
  20 ***/
  21
  22 #include <errno.h>
  23 #include <fcntl.h>
  24 #include <sched.h>
  25 #include <stdio.h>
  26 #include <string.h>
  27 #include <sys/mount.h>
  28 #include <unistd.h>
  29
  30 #include "sd-id128.h"
  31
  32 #include "fileio.h"
  33 #include "log.h"
  34 #include "macro.h"
  35 #include "mkdir.h"
  36 #include "path-util.h"
  37 #include "process-util.h"
  38 #include "string-util.h"
  39 #include "util.h"
  40 #include "virt.h"
  41 #include "machine-id-setup.h"
  42
  43 static int shorten_uuid(char destination[34], const char source[36]) {
  44         unsigned i, j;
  45
  46         assert(destination);
  47         assert(source);
  48
  49         /* Converts a UUID into a machine ID, by lowercasing it and
  50          * removing dashes. Validates everything. */
  51
  52         for (i = 0, j = 0; i < 36 && j < 32; i++) {
  53                 int t;
  54
  55                 t = unhexchar(source[i]);
  56                 if (t < 0)
  57                         continue;
  58
  59                 destination[j++] = hexchar(t);
  60         }
  61
  62         if (i != 36 || j != 32)
  63                 return -EINVAL;
  64
  65         destination[32] = '\n';
  66         destination[33] = 0;
  67         return 0;
  68 }
  69
  70 static int read_machine_id(int fd, char id[34]) {
  71         char id_to_validate[34];
  72         int r;
  73
  74         assert(fd >= 0);
  75         assert(id);
  76
  77         /* Reads a machine ID from a file, validates it, and returns
  78          * it. The returned ID ends in a newline. */
  79
  80         r = loop_read_exact(fd, id_to_validate, 33, false);
  81         if (r < 0)
  82                 return r;
  83
  84         if (id_to_validate[32] != '\n')
  85                 return -EINVAL;
  86
  87         id_to_validate[32] = 0;
  88
  89         if (!id128_is_valid(id_to_validate))
  90                 return -EINVAL;
  91
  92         memcpy(id, id_to_validate, 32);
  93         id[32] = '\n';
  94         id[33] = 0;
  95         return 0;
  96 }
  97
  98 static int write_machine_id(int fd, char id[34]) {
  99         assert(fd >= 0);
 100         assert(id);
 101
 102         if (lseek(fd, 0, SEEK_SET) < 0)
 103                 return -errno;
 104
 105         return loop_write(fd, id, 33, false);
 106 }
 107
 108 static int generate_machine_id(char id[34], const char *root) {
 109         int fd, r;
 110         unsigned char *p;
 111         sd_id128_t buf;
 112         char  *q;
 113         const char *dbus_machine_id;
 114
 115         assert(id);
 116
 117         if (isempty(root))
 118                 dbus_machine_id = "/var/lib/dbus/machine-id";
 119         else
 120                 dbus_machine_id = strjoina(root, "/var/lib/dbus/machine-id");
 121
 122         /* First, try reading the D-Bus machine id, unless it is a symlink */
 123         fd = open(dbus_machine_id, O_RDONLY|O_CLOEXEC|O_NOCTTY|O_NOFOLLOW);
 124         if (fd >= 0) {
 125                 r = read_machine_id(fd, id);
 126                 safe_close(fd);
 127
 128                 if (r >= 0) {
 129                         log_info("Initializing machine ID from D-Bus machine ID.");
 130                         return 0;
 131                 }
 132         }
 133
 134         if (isempty(root)) {
 135                 /* If that didn't work, see if we are running in a container,
 136                  * and a machine ID was passed in via $container_uuid the way
 137                  * libvirt/LXC does it */
 138
 139                 if (detect_container() > 0) {
 140                         _cleanup_free_ char *e = NULL;
 141
 142                         r = getenv_for_pid(1, "container_uuid", &e);
 143                         if (r > 0) {
 144                                 r = shorten_uuid(id, e);
 145                                 if (r >= 0) {
 146                                         log_info("Initializing machine ID from container UUID.");
 147                                         return 0;
 148                                 }
 149                         }
 150
 151                 } else if (detect_vm() == VIRTUALIZATION_KVM) {
 152
 153                         /* If we are not running in a container, see if we are
 154                          * running in qemu/kvm and a machine ID was passed in
 155                          * via -uuid on the qemu/kvm command line */
 156
 157                         char uuid[36];
 158
 159                         fd = open("/sys/class/dmi/id/product_uuid", O_RDONLY|O_CLOEXEC|O_NOCTTY|O_NOFOLLOW);
 160                         if (fd >= 0) {
 161                                 r = loop_read_exact(fd, uuid, 36, false);
 162                                 safe_close(fd);
 163
 164                                 if (r >= 0) {
 165                                         r = shorten_uuid(id, uuid);
 166                                         if (r >= 0) {
 167                                                 log_info("Initializing machine ID from KVM UUID.");
 168                                                 return 0;
 169                                         }
 170                                 }
 171                         }
 172                 }
 173         }
 174
 175         /* If that didn't work, generate a random machine id */
 176         r = sd_id128_randomize(&buf);
 177         if (r < 0)
 178                 return log_error_errno(r, "Failed to open /dev/urandom: %m");
 179
 180         for (p = buf.bytes, q = id; p < buf.bytes + sizeof(buf); p++, q += 2) {
 181                 q[0] = hexchar(*p >> 4);
 182                 q[1] = hexchar(*p & 15);
 183         }
 184
 185         id[32] = '\n';
 186         id[33] = 0;
 187
 188         log_info("Initializing machine ID from random generator.");
 189
 190         return 0;
 191 }
 192
 193 int machine_id_setup(const char *root) {
 194         const char *etc_machine_id, *run_machine_id;
 195         _cleanup_close_ int fd = -1;
 196         bool writable = true;
 197         char id[34]; /* 32 + \n + \0 */
 198         int r;
 199
 200         if (isempty(root))  {
 201                 etc_machine_id = "/etc/machine-id";
 202                 run_machine_id = "/run/machine-id";
 203         } else {
 204                 char *x;
 205
 206                 x = strjoina(root, "/etc/machine-id");
 207                 etc_machine_id = path_kill_slashes(x);
 208
 209                 x = strjoina(root, "/run/machine-id");
 210                 run_machine_id = path_kill_slashes(x);
 211         }
 212
 213         RUN_WITH_UMASK(0000) {
 214                 /* We create this 0444, to indicate that this isn't really
 215                  * something you should ever modify. Of course, since the file
 216                  * will be owned by root it doesn't matter much, but maybe
 217                  * people look. */
 218
 219                 mkdir_parents(etc_machine_id, 0755);
 220                 fd = open(etc_machine_id, O_RDWR|O_CREAT|O_CLOEXEC|O_NOCTTY, 0444);
 221                 if (fd < 0) {
 222                         int old_errno = errno;
 223
 224                         fd = open(etc_machine_id, O_RDONLY|O_CLOEXEC|O_NOCTTY);
 225                         if (fd < 0) {
 226                                 if (old_errno == EROFS && errno == ENOENT)
 227                                         log_error_errno(errno,
 228                                                   "System cannot boot: Missing /etc/machine-id and /etc is mounted read-only.\n"
 229                                                   "Booting up is supported only when:\n"
 230                                                   "1) /etc/machine-id exists and is populated.\n"
 231                                                   "2) /etc/machine-id exists and is empty.\n"
 232                                                   "3) /etc/machine-id is missing and /etc is writable.\n");
 233                                 else
 234                                         log_error_errno(errno, "Cannot open %s: %m", etc_machine_id);
 235
 236                                 return -errno;
 237                         }
 238
 239                         writable = false;
 240                 }
 241         }
 242
 243         if (read_machine_id(fd, id) >= 0)
 244                 return 0;
 245
 246         /* Hmm, so, the id currently stored is not useful, then let's
 247          * generate one */
 248
 249         r = generate_machine_id(id, root);
 250         if (r < 0)
 251                 return r;
 252
 253         if (writable)
 254                 if (write_machine_id(fd, id) >= 0)
 255                         return 0;
 256
 257         fd = safe_close(fd);
 258
 259         /* Hmm, we couldn't write it? So let's write it to
 260          * /run/machine-id as a replacement */
 261
 262         RUN_WITH_UMASK(0022) {
 263                 r = write_string_file(run_machine_id, id, WRITE_STRING_FILE_CREATE);
 264         }
 265         if (r < 0) {
 266                 (void) unlink(run_machine_id);
 267                 return log_error_errno(r, "Cannot write %s: %m", run_machine_id);
 268         }
 269
 270         /* And now, let's mount it over */
 271         if (mount(run_machine_id, etc_machine_id, NULL, MS_BIND, NULL) < 0) {
 272                 (void) unlink_noerrno(run_machine_id);
 273                 return log_error_errno(errno, "Failed to mount %s: %m", etc_machine_id);
 274         }
 275
 276         log_info("Installed transient %s file.", etc_machine_id);
 277
 278         /* Mark the mount read-only */
 279         if (mount(NULL, etc_machine_id, NULL, MS_BIND|MS_RDONLY|MS_REMOUNT, NULL) < 0)
 280                 log_warning_errno(errno, "Failed to make transient %s read-only: %m", etc_machine_id);
 281
 282         return 0;
 283 }
 284
 285 int machine_id_commit(const char *root) {
 286         _cleanup_close_ int fd = -1, initial_mntns_fd = -1;
 287         const char *etc_machine_id;
 288         char id[34]; /* 32 + \n + \0 */
 289         int r;
 290
 291         if (isempty(root))
 292                 etc_machine_id = "/etc/machine-id";
 293         else {
 294                 char *x;
 295
 296                 x = strjoina(root, "/etc/machine-id");
 297                 etc_machine_id = path_kill_slashes(x);
 298         }
 299
 300         r = path_is_mount_point(etc_machine_id, 0);
 301         if (r < 0)
 302                 return log_error_errno(r, "Failed to determine whether %s is a mount point: %m", etc_machine_id);
 303         if (r == 0) {
 304                 log_debug("%s is is not a mount point. Nothing to do.", etc_machine_id);
 305                 return 0;
 306         }
 307
 308         /* Read existing machine-id */
 309         fd = open(etc_machine_id, O_RDONLY|O_CLOEXEC|O_NOCTTY);
 310         if (fd < 0)
 311                 return log_error_errno(errno, "Cannot open %s: %m", etc_machine_id);
 312
 313         r = read_machine_id(fd, id);
 314         if (r < 0)
 315                 return log_error_errno(r, "We didn't find a valid machine ID in %s.", etc_machine_id);
 316
 317         r = fd_is_temporary_fs(fd);
 318         if (r < 0)
 319                 return log_error_errno(r, "Failed to determine whether %s is on a temporary file system: %m", etc_machine_id);
 320         if (r == 0) {
 321                 log_error("%s is not on a temporary file system.", etc_machine_id);
 322                 return -EROFS;
 323         }
 324
 325         fd = safe_close(fd);
 326
 327         /* Store current mount namespace */
 328         r = namespace_open(0, NULL, &initial_mntns_fd, NULL, NULL, NULL);
 329         if (r < 0)
 330                 return log_error_errno(r, "Can't fetch current mount namespace: %m");
 331
 332         /* Switch to a new mount namespace, isolate ourself and unmount etc_machine_id in our new namespace */
 333         if (unshare(CLONE_NEWNS) < 0)
 334                 return log_error_errno(errno, "Failed to enter new namespace: %m");
 335
 336         if (mount(NULL, "/", NULL, MS_SLAVE | MS_REC, NULL) < 0)
 337                 return log_error_errno(errno, "Couldn't make-rslave / mountpoint in our private namespace: %m");
 338
 339         if (umount(etc_machine_id) < 0)
 340                 return log_error_errno(errno, "Failed to unmount transient %s file in our private namespace: %m", etc_machine_id);
 341
 342         /* Update a persistent version of etc_machine_id */
 343         fd = open(etc_machine_id, O_RDWR|O_CREAT|O_CLOEXEC|O_NOCTTY, 0444);
 344         if (fd < 0)
 345                 return log_error_errno(errno, "Cannot open for writing %s. This is mandatory to get a persistent machine-id: %m", etc_machine_id);
 346
 347         r = write_machine_id(fd, id);
 348         if (r < 0)
 349                 return log_error_errno(r, "Cannot write %s: %m", etc_machine_id);
 350
 351         fd = safe_close(fd);
 352
 353         /* Return to initial namespace and proceed a lazy tmpfs unmount */
 354         r = namespace_enter(-1, initial_mntns_fd, -1, -1, -1);
 355         if (r < 0)
 356                 return log_warning_errno(r, "Failed to switch back to initial mount namespace: %m.\nWe'll keep transient %s file until next reboot.", etc_machine_id);
 357
 358         if (umount2(etc_machine_id, MNT_DETACH) < 0)
 359                 return log_warning_errno(errno, "Failed to unmount transient %s file: %m.\nWe keep that mount until next reboot.", etc_machine_id);
 360
 361         return 0;
 362 }