filesetup.c

   1 #include <unistd.h>
   2 #include <fcntl.h>
   3 #include <string.h>
   4 #include <assert.h>
   5 #include <dirent.h>
   6 #include <sys/stat.h>
   7 #include <sys/mman.h>
   8 #include <sys/types.h>
   9
  10 #include "fio.h"
  11 #include "os.h"
  12
  13 static int extend_file(struct thread_data *td, struct fio_file *f)
  14 {
  15         int r, new_layout = 0, flags;
  16         unsigned long long left;
  17         unsigned int bs;
  18         char *b;
  19
  20         /*
  21          * check if we need to lay the file out complete again. fio
  22          * does that for operations involving reads, or for writes
  23          * where overwrite is set
  24          */
  25         if (td_read(td) || (td_write(td) && td->o.overwrite))
  26                 new_layout = 1;
  27
  28         if (new_layout && (f->flags & FIO_FILE_EXISTS)) {
  29                 if (unlink(f->file_name) < 0) {
  30                         td_verror(td, errno, "unlink");
  31                         return 1;
  32                 }
  33         }
  34
  35         flags = O_WRONLY | O_CREAT;
  36         if (new_layout)
  37                 flags |= O_TRUNC;
  38
  39         f->fd = open(f->file_name, flags, 0644);
  40         if (f->fd < 0) {
  41                 td_verror(td, errno, "open");
  42                 return 1;
  43         }
  44
  45         if (ftruncate(f->fd, f->real_file_size) == -1) {
  46                 td_verror(td, errno, "ftruncate");
  47                 goto err;
  48         }
  49
  50         if (posix_fallocate(f->fd, 0, f->real_file_size) < 0) {
  51                 td_verror(td, errno, "posix_fallocate");
  52                 goto err;
  53         }
  54
  55         if (!new_layout)
  56                 goto done;
  57
  58         b = malloc(td->o.max_bs[DDIR_WRITE]);
  59         memset(b, 0, td->o.max_bs[DDIR_WRITE]);
  60
  61         left = f->real_file_size;
  62         while (left && !td->terminate) {
  63                 bs = td->o.max_bs[DDIR_WRITE];
  64                 if (bs > left)
  65                         bs = left;
  66
  67                 r = write(f->fd, b, bs);
  68
  69                 if (r == (int) bs) {
  70                         left -= bs;
  71                         continue;
  72                 } else {
  73                         if (r < 0)
  74                                 td_verror(td, errno, "write");
  75                         else
  76                                 td_verror(td, EIO, "write");
  77
  78                         break;
  79                 }
  80         }
  81
  82         if (td->terminate)
  83                 unlink(f->file_name);
  84         else if (td->o.create_fsync)
  85                 fsync(f->fd);
  86
  87         free(b);
  88 done:
  89         close(f->fd);
  90         f->fd = -1;
  91         return 0;
  92 err:
  93         close(f->fd);
  94         f->fd = -1;
  95         return 1;
  96 }
  97
  98 static unsigned long long get_rand_file_size(struct thread_data *td)
  99 {
 100         unsigned long long ret;
 101         long r;
 102
 103         r = os_random_long(&td->file_size_state);
 104         ret = td->o.file_size_low + (unsigned long long) ((double) td->o.file_size_high * (r / (RAND_MAX + 1.0)));
 105         ret -= (ret % td->o.rw_min_bs);
 106         return ret;
 107 }
 108
 109 static int file_size(struct thread_data *td, struct fio_file *f)
 110 {
 111         struct stat st;
 112
 113         if (fstat(f->fd, &st) == -1) {
 114                 td_verror(td, errno, "fstat");
 115                 return 1;
 116         }
 117
 118         f->real_file_size = st.st_size;
 119         return 0;
 120 }
 121
 122 static int bdev_size(struct thread_data *td, struct fio_file *f)
 123 {
 124         unsigned long long bytes;
 125         int r;
 126
 127         r = blockdev_size(f->fd, &bytes);
 128         if (r) {
 129                 td_verror(td, r, "blockdev_size");
 130                 return 1;
 131         }
 132
 133         f->real_file_size = bytes;
 134         return 0;
 135 }
 136
 137 static int get_file_size(struct thread_data *td, struct fio_file *f)
 138 {
 139         int ret = 0;
 140
 141         if (f->filetype == FIO_TYPE_FILE)
 142                 ret = file_size(td, f);
 143         else if (f->filetype == FIO_TYPE_BD)
 144                 ret = bdev_size(td, f);
 145         else
 146                 f->real_file_size = -1;
 147
 148         if (ret)
 149                 return ret;
 150
 151         if (f->file_offset > f->real_file_size) {
 152                 log_err("%s: offset extends end (%Lu > %Lu)\n", td->o.name, f->file_offset, f->real_file_size);
 153                 return 1;
 154         }
 155
 156         return 0;
 157 }
 158
 159 int file_invalidate_cache(struct thread_data *td, struct fio_file *f)
 160 {
 161         int ret = 0;
 162
 163         if (td->o.odirect)
 164                 return 0;
 165
 166         /*
 167          * FIXME: add blockdev flushing too
 168          */
 169         if (f->mmap)
 170                 ret = madvise(f->mmap, f->io_size, MADV_DONTNEED);
 171         else if (f->filetype == FIO_TYPE_FILE)
 172                 ret = fadvise(f->fd, f->file_offset, f->io_size, POSIX_FADV_DONTNEED);
 173         else if (f->filetype == FIO_TYPE_BD) {
 174                 ret = blockdev_invalidate_cache(f->fd);
 175                 if (ret < 0 && errno == EACCES && geteuid()) {
 176                         log_err("fio: only root may flush block devices. Cache flush bypassed!\n");
 177                         ret = 0;
 178                 }
 179         } else if (f->filetype == FIO_TYPE_CHAR)
 180                 ret = 0;
 181
 182         if (ret < 0) {
 183                 td_verror(td, errno, "invalidate_cache");
 184                 return 1;
 185         }
 186
 187         return ret;
 188 }
 189
 190 void generic_close_file(struct thread_data fio_unused *td, struct fio_file *f)
 191 {
 192         close(f->fd);
 193         f->fd = -1;
 194 }
 195
 196 int generic_open_file(struct thread_data *td, struct fio_file *f)
 197 {
 198         int flags = 0;
 199
 200         if (td->o.odirect)
 201                 flags |= OS_O_DIRECT;
 202         if (td->o.sync_io)
 203                 flags |= O_SYNC;
 204
 205         if (td_write(td) || td_rw(td)) {
 206                 flags |= O_RDWR;
 207
 208                 if (f->filetype == FIO_TYPE_FILE)
 209                         flags |= O_CREAT;
 210
 211                 f->fd = open(f->file_name, flags, 0600);
 212         } else {
 213                 if (f->filetype == FIO_TYPE_CHAR)
 214                         flags |= O_RDWR;
 215                 else
 216                         flags |= O_RDONLY;
 217
 218                 f->fd = open(f->file_name, flags);
 219         }
 220
 221         if (f->fd == -1) {
 222                 char buf[FIO_VERROR_SIZE];
 223                 int __e = errno;
 224
 225                 snprintf(buf, sizeof(buf) - 1, "open(%s)", f->file_name);
 226
 227                 td_verror(td, __e, buf);
 228         }
 229
 230         if (get_file_size(td, f))
 231                 goto err;
 232
 233         return 0;
 234 err:
 235         close(f->fd);
 236         return 1;
 237 }
 238
 239 int open_files(struct thread_data *td)
 240 {
 241         struct fio_file *f;
 242         unsigned int i;
 243         int err = 0;
 244
 245         for_each_file(td, f, i) {
 246                 err = td_io_open_file(td, f);
 247                 if (err) {
 248                         if (td->error == EMFILE) {
 249                                 log_err("fio: limited open files to: %d\n", td->nr_open_files);
 250                                 td->o.open_files = td->nr_open_files;
 251                                 err = 0;
 252                                 clear_error(td);
 253                         }
 254                         break;
 255                 }
 256
 257                 if (td->o.open_files == td->nr_open_files)
 258                         break;
 259         }
 260
 261         if (!err)
 262                 return 0;
 263
 264         for_each_file(td, f, i)
 265                 td_io_close_file(td, f);
 266
 267         return err;
 268 }
 269
 270 /*
 271  * open/close all files, so that ->real_file_size gets set
 272  */
 273 static void get_file_sizes(struct thread_data *td)
 274 {
 275         struct fio_file *f;
 276         unsigned int i;
 277
 278         for_each_file(td, f, i) {
 279                 if (td->io_ops->open_file(td, f)) {
 280                         td->error = 0;
 281                         memset(td->verror, 0, sizeof(td->verror));
 282                 } else
 283                         td->io_ops->close_file(td, f);
 284         }
 285 }
 286
 287 /*
 288  * Open the files and setup files sizes, creating files if necessary.
 289  */
 290 int setup_files(struct thread_data *td)
 291 {
 292         unsigned long long total_size, extend_size;
 293         struct fio_file *f;
 294         unsigned int i;
 295         int err = 0, need_extend;
 296
 297         /*
 298          * if ioengine defines a setup() method, it's responsible for
 299          * opening the files and setting f->real_file_size to indicate
 300          * the valid range for that file.
 301          */
 302         if (td->io_ops->setup)
 303                 err = td->io_ops->setup(td);
 304         else
 305                 get_file_sizes(td);
 306
 307         if (err)
 308                 return err;
 309
 310         /*
 311          * check sizes. if the files/devices do not exist and the size
 312          * isn't passed to fio, abort.
 313          */
 314         total_size = 0;
 315         for_each_file(td, f, i) {
 316                 if (f->real_file_size == -1ULL)
 317                         total_size = -1ULL;
 318                 else
 319                         total_size += f->real_file_size;
 320         }
 321
 322         /*
 323          * device/file sizes are zero and no size given, punt
 324          */
 325         if (!total_size && !td->o.size) {
 326                 log_err("%s: you need to specify size=\n", td->o.name);
 327                 td_verror(td, EINVAL, "total_file_size");
 328                 return 1;
 329         }
 330
 331         /*
 332          * now file sizes are known, so we can set ->io_size. if size= is
 333          * not given, ->io_size is just equal to ->real_file_size. if size
 334          * is given, ->io_size is size / nr_files.
 335          */
 336         extend_size = total_size = 0;
 337         need_extend = 0;
 338         for_each_file(td, f, i) {
 339                 if (!td->o.file_size_low) {
 340                         /*
 341                          * no file size range given, file size is equal to
 342                          * total size divided by number of files. if that is
 343                          * zero, set it to the real file size.
 344                          */
 345                         f->io_size = td->o.size / td->o.nr_files;
 346                         if (!f->io_size)
 347                                 f->io_size = f->real_file_size;
 348                 } else if (f->real_file_size < td->o.file_size_low ||
 349                            f->real_file_size > td->o.file_size_high) {
 350                         /*
 351                          * file size given. if it's fixed, use that. if it's a
 352                          * range, generate a random size in-between.
 353                          */
 354                         if (td->o.file_size_low == td->o.file_size_high)
 355                                 f->io_size = td->o.file_size_low;
 356                         else
 357                                 f->io_size = get_rand_file_size(td);
 358                 } else
 359                         f->io_size = f->real_file_size;
 360
 361                 if (f->io_size == -1ULL)
 362                         total_size = -1ULL;
 363                 else
 364                         total_size += f->io_size;
 365
 366                 if (f->filetype == FIO_TYPE_FILE &&
 367                     f->io_size > f->real_file_size &&
 368                     !(td->io_ops->flags & FIO_DISKLESSIO)) {
 369                         need_extend++;
 370                         extend_size += f->io_size;
 371                         f->flags |= FIO_FILE_EXTEND;
 372                 }
 373         }
 374
 375         if (!td->o.size)
 376                 td->o.size = total_size;
 377
 378         /*
 379          * See if we need to extend some files
 380          */
 381         if (need_extend) {
 382                 temp_stall_ts = 1;
 383                 log_info("%s: Laying out IO file(s) (%u files / %LuMiB)\n",
 384                         td->o.name, need_extend, extend_size >> 20);
 385
 386                 for_each_file(td, f, i) {
 387                         if (!(f->flags & FIO_FILE_EXTEND))
 388                                 continue;
 389
 390                         f->flags &= ~FIO_FILE_EXTEND;
 391                         f->real_file_size = f->io_size;
 392                         err = extend_file(td, f);
 393                         if (err)
 394                                 break;
 395                 }
 396                 temp_stall_ts = 0;
 397         }
 398
 399         if (err)
 400                 return err;
 401
 402         if (!td->o.zone_size)
 403                 td->o.zone_size = td->o.size;
 404
 405         td->total_io_size = td->o.size * td->o.loops;
 406         return 0;
 407 }
 408
 409 int init_random_map(struct thread_data *td)
 410 {
 411         int num_maps, blocks;
 412         struct fio_file *f;
 413         unsigned int i;
 414
 415         if (td->o.norandommap)
 416                 return 0;
 417
 418         for_each_file(td, f, i) {
 419                 blocks = (f->real_file_size + td->o.rw_min_bs - 1) / td->o.rw_min_bs;
 420                 num_maps = (blocks + BLOCKS_PER_MAP-1)/ BLOCKS_PER_MAP;
 421                 f->file_map = malloc(num_maps * sizeof(long));
 422                 if (!f->file_map) {
 423                         log_err("fio: failed allocating random map. If running a large number of jobs, try the 'norandommap' option\n");
 424                         return 1;
 425                 }
 426                 f->num_maps = num_maps;
 427                 memset(f->file_map, 0, num_maps * sizeof(long));
 428         }
 429
 430         return 0;
 431 }
 432
 433 void close_files(struct thread_data *td)
 434 {
 435         struct fio_file *f;
 436         unsigned int i;
 437
 438         for_each_file(td, f, i) {
 439                 if ((f->flags & FIO_FILE_UNLINK) &&
 440                     f->filetype == FIO_TYPE_FILE)
 441                         unlink(f->file_name);
 442
 443                 td_io_close_file(td, f);
 444
 445                 free(f->file_name);
 446                 f->file_name = NULL;
 447
 448                 if (f->file_map) {
 449                         free(f->file_map);
 450                         f->file_map = NULL;
 451                 }
 452         }
 453
 454         td->o.filename = NULL;
 455         free(td->files);
 456         td->files = NULL;
 457         td->o.nr_files = 0;
 458 }
 459
 460 static void get_file_type(struct fio_file *f)
 461 {
 462         struct stat sb;
 463
 464         f->filetype = FIO_TYPE_FILE;
 465
 466         if (!lstat(f->file_name, &sb)) {
 467                 if (S_ISBLK(sb.st_mode))
 468                         f->filetype = FIO_TYPE_BD;
 469                 else if (S_ISCHR(sb.st_mode))
 470                         f->filetype = FIO_TYPE_CHAR;
 471         }
 472 }
 473
 474 void add_file(struct thread_data *td, const char *fname)
 475 {
 476         int cur_files = td->files_index;
 477         char file_name[PATH_MAX];
 478         struct fio_file *f;
 479         int len = 0;
 480
 481         td->files = realloc(td->files, (cur_files + 1) * sizeof(*f));
 482
 483         f = &td->files[cur_files];
 484         memset(f, 0, sizeof(*f));
 485         f->fd = -1;
 486
 487         if (td->o.directory)
 488                 len = sprintf(file_name, "%s/", td->o.directory);
 489
 490         sprintf(file_name + len, "%s", fname);
 491         f->file_name = strdup(file_name);
 492
 493         get_file_type(f);
 494
 495         td->files_index++;
 496         if (f->filetype == FIO_TYPE_FILE)
 497                 td->nr_normal_files++;
 498 }
 499
 500 void get_file(struct fio_file *f)
 501 {
 502         f->references++;
 503 }
 504
 505 void put_file(struct thread_data *td, struct fio_file *f)
 506 {
 507         if (!(f->flags & FIO_FILE_OPEN))
 508                 return;
 509
 510         assert(f->references);
 511         if (--f->references)
 512                 return;
 513
 514         if (should_fsync(td) && td->o.fsync_on_close)
 515                 fsync(f->fd);
 516
 517         if (td->io_ops->close_file)
 518                 td->io_ops->close_file(td, f);
 519         td->nr_open_files--;
 520         f->flags &= ~FIO_FILE_OPEN;
 521 }
 522
 523 static int recurse_dir(struct thread_data *td, const char *dirname)
 524 {
 525         struct dirent *dir;
 526         int ret = 0;
 527         DIR *D;
 528
 529         D = opendir(dirname);
 530         if (!D) {
 531                 char buf[FIO_VERROR_SIZE];
 532
 533                 snprintf(buf, FIO_VERROR_SIZE - 1, "opendir(%s)", dirname);
 534                 td_verror(td, errno, buf);
 535                 return 1;
 536         }
 537
 538         while ((dir = readdir(D)) != NULL) {
 539                 char full_path[PATH_MAX];
 540                 struct stat sb;
 541
 542                 if (!strcmp(dir->d_name, ".") || !strcmp(dir->d_name, ".."))
 543                         continue;
 544
 545                 sprintf(full_path, "%s/%s", dirname, dir->d_name);
 546
 547                 if (lstat(full_path, &sb) == -1) {
 548                         if (errno != ENOENT) {
 549                                 td_verror(td, errno, "stat");
 550                                 return 1;
 551                         }
 552                 }
 553
 554                 if (S_ISREG(sb.st_mode)) {
 555                         add_file(td, full_path);
 556                         td->o.nr_files++;
 557                         continue;
 558                 }
 559                 if (!S_ISDIR(sb.st_mode))
 560                         continue;
 561
 562                 if ((ret = recurse_dir(td, full_path)) != 0)
 563                         break;
 564         }
 565
 566         closedir(D);
 567         return ret;
 568 }
 569
 570 int add_dir_files(struct thread_data *td, const char *path)
 571 {
 572         int ret = recurse_dir(td, path);
 573
 574         if (!ret)
 575                 log_info("fio: opendir added %d files\n", td->o.nr_files);
 576
 577         return ret;
 578 }
 579
 580 void dup_files(struct thread_data *td, struct thread_data *org)
 581 {
 582         struct fio_file *f;
 583         unsigned int i;
 584         size_t bytes;
 585
 586         if (!org->files)
 587                 return;
 588
 589         bytes = org->files_index * sizeof(*f);
 590         td->files = malloc(bytes);
 591         memcpy(td->files, org->files, bytes);
 592
 593         for_each_file(td, f, i) {
 594                 if (f->file_name)
 595                         f->file_name = strdup(f->file_name);
 596         }
 597 }