filesetup.c

   1 #include <unistd.h>
   2 #include <fcntl.h>
   3 #include <string.h>
   4 #include <assert.h>
   5 #include <dirent.h>
   6 #include <libgen.h>
   7 #include <sys/stat.h>
   8 #include <sys/mman.h>
   9 #include <sys/types.h>
  10
  11 #include "fio.h"
  12 #include "smalloc.h"
  13 #include "filehash.h"
  14 #include "os/os.h"
  15 #include "hash.h"
  16 #include "lib/bitmap.h"
  17
  18 #ifdef FIO_HAVE_LINUX_FALLOCATE
  19 #include <linux/falloc.h>
  20 #endif
  21
  22 static int root_warn;
  23
  24 static inline void clear_error(struct thread_data *td)
  25 {
  26         td->error = 0;
  27         td->verror[0] = '\0';
  28 }
  29
  30 /*
  31  * Leaves f->fd open on success, caller must close
  32  */
  33 static int extend_file(struct thread_data *td, struct fio_file *f)
  34 {
  35         int r, new_layout = 0, unlink_file = 0, flags;
  36         unsigned long long left;
  37         unsigned int bs;
  38         char *b;
  39
  40         if (read_only) {
  41                 log_err("fio: refusing extend of file due to read-only\n");
  42                 return 0;
  43         }
  44
  45         /*
  46          * check if we need to lay the file out complete again. fio
  47          * does that for operations involving reads, or for writes
  48          * where overwrite is set
  49          */
  50         if (td_read(td) || (td_write(td) && td->o.overwrite) ||
  51             (td_write(td) && td->io_ops->flags & FIO_NOEXTEND))
  52                 new_layout = 1;
  53         if (td_write(td) && !td->o.overwrite)
  54                 unlink_file = 1;
  55
  56         if (unlink_file || new_layout) {
  57                 dprint(FD_FILE, "layout unlink %s\n", f->file_name);
  58                 if ((unlink(f->file_name) < 0) && (errno != ENOENT)) {
  59                         td_verror(td, errno, "unlink");
  60                         return 1;
  61                 }
  62         }
  63
  64         flags = O_WRONLY | O_CREAT;
  65         if (new_layout)
  66                 flags |= O_TRUNC;
  67
  68         dprint(FD_FILE, "open file %s, flags %x\n", f->file_name, flags);
  69         f->fd = open(f->file_name, flags, 0644);
  70         if (f->fd < 0) {
  71                 td_verror(td, errno, "open");
  72                 return 1;
  73         }
  74
  75 #ifdef FIO_HAVE_FALLOCATE
  76         if (!td->o.fill_device) {
  77                 switch (td->o.fallocate_mode) {
  78                 case FIO_FALLOCATE_NONE:
  79                         break;
  80                 case FIO_FALLOCATE_POSIX:
  81                         dprint(FD_FILE, "posix_fallocate file %s size %llu\n",
  82                                  f->file_name, f->real_file_size);
  83
  84                         r = posix_fallocate(f->fd, 0, f->real_file_size);
  85                         if (r > 0) {
  86                                 log_err("fio: posix_fallocate fails: %s\n",
  87                                                 strerror(r));
  88                         }
  89                         break;
  90 #ifdef FIO_HAVE_LINUX_FALLOCATE
  91                 case FIO_FALLOCATE_KEEP_SIZE:
  92                         dprint(FD_FILE,
  93                                 "fallocate(FALLOC_FL_KEEP_SIZE) "
  94                                 "file %s size %llu\n",
  95                                 f->file_name, f->real_file_size);
  96
  97                         r = fallocate(f->fd, FALLOC_FL_KEEP_SIZE, 0,
  98                                         f->real_file_size);
  99                         if (r != 0) {
 100                                 td_verror(td, errno, "fallocate");
 101                         }
 102                         break;
 103 #endif /* FIO_HAVE_LINUX_FALLOCATE */
 104                 default:
 105                         log_err("fio: unknown fallocate mode: %d\n",
 106                                 td->o.fallocate_mode);
 107                         assert(0);
 108                 }
 109         }
 110 #endif /* FIO_HAVE_FALLOCATE */
 111
 112         if (!new_layout)
 113                 goto done;
 114
 115         /*
 116          * The size will be -1ULL when fill_device is used, so don't truncate
 117          * or fallocate this file, just write it
 118          */
 119         if (!td->o.fill_device) {
 120                 dprint(FD_FILE, "truncate file %s, size %llu\n", f->file_name,
 121                                                         f->real_file_size);
 122                 if (ftruncate(f->fd, f->real_file_size) == -1) {
 123                         td_verror(td, errno, "ftruncate");
 124                         goto err;
 125                 }
 126         }
 127
 128         b = malloc(td->o.max_bs[DDIR_WRITE]);
 129         memset(b, 0, td->o.max_bs[DDIR_WRITE]);
 130
 131         left = f->real_file_size;
 132         while (left && !td->terminate) {
 133                 bs = td->o.max_bs[DDIR_WRITE];
 134                 if (bs > left)
 135                         bs = left;
 136
 137                 r = write(f->fd, b, bs);
 138
 139                 if (r > 0) {
 140                         left -= r;
 141                         continue;
 142                 } else {
 143                         if (r < 0) {
 144                                 int __e = errno;
 145
 146                                 if (__e == ENOSPC) {
 147                                         if (td->o.fill_device)
 148                                                 break;
 149                                         log_info("fio: ENOSPC on laying out "
 150                                                  "file, stopping\n");
 151                                         break;
 152                                 }
 153                                 td_verror(td, errno, "write");
 154                         } else
 155                                 td_verror(td, EIO, "write");
 156
 157                         break;
 158                 }
 159         }
 160
 161         if (td->terminate) {
 162                 dprint(FD_FILE, "terminate unlink %s\n", f->file_name);
 163                 unlink(f->file_name);
 164         } else if (td->o.create_fsync) {
 165                 if (fsync(f->fd) < 0) {
 166                         td_verror(td, errno, "fsync");
 167                         goto err;
 168                 }
 169         }
 170         if (td->o.fill_device && !td_write(td)) {
 171                 fio_file_clear_size_known(f);
 172                 if (td_io_get_file_size(td, f))
 173                         goto err;
 174                 if (f->io_size > f->real_file_size)
 175                         f->io_size = f->real_file_size;
 176         }
 177
 178         free(b);
 179 done:
 180         return 0;
 181 err:
 182         close(f->fd);
 183         f->fd = -1;
 184         return 1;
 185 }
 186
 187 static int pre_read_file(struct thread_data *td, struct fio_file *f)
 188 {
 189         int r, did_open = 0, old_runstate;
 190         unsigned long long left;
 191         unsigned int bs;
 192         char *b;
 193
 194         if (td->io_ops->flags & FIO_PIPEIO)
 195                 return 0;
 196
 197         if (!fio_file_open(f)) {
 198                 if (td->io_ops->open_file(td, f)) {
 199                         log_err("fio: cannot pre-read, failed to open file\n");
 200                         return 1;
 201                 }
 202                 did_open = 1;
 203         }
 204
 205         old_runstate = td->runstate;
 206         td_set_runstate(td, TD_PRE_READING);
 207
 208         bs = td->o.max_bs[DDIR_READ];
 209         b = malloc(bs);
 210         memset(b, 0, bs);
 211
 212         lseek(f->fd, f->file_offset, SEEK_SET);
 213         left = f->io_size;
 214
 215         while (left && !td->terminate) {
 216                 if (bs > left)
 217                         bs = left;
 218
 219                 r = read(f->fd, b, bs);
 220
 221                 if (r == (int) bs) {
 222                         left -= bs;
 223                         continue;
 224                 } else {
 225                         td_verror(td, EIO, "pre_read");
 226                         break;
 227                 }
 228         }
 229
 230         td_set_runstate(td, old_runstate);
 231
 232         if (did_open)
 233                 td->io_ops->close_file(td, f);
 234         free(b);
 235         return 0;
 236 }
 237
 238 static unsigned long long get_rand_file_size(struct thread_data *td)
 239 {
 240         unsigned long long ret, sized;
 241         unsigned long r;
 242
 243         if (td->o.use_os_rand) {
 244                 r = os_random_long(&td->file_size_state);
 245                 sized = td->o.file_size_high - td->o.file_size_low;
 246                 ret = (unsigned long long) ((double) sized * (r / (OS_RAND_MAX + 1.0)));
 247         } else {
 248                 r = __rand(&td->__file_size_state);
 249                 sized = td->o.file_size_high - td->o.file_size_low;
 250                 ret = (unsigned long long) ((double) sized * (r / (FRAND_MAX + 1.0)));
 251         }
 252
 253         ret += td->o.file_size_low;
 254         ret -= (ret % td->o.rw_min_bs);
 255         return ret;
 256 }
 257
 258 static int file_size(struct thread_data *td, struct fio_file *f)
 259 {
 260         struct stat st;
 261
 262         if (stat(f->file_name, &st) == -1) {
 263                 td_verror(td, errno, "fstat");
 264                 return 1;
 265         }
 266
 267         f->real_file_size = st.st_size;
 268         return 0;
 269 }
 270
 271 static int bdev_size(struct thread_data *td, struct fio_file *f)
 272 {
 273         unsigned long long bytes = 0;
 274         int r;
 275
 276         if (td->io_ops->open_file(td, f)) {
 277                 log_err("fio: failed opening blockdev %s for size check\n",
 278                         f->file_name);
 279                 return 1;
 280         }
 281
 282         r = blockdev_size(f, &bytes);
 283         if (r) {
 284                 td_verror(td, r, "blockdev_size");
 285                 goto err;
 286         }
 287
 288         if (!bytes) {
 289                 log_err("%s: zero sized block device?\n", f->file_name);
 290                 goto err;
 291         }
 292
 293         f->real_file_size = bytes;
 294         td->io_ops->close_file(td, f);
 295         return 0;
 296 err:
 297         td->io_ops->close_file(td, f);
 298         return 1;
 299 }
 300
 301 static int char_size(struct thread_data *td, struct fio_file *f)
 302 {
 303 #ifdef FIO_HAVE_CHARDEV_SIZE
 304         unsigned long long bytes = 0;
 305         int r;
 306
 307         if (td->io_ops->open_file(td, f)) {
 308                 log_err("fio: failed opening blockdev %s for size check\n",
 309                         f->file_name);
 310                 return 1;
 311         }
 312
 313         r = chardev_size(f, &bytes);
 314         if (r) {
 315                 td_verror(td, r, "chardev_size");
 316                 goto err;
 317         }
 318
 319         if (!bytes) {
 320                 log_err("%s: zero sized char device?\n", f->file_name);
 321                 goto err;
 322         }
 323
 324         f->real_file_size = bytes;
 325         td->io_ops->close_file(td, f);
 326         return 0;
 327 err:
 328         td->io_ops->close_file(td, f);
 329         return 1;
 330 #else
 331         f->real_file_size = -1ULL;
 332         return 0;
 333 #endif
 334 }
 335
 336 static int get_file_size(struct thread_data *td, struct fio_file *f)
 337 {
 338         int ret = 0;
 339
 340         if (fio_file_size_known(f))
 341                 return 0;
 342
 343         if (f->filetype == FIO_TYPE_FILE)
 344                 ret = file_size(td, f);
 345         else if (f->filetype == FIO_TYPE_BD)
 346                 ret = bdev_size(td, f);
 347         else if (f->filetype == FIO_TYPE_CHAR)
 348                 ret = char_size(td, f);
 349         else
 350                 f->real_file_size = -1;
 351
 352         if (ret)
 353                 return ret;
 354
 355         if (f->file_offset > f->real_file_size) {
 356                 log_err("%s: offset extends end (%llu > %llu)\n", td->o.name,
 357                                         f->file_offset, f->real_file_size);
 358                 return 1;
 359         }
 360
 361         fio_file_set_size_known(f);
 362         return 0;
 363 }
 364
 365 static int __file_invalidate_cache(struct thread_data *td, struct fio_file *f,
 366                                    unsigned long long off,
 367                                    unsigned long long len)
 368 {
 369         int ret = 0;
 370
 371         if (len == -1ULL)
 372                 len = f->io_size;
 373         if (off == -1ULL)
 374                 off = f->file_offset;
 375
 376         if (len == -1ULL || off == -1ULL)
 377                 return 0;
 378
 379         dprint(FD_IO, "invalidate cache %s: %llu/%llu\n", f->file_name, off,
 380                                                                 len);
 381
 382         /*
 383          * FIXME: add blockdev flushing too
 384          */
 385         if (f->mmap_ptr) {
 386                 ret = posix_madvise(f->mmap_ptr, f->mmap_sz, POSIX_MADV_DONTNEED);
 387 #ifdef FIO_MADV_FREE
 388                 (void) posix_madvise(f->mmap_ptr, f->mmap_sz, FIO_MADV_FREE);
 389 #endif
 390         } else if (f->filetype == FIO_TYPE_FILE) {
 391                 ret = posix_fadvise(f->fd, off, len, POSIX_FADV_DONTNEED);
 392         } else if (f->filetype == FIO_TYPE_BD) {
 393                 ret = blockdev_invalidate_cache(f);
 394                 if (ret < 0 && errno == EACCES && geteuid()) {
 395                         if (!root_warn) {
 396                                 log_err("fio: only root may flush block "
 397                                         "devices. Cache flush bypassed!\n");
 398                                 root_warn = 1;
 399                         }
 400                         ret = 0;
 401                 }
 402         } else if (f->filetype == FIO_TYPE_CHAR || f->filetype == FIO_TYPE_PIPE)
 403                 ret = 0;
 404
 405         if (ret < 0) {
 406                 td_verror(td, errno, "invalidate_cache");
 407                 return 1;
 408         } else if (ret > 0) {
 409                 td_verror(td, ret, "invalidate_cache");
 410                 return 1;
 411         }
 412
 413         return ret;
 414
 415 }
 416
 417 int file_invalidate_cache(struct thread_data *td, struct fio_file *f)
 418 {
 419         if (!fio_file_open(f))
 420                 return 0;
 421
 422         return __file_invalidate_cache(td, f, -1ULL, -1ULL);
 423 }
 424
 425 int generic_close_file(struct thread_data fio_unused *td, struct fio_file *f)
 426 {
 427         int ret = 0;
 428
 429         dprint(FD_FILE, "fd close %s\n", f->file_name);
 430
 431         remove_file_hash(f);
 432
 433         if (close(f->fd) < 0)
 434                 ret = errno;
 435
 436         f->fd = -1;
 437         return ret;
 438 }
 439
 440 int file_lookup_open(struct fio_file *f, int flags)
 441 {
 442         struct fio_file *__f;
 443         int from_hash;
 444
 445         __f = lookup_file_hash(f->file_name);
 446         if (__f) {
 447                 dprint(FD_FILE, "found file in hash %s\n", f->file_name);
 448                 /*
 449                  * racy, need the __f->lock locked
 450                  */
 451                 f->lock = __f->lock;
 452                 f->lock_owner = __f->lock_owner;
 453                 f->lock_batch = __f->lock_batch;
 454                 f->lock_ddir = __f->lock_ddir;
 455                 from_hash = 1;
 456         } else {
 457                 dprint(FD_FILE, "file not found in hash %s\n", f->file_name);
 458                 from_hash = 0;
 459         }
 460
 461         f->fd = open(f->file_name, flags, 0600);
 462         return from_hash;
 463 }
 464
 465 int generic_open_file(struct thread_data *td, struct fio_file *f)
 466 {
 467         int is_std = 0;
 468         int flags = 0;
 469         int from_hash = 0;
 470
 471         dprint(FD_FILE, "fd open %s\n", f->file_name);
 472
 473         if (td_trim(td) && f->filetype != FIO_TYPE_BD) {
 474                 log_err("fio: trim only applies to block device\n");
 475                 return 1;
 476         }
 477
 478         if (!strcmp(f->file_name, "-")) {
 479                 if (td_rw(td)) {
 480                         log_err("fio: can't read/write to stdin/out\n");
 481                         return 1;
 482                 }
 483                 is_std = 1;
 484
 485                 /*
 486                  * move output logging to stderr, if we are writing to stdout
 487                  */
 488                 if (td_write(td))
 489                         f_out = stderr;
 490         }
 491
 492         if (td_trim(td))
 493                 goto skip_flags;
 494         if (td->o.odirect)
 495                 flags |= OS_O_DIRECT;
 496         if (td->o.sync_io)
 497                 flags |= O_SYNC;
 498         if (td->o.create_on_open)
 499                 flags |= O_CREAT;
 500 skip_flags:
 501         if (f->filetype != FIO_TYPE_FILE)
 502                 flags |= FIO_O_NOATIME;
 503
 504 open_again:
 505         if (td_write(td)) {
 506                 if (!read_only)
 507                         flags |= O_RDWR;
 508
 509                 if (f->filetype == FIO_TYPE_FILE)
 510                         flags |= O_CREAT;
 511
 512                 if (is_std)
 513                         f->fd = dup(STDOUT_FILENO);
 514                 else
 515                         from_hash = file_lookup_open(f, flags);
 516         } else if (td_read(td)) {
 517                 if (f->filetype == FIO_TYPE_CHAR && !read_only)
 518                         flags |= O_RDWR;
 519                 else
 520                         flags |= O_RDONLY;
 521
 522                 if (is_std)
 523                         f->fd = dup(STDIN_FILENO);
 524                 else
 525                         from_hash = file_lookup_open(f, flags);
 526         } else { //td trim
 527                 flags |= O_RDWR;
 528                 from_hash = file_lookup_open(f, flags);
 529         }
 530
 531         if (f->fd == -1) {
 532                 char buf[FIO_VERROR_SIZE];
 533                 int __e = errno;
 534
 535                 if (__e == EPERM && (flags & FIO_O_NOATIME)) {
 536                         flags &= ~FIO_O_NOATIME;
 537                         goto open_again;
 538                 }
 539
 540                 snprintf(buf, sizeof(buf) - 1, "open(%s)", f->file_name);
 541
 542                 if (__e == EINVAL && (flags & OS_O_DIRECT)) {
 543                         log_err("fio: looks like your file system does not " \
 544                                 "support direct=1/buffered=0\n");
 545                 }
 546
 547                 td_verror(td, __e, buf);
 548         }
 549
 550         if (!from_hash && f->fd != -1) {
 551                 if (add_file_hash(f)) {
 552                         int fio_unused ret;
 553
 554                         /*
 555                          * OK to ignore, we haven't done anything with it
 556                          */
 557                         ret = generic_close_file(td, f);
 558                         goto open_again;
 559                 }
 560         }
 561
 562         return 0;
 563 }
 564
 565 int generic_get_file_size(struct thread_data *td, struct fio_file *f)
 566 {
 567         return get_file_size(td, f);
 568 }
 569
 570 /*
 571  * open/close all files, so that ->real_file_size gets set
 572  */
 573 static int get_file_sizes(struct thread_data *td)
 574 {
 575         struct fio_file *f;
 576         unsigned int i;
 577         int err = 0;
 578
 579         for_each_file(td, f, i) {
 580                 dprint(FD_FILE, "get file size for %p/%d/%p\n", f, i,
 581                                                                 f->file_name);
 582
 583                 if (td_io_get_file_size(td, f)) {
 584                         if (td->error != ENOENT) {
 585                                 log_err("%s\n", td->verror);
 586                                 err = 1;
 587                         }
 588                         clear_error(td);
 589                 }
 590
 591                 if (f->real_file_size == -1ULL && td->o.size)
 592                         f->real_file_size = td->o.size / td->o.nr_files;
 593         }
 594
 595         return err;
 596 }
 597
 598 struct fio_mount {
 599         struct flist_head list;
 600         const char *base;
 601         char __base[256];
 602         unsigned int key;
 603 };
 604
 605 /*
 606  * Get free number of bytes for each file on each unique mount.
 607  */
 608 static unsigned long long get_fs_free_counts(struct thread_data *td)
 609 {
 610         struct flist_head *n, *tmp;
 611         unsigned long long ret = 0;
 612         struct fio_mount *fm;
 613         FLIST_HEAD(list);
 614         struct fio_file *f;
 615         unsigned int i;
 616
 617         for_each_file(td, f, i) {
 618                 struct stat sb;
 619                 char buf[256];
 620
 621                 if (f->filetype == FIO_TYPE_BD || f->filetype == FIO_TYPE_CHAR) {
 622                         if (f->real_file_size != -1ULL)
 623                                 ret += f->real_file_size;
 624                         continue;
 625                 } else if (f->filetype != FIO_TYPE_FILE)
 626                         continue;
 627
 628                 strcpy(buf, f->file_name);
 629
 630                 if (stat(buf, &sb) < 0) {
 631                         if (errno != ENOENT)
 632                                 break;
 633                         strcpy(buf, ".");
 634                         if (stat(buf, &sb) < 0)
 635                                 break;
 636                 }
 637
 638                 fm = NULL;
 639                 flist_for_each(n, &list) {
 640                         fm = flist_entry(n, struct fio_mount, list);
 641                         if (fm->key == sb.st_dev)
 642                                 break;
 643
 644                         fm = NULL;
 645                 }
 646
 647                 if (fm)
 648                         continue;
 649
 650                 fm = malloc(sizeof(*fm));
 651                 strcpy(fm->__base, buf);
 652                 fm->base = basename(fm->__base);
 653                 fm->key = sb.st_dev;
 654                 flist_add(&fm->list, &list);
 655         }
 656
 657         flist_for_each_safe(n, tmp, &list) {
 658                 unsigned long long sz;
 659
 660                 fm = flist_entry(n, struct fio_mount, list);
 661                 flist_del(&fm->list);
 662
 663                 sz = get_fs_size(fm->base);
 664                 if (sz && sz != -1ULL)
 665                         ret += sz;
 666
 667                 free(fm);
 668         }
 669
 670         return ret;
 671 }
 672
 673 unsigned long long get_start_offset(struct thread_data *td)
 674 {
 675         return td->o.start_offset +
 676                 (td->thread_number - 1) * td->o.offset_increment;
 677 }
 678
 679 /*
 680  * Open the files and setup files sizes, creating files if necessary.
 681  */
 682 int setup_files(struct thread_data *td)
 683 {
 684         unsigned long long total_size, extend_size;
 685         struct fio_file *f;
 686         unsigned int i;
 687         int err = 0, need_extend;
 688
 689         dprint(FD_FILE, "setup files\n");
 690
 691         if (td->o.read_iolog_file)
 692                 goto done;
 693
 694         /*
 695          * if ioengine defines a setup() method, it's responsible for
 696          * opening the files and setting f->real_file_size to indicate
 697          * the valid range for that file.
 698          */
 699         if (td->io_ops->setup)
 700                 err = td->io_ops->setup(td);
 701         else
 702                 err = get_file_sizes(td);
 703
 704         if (err)
 705                 return err;
 706
 707         /*
 708          * check sizes. if the files/devices do not exist and the size
 709          * isn't passed to fio, abort.
 710          */
 711         total_size = 0;
 712         for_each_file(td, f, i) {
 713                 if (f->real_file_size == -1ULL)
 714                         total_size = -1ULL;
 715                 else
 716                         total_size += f->real_file_size;
 717         }
 718
 719         if (td->o.fill_device)
 720                 td->fill_device_size = get_fs_free_counts(td);
 721
 722         /*
 723          * device/file sizes are zero and no size given, punt
 724          */
 725         if ((!total_size || total_size == -1ULL) && !td->o.size &&
 726             !(td->io_ops->flags & FIO_NOIO) && !td->o.fill_device) {
 727                 log_err("%s: you need to specify size=\n", td->o.name);
 728                 td_verror(td, EINVAL, "total_file_size");
 729                 return 1;
 730         }
 731
 732         /*
 733          * now file sizes are known, so we can set ->io_size. if size= is
 734          * not given, ->io_size is just equal to ->real_file_size. if size
 735          * is given, ->io_size is size / nr_files.
 736          */
 737         extend_size = total_size = 0;
 738         need_extend = 0;
 739         for_each_file(td, f, i) {
 740                 f->file_offset = get_start_offset(td);
 741
 742                 if (!td->o.file_size_low) {
 743                         /*
 744                          * no file size range given, file size is equal to
 745                          * total size divided by number of files. if that is
 746                          * zero, set it to the real file size.
 747                          */
 748                         f->io_size = td->o.size / td->o.nr_files;
 749                         if (!f->io_size)
 750                                 f->io_size = f->real_file_size - f->file_offset;
 751                 } else if (f->real_file_size < td->o.file_size_low ||
 752                            f->real_file_size > td->o.file_size_high) {
 753                         if (f->file_offset > td->o.file_size_low)
 754                                 goto err_offset;
 755                         /*
 756                          * file size given. if it's fixed, use that. if it's a
 757                          * range, generate a random size in-between.
 758                          */
 759                         if (td->o.file_size_low == td->o.file_size_high) {
 760                                 f->io_size = td->o.file_size_low
 761                                                 - f->file_offset;
 762                         } else {
 763                                 f->io_size = get_rand_file_size(td)
 764                                                 - f->file_offset;
 765                         }
 766                 } else
 767                         f->io_size = f->real_file_size - f->file_offset;
 768
 769                 if (f->io_size == -1ULL)
 770                         total_size = -1ULL;
 771                 else {
 772                         if (td->o.size_percent)
 773                                 f->io_size = (f->io_size * td->o.size_percent) / 100;
 774                         total_size += f->io_size;
 775                 }
 776
 777                 if (f->filetype == FIO_TYPE_FILE &&
 778                     (f->io_size + f->file_offset) > f->real_file_size &&
 779                     !(td->io_ops->flags & FIO_DISKLESSIO)) {
 780                         if (!td->o.create_on_open) {
 781                                 need_extend++;
 782                                 extend_size += (f->io_size + f->file_offset);
 783                         } else
 784                                 f->real_file_size = f->io_size + f->file_offset;
 785                         fio_file_set_extend(f);
 786                 }
 787         }
 788
 789         if (!td->o.size || td->o.size > total_size)
 790                 td->o.size = total_size;
 791
 792         /*
 793          * See if we need to extend some files
 794          */
 795         if (need_extend) {
 796                 temp_stall_ts = 1;
 797                 if (output_format == FIO_OUTPUT_NORMAL)
 798                         log_info("%s: Laying out IO file(s) (%u file(s) /"
 799                                  " %lluMB)\n", td->o.name, need_extend,
 800                                         extend_size >> 20);
 801
 802                 for_each_file(td, f, i) {
 803                         unsigned long long old_len = -1ULL, extend_len = -1ULL;
 804
 805                         if (!fio_file_extend(f))
 806                                 continue;
 807
 808                         assert(f->filetype == FIO_TYPE_FILE);
 809                         fio_file_clear_extend(f);
 810                         if (!td->o.fill_device) {
 811                                 old_len = f->real_file_size;
 812                                 extend_len = f->io_size + f->file_offset -
 813                                                 old_len;
 814                         }
 815                         f->real_file_size = (f->io_size + f->file_offset);
 816                         err = extend_file(td, f);
 817                         if (err)
 818                                 break;
 819
 820                         err = __file_invalidate_cache(td, f, old_len,
 821                                                                 extend_len);
 822                         close(f->fd);
 823                         f->fd = -1;
 824                         if (err)
 825                                 break;
 826                 }
 827                 temp_stall_ts = 0;
 828         }
 829
 830         if (err)
 831                 return err;
 832
 833         if (!td->o.zone_size)
 834                 td->o.zone_size = td->o.size;
 835
 836         /*
 837          * iolog already set the total io size, if we read back
 838          * stored entries.
 839          */
 840         if (!td->o.read_iolog_file)
 841                 td->total_io_size = td->o.size * td->o.loops;
 842
 843 done:
 844         if (td->o.create_only)
 845                 td->done = 1;
 846
 847         return 0;
 848 err_offset:
 849         log_err("%s: you need to specify valid offset=\n", td->o.name);
 850         return 1;
 851 }
 852
 853 int pre_read_files(struct thread_data *td)
 854 {
 855         struct fio_file *f;
 856         unsigned int i;
 857
 858         dprint(FD_FILE, "pre_read files\n");
 859
 860         for_each_file(td, f, i) {
 861                 pre_read_file(td, f);
 862         }
 863
 864         return 1;
 865 }
 866
 867 static int __init_rand_distribution(struct thread_data *td, struct fio_file *f)
 868 {
 869         unsigned int range_size, seed;
 870         unsigned long nranges;
 871
 872         range_size = min(td->o.min_bs[DDIR_READ], td->o.min_bs[DDIR_WRITE]);
 873
 874         nranges = (f->real_file_size + range_size - 1) / range_size;
 875
 876         seed = jhash(f->file_name, strlen(f->file_name), 0) * td->thread_number;
 877         if (!td->o.rand_repeatable)
 878                 seed = td->rand_seeds[4];
 879
 880         if (td->o.random_distribution == FIO_RAND_DIST_ZIPF)
 881                 zipf_init(&f->zipf, nranges, td->o.zipf_theta, seed);
 882         else
 883                 pareto_init(&f->zipf, nranges, td->o.pareto_h, seed);
 884
 885         return 1;
 886 }
 887
 888 static int init_rand_distribution(struct thread_data *td)
 889 {
 890         struct fio_file *f;
 891         unsigned int i;
 892         int state;
 893
 894         if (td->o.random_distribution == FIO_RAND_DIST_RANDOM)
 895                 return 0;
 896
 897         state = td->runstate;
 898         td_set_runstate(td, TD_SETTING_UP);
 899         for_each_file(td, f, i)
 900                 __init_rand_distribution(td, f);
 901         td_set_runstate(td, state);
 902
 903         return 1;
 904 }
 905
 906 int init_random_map(struct thread_data *td)
 907 {
 908         unsigned long long blocks;
 909         struct fio_file *f;
 910         unsigned int i;
 911
 912         if (init_rand_distribution(td))
 913                 return 0;
 914         if (td->o.norandommap || !td_random(td))
 915                 return 0;
 916
 917         for_each_file(td, f, i) {
 918                 blocks = (f->real_file_size + td->o.rw_min_bs - 1) /
 919                                 (unsigned long long) td->o.rw_min_bs;
 920                 f->io_bitmap = bitmap_new(blocks);
 921                 if (f->io_bitmap)
 922                         continue;
 923
 924                 if (!td->o.softrandommap) {
 925                         log_err("fio: failed allocating random map. If running"
 926                                 " a large number of jobs, try the 'norandommap'"
 927                                 " option or set 'softrandommap'. Or give"
 928                                 " a larger --alloc-size to fio.\n");
 929                         return 1;
 930                 }
 931
 932                 log_info("fio: file %s failed allocating random map. Running "
 933                          "job without.\n", f->file_name);
 934         }
 935
 936         return 0;
 937 }
 938
 939 void close_files(struct thread_data *td)
 940 {
 941         struct fio_file *f;
 942         unsigned int i;
 943
 944         for_each_file(td, f, i) {
 945                 if (fio_file_open(f))
 946                         td_io_close_file(td, f);
 947         }
 948 }
 949
 950 void close_and_free_files(struct thread_data *td)
 951 {
 952         struct fio_file *f;
 953         unsigned int i;
 954
 955         dprint(FD_FILE, "close files\n");
 956
 957         for_each_file(td, f, i) {
 958                 if (td->o.unlink && f->filetype == FIO_TYPE_FILE) {
 959                         dprint(FD_FILE, "free unlink %s\n", f->file_name);
 960                         unlink(f->file_name);
 961                 }
 962
 963                 if (fio_file_open(f))
 964                         td_io_close_file(td, f);
 965
 966                 remove_file_hash(f);
 967
 968                 sfree(f->file_name);
 969                 f->file_name = NULL;
 970                 bitmap_free(f->io_bitmap);
 971                 f->io_bitmap = NULL;
 972                 sfree(f);
 973         }
 974
 975         td->o.filename = NULL;
 976         free(td->files);
 977         td->files_index = 0;
 978         td->files = NULL;
 979         td->o.nr_files = 0;
 980 }
 981
 982 static void get_file_type(struct fio_file *f)
 983 {
 984         struct stat sb;
 985
 986         if (!strcmp(f->file_name, "-"))
 987                 f->filetype = FIO_TYPE_PIPE;
 988         else
 989                 f->filetype = FIO_TYPE_FILE;
 990
 991         /* \\.\ is the device namespace in Windows, where every file is
 992          * a block device */
 993         if (strncmp(f->file_name, "\\\\.\\", 4) == 0)
 994                 f->filetype = FIO_TYPE_BD;
 995
 996         if (!stat(f->file_name, &sb)) {
 997                 if (S_ISBLK(sb.st_mode))
 998                         f->filetype = FIO_TYPE_BD;
 999                 else if (S_ISCHR(sb.st_mode))
1000                         f->filetype = FIO_TYPE_CHAR;
1001                 else if (S_ISFIFO(sb.st_mode))
1002                         f->filetype = FIO_TYPE_PIPE;
1003         }
1004 }
1005
1006 int add_file(struct thread_data *td, const char *fname)
1007 {
1008         int cur_files = td->files_index;
1009         char file_name[PATH_MAX];
1010         struct fio_file *f;
1011         int len = 0;
1012
1013         dprint(FD_FILE, "add file %s\n", fname);
1014
1015         f = smalloc(sizeof(*f));
1016         if (!f) {
1017                 log_err("fio: smalloc OOM\n");
1018                 assert(0);
1019         }
1020
1021         f->fd = -1;
1022         fio_file_reset(f);
1023
1024         if (td->files_size <= td->files_index) {
1025                 int new_size = td->o.nr_files + 1;
1026
1027                 dprint(FD_FILE, "resize file array to %d files\n", new_size);
1028
1029                 td->files = realloc(td->files, new_size * sizeof(f));
1030                 td->files_size = new_size;
1031         }
1032         td->files[cur_files] = f;
1033         f->fileno = cur_files;
1034
1035         /*
1036          * init function, io engine may not be loaded yet
1037          */
1038         if (td->io_ops && (td->io_ops->flags & FIO_DISKLESSIO))
1039                 f->real_file_size = -1ULL;
1040
1041         if (td->o.directory)
1042                 len = sprintf(file_name, "%s/", td->o.directory);
1043
1044         sprintf(file_name + len, "%s", fname);
1045         f->file_name = smalloc_strdup(file_name);
1046         if (!f->file_name) {
1047                 log_err("fio: smalloc OOM\n");
1048                 assert(0);
1049         }
1050
1051         get_file_type(f);
1052
1053         switch (td->o.file_lock_mode) {
1054         case FILE_LOCK_NONE:
1055                 break;
1056         case FILE_LOCK_READWRITE:
1057                 f->lock = fio_mutex_rw_init();
1058                 break;
1059         case FILE_LOCK_EXCLUSIVE:
1060                 f->lock = fio_mutex_init(FIO_MUTEX_UNLOCKED);
1061                 break;
1062         default:
1063                 log_err("fio: unknown lock mode: %d\n", td->o.file_lock_mode);
1064                 assert(0);
1065         }
1066
1067         td->files_index++;
1068         if (f->filetype == FIO_TYPE_FILE)
1069                 td->nr_normal_files++;
1070
1071         dprint(FD_FILE, "file %p \"%s\" added at %d\n", f, f->file_name,
1072                                                         cur_files);
1073
1074         return cur_files;
1075 }
1076
1077 int add_file_exclusive(struct thread_data *td, const char *fname)
1078 {
1079         struct fio_file *f;
1080         unsigned int i;
1081
1082         for_each_file(td, f, i) {
1083                 if (!strcmp(f->file_name, fname))
1084                         return i;
1085         }
1086
1087         return add_file(td, fname);
1088 }
1089
1090 void get_file(struct fio_file *f)
1091 {
1092         dprint(FD_FILE, "get file %s, ref=%d\n", f->file_name, f->references);
1093         assert(fio_file_open(f));
1094         f->references++;
1095 }
1096
1097 int put_file(struct thread_data *td, struct fio_file *f)
1098 {
1099         int f_ret = 0, ret = 0;
1100
1101         dprint(FD_FILE, "put file %s, ref=%d\n", f->file_name, f->references);
1102
1103         if (!fio_file_open(f)) {
1104                 assert(f->fd == -1);
1105                 return 0;
1106         }
1107
1108         assert(f->references);
1109         if (--f->references)
1110                 return 0;
1111
1112         if (should_fsync(td) && td->o.fsync_on_close)
1113                 f_ret = fsync(f->fd);
1114
1115         if (td->io_ops->close_file)
1116                 ret = td->io_ops->close_file(td, f);
1117
1118         if (!ret)
1119                 ret = f_ret;
1120
1121         td->nr_open_files--;
1122         fio_file_clear_open(f);
1123         assert(f->fd == -1);
1124         return ret;
1125 }
1126
1127 void lock_file(struct thread_data *td, struct fio_file *f, enum fio_ddir ddir)
1128 {
1129         if (!f->lock || td->o.file_lock_mode == FILE_LOCK_NONE)
1130                 return;
1131
1132         if (f->lock_owner == td && f->lock_batch--)
1133                 return;
1134
1135         if (td->o.file_lock_mode == FILE_LOCK_READWRITE) {
1136                 if (ddir == DDIR_READ)
1137                         fio_mutex_down_read(f->lock);
1138                 else
1139                         fio_mutex_down_write(f->lock);
1140         } else if (td->o.file_lock_mode == FILE_LOCK_EXCLUSIVE)
1141                 fio_mutex_down(f->lock);
1142
1143         f->lock_owner = td;
1144         f->lock_batch = td->o.lockfile_batch;
1145         f->lock_ddir = ddir;
1146 }
1147
1148 void unlock_file(struct thread_data *td, struct fio_file *f)
1149 {
1150         if (!f->lock || td->o.file_lock_mode == FILE_LOCK_NONE)
1151                 return;
1152         if (f->lock_batch)
1153                 return;
1154
1155         if (td->o.file_lock_mode == FILE_LOCK_READWRITE) {
1156                 const int is_read = f->lock_ddir == DDIR_READ;
1157                 int val = fio_mutex_getval(f->lock);
1158
1159                 if ((is_read && val == 1) || (!is_read && val == -1))
1160                         f->lock_owner = NULL;
1161
1162                 if (is_read)
1163                         fio_mutex_up_read(f->lock);
1164                 else
1165                         fio_mutex_up_write(f->lock);
1166         } else if (td->o.file_lock_mode == FILE_LOCK_EXCLUSIVE) {
1167                 int val = fio_mutex_getval(f->lock);
1168
1169                 if (val == 0)
1170                         f->lock_owner = NULL;
1171
1172                 fio_mutex_up(f->lock);
1173         }
1174 }
1175
1176 void unlock_file_all(struct thread_data *td, struct fio_file *f)
1177 {
1178         if (f->lock_owner != td)
1179                 return;
1180
1181         f->lock_batch = 0;
1182         unlock_file(td, f);
1183 }
1184
1185 static int recurse_dir(struct thread_data *td, const char *dirname)
1186 {
1187         struct dirent *dir;
1188         int ret = 0;
1189         DIR *D;
1190
1191         D = opendir(dirname);
1192         if (!D) {
1193                 char buf[FIO_VERROR_SIZE];
1194
1195                 snprintf(buf, FIO_VERROR_SIZE - 1, "opendir(%s)", dirname);
1196                 td_verror(td, errno, buf);
1197                 return 1;
1198         }
1199
1200         while ((dir = readdir(D)) != NULL) {
1201                 char full_path[PATH_MAX];
1202                 struct stat sb;
1203
1204                 if (!strcmp(dir->d_name, ".") || !strcmp(dir->d_name, ".."))
1205                         continue;
1206
1207                 sprintf(full_path, "%s%s%s", dirname, FIO_OS_PATH_SEPARATOR, dir->d_name);
1208
1209                 if (lstat(full_path, &sb) == -1) {
1210                         if (errno != ENOENT) {
1211                                 td_verror(td, errno, "stat");
1212                                 return 1;
1213                         }
1214                 }
1215
1216                 if (S_ISREG(sb.st_mode)) {
1217                         add_file(td, full_path);
1218                         td->o.nr_files++;
1219                         continue;
1220                 }
1221                 if (!S_ISDIR(sb.st_mode))
1222                         continue;
1223
1224                 ret = recurse_dir(td, full_path);
1225                 if (ret)
1226                         break;
1227         }
1228
1229         closedir(D);
1230         return ret;
1231 }
1232
1233 int add_dir_files(struct thread_data *td, const char *path)
1234 {
1235         int ret = recurse_dir(td, path);
1236
1237         if (!ret)
1238                 log_info("fio: opendir added %d files\n", td->o.nr_files);
1239
1240         return ret;
1241 }
1242
1243 void dup_files(struct thread_data *td, struct thread_data *org)
1244 {
1245         struct fio_file *f;
1246         unsigned int i;
1247
1248         dprint(FD_FILE, "dup files: %d\n", org->files_index);
1249
1250         if (!org->files)
1251                 return;
1252
1253         td->files = malloc(org->files_index * sizeof(f));
1254
1255         for_each_file(org, f, i) {
1256                 struct fio_file *__f;
1257
1258                 __f = smalloc(sizeof(*__f));
1259                 if (!__f) {
1260                         log_err("fio: smalloc OOM\n");
1261                         assert(0);
1262                 }
1263                 __f->fd = -1;
1264                 fio_file_reset(__f);
1265
1266                 if (f->file_name) {
1267                         __f->file_name = smalloc_strdup(f->file_name);
1268                         if (!__f->file_name) {
1269                                 log_err("fio: smalloc OOM\n");
1270                                 assert(0);
1271                         }
1272
1273                         __f->filetype = f->filetype;
1274                 }
1275
1276                 td->files[i] = __f;
1277         }
1278 }
1279
1280 /*
1281  * Returns the index that matches the filename, or -1 if not there
1282  */
1283 int get_fileno(struct thread_data *td, const char *fname)
1284 {
1285         struct fio_file *f;
1286         unsigned int i;
1287
1288         for_each_file(td, f, i)
1289                 if (!strcmp(f->file_name, fname))
1290                         return i;
1291
1292         return -1;
1293 }
1294
1295 /*
1296  * For log usage, where we add/open/close files automatically
1297  */
1298 void free_release_files(struct thread_data *td)
1299 {
1300         close_files(td);
1301         td->files_index = 0;
1302         td->nr_normal_files = 0;
1303 }