src/import/import-raw.c

   1 /*-*- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil -*-*/
   2
   3 /***
   4   This file is part of systemd.
   5
   6   Copyright 2015 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 <linux/fs.h>
  23
  24 #include "sd-daemon.h"
  25 #include "sd-event.h"
  26 #include "util.h"
  27 #include "path-util.h"
  28 #include "btrfs-util.h"
  29 #include "copy.h"
  30 #include "mkdir.h"
  31 #include "rm-rf.h"
  32 #include "ratelimit.h"
  33 #include "machine-pool.h"
  34 #include "qcow2-util.h"
  35 #include "import-compress.h"
  36 #include "import-common.h"
  37 #include "import-raw.h"
  38
  39 struct RawImport {
  40         sd_event *event;
  41
  42         char *image_root;
  43
  44         RawImportFinished on_finished;
  45         void *userdata;
  46
  47         char *local;
  48         bool force_local;
  49         bool read_only;
  50         bool grow_machine_directory;
  51
  52         char *temp_path;
  53         char *final_path;
  54
  55         int input_fd;
  56         int output_fd;
  57
  58         ImportCompress compress;
  59
  60         uint64_t written_since_last_grow;
  61
  62         sd_event_source *input_event_source;
  63
  64         uint8_t buffer[16*1024];
  65         size_t buffer_size;
  66
  67         uint64_t written_compressed;
  68         uint64_t written_uncompressed;
  69
  70         struct stat st;
  71
  72         unsigned last_percent;
  73         RateLimit progress_rate_limit;
  74 };
  75
  76 RawImport* raw_import_unref(RawImport *i) {
  77         if (!i)
  78                 return NULL;
  79
  80         sd_event_unref(i->event);
  81
  82         if (i->temp_path) {
  83                 (void) unlink(i->temp_path);
  84                 free(i->temp_path);
  85         }
  86
  87         import_compress_free(&i->compress);
  88
  89         sd_event_source_unref(i->input_event_source);
  90
  91         safe_close(i->output_fd);
  92
  93         free(i->final_path);
  94         free(i->image_root);
  95         free(i->local);
  96         free(i);
  97
  98         return NULL;
  99 }
 100
 101 int raw_import_new(
 102                 RawImport **ret,
 103                 sd_event *event,
 104                 const char *image_root,
 105                 RawImportFinished on_finished,
 106                 void *userdata) {
 107
 108         _cleanup_(raw_import_unrefp) RawImport *i = NULL;
 109         int r;
 110
 111         assert(ret);
 112
 113         i = new0(RawImport, 1);
 114         if (!i)
 115                 return -ENOMEM;
 116
 117         i->input_fd = i->output_fd = -1;
 118         i->on_finished = on_finished;
 119         i->userdata = userdata;
 120
 121         RATELIMIT_INIT(i->progress_rate_limit, 100 * USEC_PER_MSEC, 1);
 122         i->last_percent = (unsigned) -1;
 123
 124         i->image_root = strdup(image_root ?: "/var/lib/machines");
 125         if (!i->image_root)
 126                 return -ENOMEM;
 127
 128         i->grow_machine_directory = path_startswith(i->image_root, "/var/lib/machines");
 129
 130         if (event)
 131                 i->event = sd_event_ref(event);
 132         else {
 133                 r = sd_event_default(&i->event);
 134                 if (r < 0)
 135                         return r;
 136         }
 137
 138         *ret = i;
 139         i = NULL;
 140
 141         return 0;
 142 }
 143
 144 static void raw_import_report_progress(RawImport *i) {
 145         unsigned percent;
 146         assert(i);
 147
 148         /* We have no size information, unless the source is a regular file */
 149         if (!S_ISREG(i->st.st_mode))
 150                 return;
 151
 152         if (i->written_compressed >= (uint64_t) i->st.st_size)
 153                 percent = 100;
 154         else
 155                 percent = (unsigned) ((i->written_compressed * UINT64_C(100)) / (uint64_t) i->st.st_size);
 156
 157         if (percent == i->last_percent)
 158                 return;
 159
 160         if (!ratelimit_test(&i->progress_rate_limit))
 161                 return;
 162
 163         sd_notifyf(false, "X_IMPORT_PROGRESS=%u", percent);
 164         log_info("Imported %u%%.", percent);
 165
 166         i->last_percent = percent;
 167 }
 168
 169 static int raw_import_maybe_convert_qcow2(RawImport *i) {
 170         _cleanup_close_ int converted_fd = -1;
 171         _cleanup_free_ char *t = NULL;
 172         int r;
 173
 174         assert(i);
 175
 176         r = qcow2_detect(i->output_fd);
 177         if (r < 0)
 178                 return log_error_errno(r, "Failed to detect whether this is a QCOW2 image: %m");
 179         if (r == 0)
 180                 return 0;
 181
 182         /* This is a QCOW2 image, let's convert it */
 183         r = tempfn_random(i->final_path, &t);
 184         if (r < 0)
 185                 return log_oom();
 186
 187         converted_fd = open(t, O_RDWR|O_CREAT|O_EXCL|O_NOCTTY|O_CLOEXEC, 0664);
 188         if (converted_fd < 0)
 189                 return log_error_errno(errno, "Failed to create %s: %m", t);
 190
 191         r = chattr_fd(converted_fd, true, FS_NOCOW_FL);
 192         if (r < 0)
 193                 log_warning_errno(errno, "Failed to set file attributes on %s: %m", t);
 194
 195         log_info("Unpacking QCOW2 file.");
 196
 197         r = qcow2_convert(i->output_fd, converted_fd);
 198         if (r < 0) {
 199                 unlink(t);
 200                 return log_error_errno(r, "Failed to convert qcow2 image: %m");
 201         }
 202
 203         (void) unlink(i->temp_path);
 204         free(i->temp_path);
 205         i->temp_path = t;
 206         t = NULL;
 207
 208         safe_close(i->output_fd);
 209         i->output_fd = converted_fd;
 210         converted_fd = -1;
 211
 212         return 1;
 213 }
 214
 215 static int raw_import_finish(RawImport *i) {
 216         int r;
 217
 218         assert(i);
 219         assert(i->output_fd >= 0);
 220         assert(i->temp_path);
 221         assert(i->final_path);
 222
 223         /* In case this was a sparse file, make sure the file system is right */
 224         if (i->written_uncompressed > 0) {
 225                 if (ftruncate(i->output_fd, i->written_uncompressed) < 0)
 226                         return log_error_errno(errno, "Failed to truncate file: %m");
 227         }
 228
 229         r = raw_import_maybe_convert_qcow2(i);
 230         if (r < 0)
 231                 return r;
 232
 233         if (S_ISREG(i->st.st_mode)) {
 234                 (void) copy_times(i->input_fd, i->output_fd);
 235                 (void) copy_xattr(i->input_fd, i->output_fd);
 236         }
 237
 238         if (i->read_only) {
 239                 r = import_make_read_only_fd(i->output_fd);
 240                 if (r < 0)
 241                         return r;
 242         }
 243
 244         if (i->force_local) {
 245                 (void) btrfs_subvol_remove(i->final_path);
 246                 (void) rm_rf(i->final_path, REMOVE_ROOT|REMOVE_PHYSICAL);
 247         }
 248
 249         r = rename_noreplace(AT_FDCWD, i->temp_path, AT_FDCWD, i->final_path);
 250         if (r < 0)
 251                 return log_error_errno(r, "Failed to move image into place: %m");
 252
 253         free(i->temp_path);
 254         i->temp_path = NULL;
 255
 256         return 0;
 257 }
 258
 259 static int raw_import_open_disk(RawImport *i) {
 260         int r;
 261
 262         assert(i);
 263
 264         assert(!i->final_path);
 265         assert(!i->temp_path);
 266         assert(i->output_fd < 0);
 267
 268         i->final_path = strjoin(i->image_root, "/", i->local, ".raw", NULL);
 269         if (!i->final_path)
 270                 return log_oom();
 271
 272         r = tempfn_random(i->final_path, &i->temp_path);
 273         if (r < 0)
 274                 return log_oom();
 275
 276         (void) mkdir_parents_label(i->temp_path, 0700);
 277
 278         i->output_fd = open(i->temp_path, O_RDWR|O_CREAT|O_EXCL|O_NOCTTY|O_CLOEXEC, 0664);
 279         if (i->output_fd < 0)
 280                 return log_error_errno(errno, "Failed to open destination %s: %m", i->temp_path);
 281
 282         r = chattr_fd(i->output_fd, true, FS_NOCOW_FL);
 283         if (r < 0)
 284                 log_warning_errno(errno, "Failed to set file attributes on %s: %m", i->temp_path);
 285
 286         return 0;
 287 }
 288
 289 static int raw_import_try_reflink(RawImport *i) {
 290         off_t p;
 291         int r;
 292
 293         assert(i);
 294         assert(i->input_fd >= 0);
 295         assert(i->output_fd >= 0);
 296
 297         if (i->compress.type != IMPORT_COMPRESS_UNCOMPRESSED)
 298                 return 0;
 299
 300         if (!S_ISREG(i->st.st_mode))
 301                 return 0;
 302
 303         p = lseek(i->input_fd, 0, SEEK_CUR);
 304         if (p == (off_t) -1)
 305                 return log_error_errno(errno, "Failed to read file offset of input file: %m");
 306
 307         /* Let's only try a btrfs reflink, if we are reading from the beginning of the file */
 308         if ((uint64_t) p != (uint64_t) i->buffer_size)
 309                 return 0;
 310
 311         r = btrfs_reflink(i->input_fd, i->output_fd);
 312         if (r >= 0)
 313                 return 1;
 314
 315         return 0;
 316 }
 317
 318 static int raw_import_write(const void *p, size_t sz, void *userdata) {
 319         RawImport *i = userdata;
 320         ssize_t n;
 321
 322         if (i->grow_machine_directory && i->written_since_last_grow >= GROW_INTERVAL_BYTES) {
 323                 i->written_since_last_grow = 0;
 324                 grow_machine_directory();
 325         }
 326
 327         n = sparse_write(i->output_fd, p, sz, 64);
 328         if (n < 0)
 329                 return -errno;
 330         if ((size_t) n < sz)
 331                 return -EIO;
 332
 333         i->written_uncompressed += sz;
 334         i->written_since_last_grow += sz;
 335
 336         return 0;
 337 }
 338
 339 static int raw_import_process(RawImport *i) {
 340         ssize_t l;
 341         int r;
 342
 343         assert(i);
 344         assert(i->buffer_size < sizeof(i->buffer));
 345
 346         l = read(i->input_fd, i->buffer + i->buffer_size, sizeof(i->buffer) - i->buffer_size);
 347         if (l < 0) {
 348                 if (errno == EAGAIN)
 349                         return 0;
 350
 351                 r = log_error_errno(errno, "Failed to read input file: %m");
 352                 goto finish;
 353         }
 354         if (l == 0) {
 355                 if (i->compress.type == IMPORT_COMPRESS_UNKNOWN) {
 356                         log_error("Premature end of file: %m");
 357                         r = -EIO;
 358                         goto finish;
 359                 }
 360
 361                 r = raw_import_finish(i);
 362                 goto finish;
 363         }
 364
 365         i->buffer_size += l;
 366
 367         if (i->compress.type == IMPORT_COMPRESS_UNKNOWN) {
 368                 r = import_uncompress_detect(&i->compress, i->buffer, i->buffer_size);
 369                 if (r < 0) {
 370                         log_error("Failed to detect file compression: %m");
 371                         goto finish;
 372                 }
 373                 if (r == 0) /* Need more data */
 374                         return 0;
 375
 376                 r = raw_import_open_disk(i);
 377                 if (r < 0)
 378                         goto finish;
 379
 380                 r = raw_import_try_reflink(i);
 381                 if (r < 0)
 382                         goto finish;
 383                 if (r > 0) {
 384                         r = raw_import_finish(i);
 385                         goto finish;
 386                 }
 387         }
 388
 389         r = import_uncompress(&i->compress, i->buffer, i->buffer_size, raw_import_write, i);
 390         if (r < 0) {
 391                 log_error_errno(r, "Failed to decode and write: %m");
 392                 goto finish;
 393         }
 394
 395         i->written_compressed += i->buffer_size;
 396         i->buffer_size = 0;
 397
 398         raw_import_report_progress(i);
 399
 400         return 0;
 401
 402 finish:
 403         if (i->on_finished)
 404                 i->on_finished(i, r, i->userdata);
 405         else
 406                 sd_event_exit(i->event, r);
 407
 408         return 0;
 409 }
 410
 411 static int raw_import_on_input(sd_event_source *s, int fd, uint32_t revents, void *userdata) {
 412         RawImport *i = userdata;
 413
 414         return raw_import_process(i);
 415 }
 416
 417 static int raw_import_on_defer(sd_event_source *s, void *userdata) {
 418         RawImport *i = userdata;
 419
 420         return raw_import_process(i);
 421 }
 422
 423 int raw_import_start(RawImport *i, int fd, const char *local, bool force_local, bool read_only) {
 424         int r;
 425
 426         assert(i);
 427         assert(fd >= 0);
 428         assert(local);
 429
 430         if (!machine_name_is_valid(local))
 431                 return -EINVAL;
 432
 433         if (i->input_fd >= 0)
 434                 return -EBUSY;
 435
 436         r = fd_nonblock(fd, true);
 437         if (r < 0)
 438                 return r;
 439
 440         r = free_and_strdup(&i->local, local);
 441         if (r < 0)
 442                 return r;
 443         i->force_local = force_local;
 444         i->read_only = read_only;
 445
 446         if (fstat(fd, &i->st) < 0)
 447                 return -errno;
 448
 449         r = sd_event_add_io(i->event, &i->input_event_source, fd, EPOLLIN, raw_import_on_input, i);
 450         if (r == -EPERM) {
 451                 /* This fd does not support epoll, for example because it is a regular file. Busy read in that case */
 452                 r = sd_event_add_defer(i->event, &i->input_event_source, raw_import_on_defer, i);
 453                 if (r < 0)
 454                         return r;
 455
 456                 r = sd_event_source_set_enabled(i->input_event_source, SD_EVENT_ON);
 457         }
 458         if (r < 0)
 459                 return r;
 460
 461         i->input_fd = fd;
 462         return r;
 463 }