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 "smalloc.h"
  12 #include "filehash.h"
  13
  14 static int root_warn;
  15
  16 /*
  17  * Leaves f->fd open on success, caller must close
  18  */
  19 static int extend_file(struct thread_data *td, struct fio_file *f)
  20 {
  21         int r, new_layout = 0, unlink_file = 0, flags;
  22         unsigned long long left;
  23         unsigned int bs;
  24         char *b;
  25
  26         if (read_only) {
  27                 log_err("fio: refusing extend of file due to read-only\n");
  28                 return 0;
  29         }
  30
  31         /*
  32          * check if we need to lay the file out complete again. fio
  33          * does that for operations involving reads, or for writes
  34          * where overwrite is set
  35          */
  36         if (td_read(td) || (td_write(td) && td->o.overwrite) ||
  37             (td_write(td) && td->io_ops->flags & FIO_NOEXTEND))
  38                 new_layout = 1;
  39         if (td_write(td) && !td->o.overwrite)
  40                 unlink_file = 1;
  41
  42         if (unlink_file || new_layout) {
  43                 dprint(FD_FILE, "layout unlink %s\n", f->file_name);
  44                 if ((unlink(f->file_name) < 0) && (errno != ENOENT)) {
  45                         td_verror(td, errno, "unlink");
  46                         return 1;
  47                 }
  48         }
  49
  50         flags = O_WRONLY | O_CREAT;
  51         if (new_layout)
  52                 flags |= O_TRUNC;
  53
  54         dprint(FD_FILE, "open file %s, flags %x\n", f->file_name, flags);
  55         f->fd = open(f->file_name, flags, 0644);
  56         if (f->fd < 0) {
  57                 td_verror(td, errno, "open");
  58                 return 1;
  59         }
  60
  61         if (!new_layout)
  62                 goto done;
  63
  64         dprint(FD_FILE, "truncate file %s, size %llu\n", f->file_name,
  65                                                         f->real_file_size);
  66         if (ftruncate(f->fd, f->real_file_size) == -1) {
  67                 td_verror(td, errno, "ftruncate");
  68                 goto err;
  69         }
  70
  71 #ifdef FIO_HAVE_FALLOCATE
  72         dprint(FD_FILE, "fallocate file %s, size %llu\n", f->file_name,
  73                                                         f->real_file_size);
  74         r = posix_fallocate(f->fd, 0, f->real_file_size);
  75         if (r < 0)
  76                 log_err("fio: posix_fallocate fails: %s\n", strerror(-r));
  77 #endif
  78
  79         b = malloc(td->o.max_bs[DDIR_WRITE]);
  80         memset(b, 0, td->o.max_bs[DDIR_WRITE]);
  81
  82         left = f->real_file_size;
  83         while (left && !td->terminate) {
  84                 bs = td->o.max_bs[DDIR_WRITE];
  85                 if (bs > left)
  86                         bs = left;
  87
  88                 r = write(f->fd, b, bs);
  89
  90                 if (r == (int) bs) {
  91                         left -= bs;
  92                         continue;
  93                 } else {
  94                         if (r < 0)
  95                                 td_verror(td, errno, "write");
  96                         else
  97                                 td_verror(td, EIO, "write");
  98
  99                         break;
 100                 }
 101         }
 102
 103         if (td->terminate) {
 104                 dprint(FD_FILE, "terminate unlink %s\n", f->file_name);
 105                 unlink(f->file_name);
 106         } else if (td->o.create_fsync) {
 107                 if (fsync(f->fd) < 0) {
 108                         td_verror(td, errno, "fsync");
 109                         goto err;
 110                 }
 111         }
 112
 113         free(b);
 114 done:
 115         return 0;
 116 err:
 117         close(f->fd);
 118         f->fd = -1;
 119         return 1;
 120 }
 121
 122 static unsigned long long get_rand_file_size(struct thread_data *td)
 123 {
 124         unsigned long long ret, sized;
 125         long r;
 126
 127         r = os_random_long(&td->file_size_state);
 128         sized = td->o.file_size_high - td->o.file_size_low;
 129         ret = (unsigned long long) ((double) sized * (r / (OS_RAND_MAX + 1.0)));
 130         ret += td->o.file_size_low;
 131         ret -= (ret % td->o.rw_min_bs);
 132         return ret;
 133 }
 134
 135 static int file_size(struct thread_data *td, struct fio_file *f)
 136 {
 137         struct stat st;
 138
 139         if (stat(f->file_name, &st) == -1) {
 140                 td_verror(td, errno, "fstat");
 141                 return 1;
 142         }
 143
 144         f->real_file_size = st.st_size;
 145         return 0;
 146 }
 147
 148 static int bdev_size(struct thread_data *td, struct fio_file *f)
 149 {
 150         unsigned long long bytes;
 151         int r;
 152
 153         if (td->io_ops->open_file(td, f)) {
 154                 log_err("fio: failed opening blockdev %s for size check\n",
 155                         f->file_name);
 156                 return 1;
 157         }
 158
 159         r = blockdev_size(f->fd, &bytes);
 160         if (r) {
 161                 td_verror(td, r, "blockdev_size");
 162                 goto err;
 163         }
 164
 165         if (!bytes) {
 166                 log_err("%s: zero sized block device?\n", f->file_name);
 167                 goto err;
 168         }
 169
 170         f->real_file_size = bytes;
 171         return 0;
 172 err:
 173         td->io_ops->close_file(td, f);
 174         return 1;
 175 }
 176
 177 static int get_file_size(struct thread_data *td, struct fio_file *f)
 178 {
 179         int ret = 0;
 180
 181         if (f->flags & FIO_SIZE_KNOWN)
 182                 return 0;
 183
 184         if (f->filetype == FIO_TYPE_FILE)
 185                 ret = file_size(td, f);
 186         else if (f->filetype == FIO_TYPE_BD)
 187                 ret = bdev_size(td, f);
 188         else
 189                 f->real_file_size = -1;
 190
 191         if (ret)
 192                 return ret;
 193
 194         if (f->file_offset > f->real_file_size) {
 195                 log_err("%s: offset extends end (%Lu > %Lu)\n", td->o.name,
 196                                         f->file_offset, f->real_file_size);
 197                 return 1;
 198         }
 199
 200         f->flags |= FIO_SIZE_KNOWN;
 201         return 0;
 202 }
 203
 204 static int __file_invalidate_cache(struct thread_data *td, struct fio_file *f,
 205                                    unsigned long long off,
 206                                    unsigned long long len)
 207 {
 208         int ret = 0;
 209
 210         if (len == -1ULL)
 211                 len = f->io_size;
 212         if (off == -1ULL)
 213                 off = f->file_offset;
 214
 215         dprint(FD_IO, "invalidate cache %s: %llu/%llu\n", f->file_name, off,
 216                                                                 len);
 217
 218         /*
 219          * FIXME: add blockdev flushing too
 220          */
 221         if (f->mmap)
 222                 ret = madvise(f->mmap, len, MADV_DONTNEED);
 223         else if (f->filetype == FIO_TYPE_FILE) {
 224                 ret = fadvise(f->fd, off, len, POSIX_FADV_DONTNEED);
 225         } else if (f->filetype == FIO_TYPE_BD) {
 226                 ret = blockdev_invalidate_cache(f->fd);
 227                 if (ret < 0 && errno == EACCES && geteuid()) {
 228                         if (!root_warn) {
 229                                 log_err("fio: only root may flush block "
 230                                         "devices. Cache flush bypassed!\n");
 231                                 root_warn = 1;
 232                         }
 233                         ret = 0;
 234                 }
 235         } else if (f->filetype == FIO_TYPE_CHAR || f->filetype == FIO_TYPE_PIPE)
 236                 ret = 0;
 237
 238         if (ret < 0) {
 239                 td_verror(td, errno, "invalidate_cache");
 240                 return 1;
 241         } else if (ret > 0) {
 242                 td_verror(td, ret, "invalidate_cache");
 243                 return 1;
 244         }
 245
 246         return ret;
 247
 248 }
 249
 250 int file_invalidate_cache(struct thread_data *td, struct fio_file *f)
 251 {
 252         if (!(f->flags & FIO_FILE_OPEN))
 253                 return 0;
 254
 255         return __file_invalidate_cache(td, f, -1, -1);
 256 }
 257
 258 int generic_close_file(struct thread_data fio_unused *td, struct fio_file *f)
 259 {
 260         int ret = 0;
 261
 262         dprint(FD_FILE, "fd close %s\n", f->file_name);
 263
 264         remove_file_hash(f);
 265
 266         if (close(f->fd) < 0)
 267                 ret = errno;
 268
 269         f->fd = -1;
 270         return ret;
 271 }
 272
 273 static int file_lookup_open(struct fio_file *f, int flags)
 274 {
 275         struct fio_file *__f;
 276         int from_hash;
 277
 278         __f = lookup_file_hash(f->file_name);
 279         if (__f) {
 280                 dprint(FD_FILE, "found file in hash %s\n", f->file_name);
 281                 /*
 282                  * racy, need the __f->lock locked
 283                  */
 284                 f->lock = __f->lock;
 285                 f->lock_owner = __f->lock_owner;
 286                 f->lock_batch = __f->lock_batch;
 287                 f->lock_ddir = __f->lock_ddir;
 288                 from_hash = 1;
 289         } else {
 290                 dprint(FD_FILE, "file not found in hash %s\n", f->file_name);
 291                 from_hash = 0;
 292         }
 293
 294         f->fd = open(f->file_name, flags, 0600);
 295         return from_hash;
 296 }
 297
 298 int generic_open_file(struct thread_data *td, struct fio_file *f)
 299 {
 300         int is_std = 0;
 301         int flags = 0;
 302         int from_hash = 0;
 303
 304         dprint(FD_FILE, "fd open %s\n", f->file_name);
 305
 306         if (!strcmp(f->file_name, "-")) {
 307                 if (td_rw(td)) {
 308                         log_err("fio: can't read/write to stdin/out\n");
 309                         return 1;
 310                 }
 311                 is_std = 1;
 312
 313                 /*
 314                  * move output logging to stderr, if we are writing to stdout
 315                  */
 316                 if (td_write(td))
 317                         f_out = stderr;
 318         }
 319
 320         if (td->o.odirect)
 321                 flags |= OS_O_DIRECT;
 322         if (td->o.sync_io)
 323                 flags |= O_SYNC;
 324         if (f->filetype != FIO_TYPE_FILE)
 325                 flags |= FIO_O_NOATIME;
 326         if (td->o.create_on_open)
 327                 flags |= O_CREAT;
 328
 329 open_again:
 330         if (td_write(td)) {
 331                 if (!read_only)
 332                         flags |= O_RDWR;
 333
 334                 if (f->filetype == FIO_TYPE_FILE)
 335                         flags |= O_CREAT;
 336
 337                 if (is_std)
 338                         f->fd = dup(STDOUT_FILENO);
 339                 else
 340                         from_hash = file_lookup_open(f, flags);
 341         } else {
 342                 if (f->filetype == FIO_TYPE_CHAR && !read_only)
 343                         flags |= O_RDWR;
 344                 else
 345                         flags |= O_RDONLY;
 346
 347                 if (is_std)
 348                         f->fd = dup(STDIN_FILENO);
 349                 else
 350                         from_hash = file_lookup_open(f, flags);
 351         }
 352
 353         if (f->fd == -1) {
 354                 char buf[FIO_VERROR_SIZE];
 355                 int __e = errno;
 356
 357                 if (errno == EPERM && (flags & FIO_O_NOATIME)) {
 358                         flags &= ~FIO_O_NOATIME;
 359                         goto open_again;
 360                 }
 361
 362                 snprintf(buf, sizeof(buf) - 1, "open(%s)", f->file_name);
 363
 364                 td_verror(td, __e, buf);
 365         }
 366
 367         if (!from_hash && f->fd != -1) {
 368                 if (add_file_hash(f)) {
 369                         int ret;
 370
 371                         /*
 372                          * OK to ignore, we haven't done anything with it
 373                          */
 374                         ret = generic_close_file(td, f);
 375                         goto open_again;
 376                 }
 377         }
 378
 379         return 0;
 380 }
 381
 382 int generic_get_file_size(struct thread_data *td, struct fio_file *f)
 383 {
 384         return get_file_size(td, f);
 385 }
 386
 387 /*
 388  * open/close all files, so that ->real_file_size gets set
 389  */
 390 static int get_file_sizes(struct thread_data *td)
 391 {
 392         struct fio_file *f;
 393         unsigned int i;
 394         int err = 0;
 395
 396         for_each_file(td, f, i) {
 397                 dprint(FD_FILE, "get file size for %p/%d/%p\n", f, i,
 398                                                                 f->file_name);
 399
 400                 if (td_io_get_file_size(td, f)) {
 401                         if (td->error != ENOENT) {
 402                                 log_err("%s\n", td->verror);
 403                                 err = 1;
 404                         }
 405                         clear_error(td);
 406                 }
 407
 408                 if (f->real_file_size == -1ULL && td->o.size)
 409                         f->real_file_size = td->o.size / td->o.nr_files;
 410         }
 411
 412         return err;
 413 }
 414
 415 /*
 416  * Open the files and setup files sizes, creating files if necessary.
 417  */
 418 int setup_files(struct thread_data *td)
 419 {
 420         unsigned long long total_size, extend_size;
 421         struct fio_file *f;
 422         unsigned int i;
 423         int err = 0, need_extend;
 424
 425         dprint(FD_FILE, "setup files\n");
 426
 427         if (td->o.read_iolog_file)
 428                 return 0;
 429
 430         /*
 431          * if ioengine defines a setup() method, it's responsible for
 432          * opening the files and setting f->real_file_size to indicate
 433          * the valid range for that file.
 434          */
 435         if (td->io_ops->setup)
 436                 err = td->io_ops->setup(td);
 437         else
 438                 err = get_file_sizes(td);
 439
 440         if (err)
 441                 return err;
 442
 443         /*
 444          * check sizes. if the files/devices do not exist and the size
 445          * isn't passed to fio, abort.
 446          */
 447         total_size = 0;
 448         for_each_file(td, f, i) {
 449                 if (f->real_file_size == -1ULL)
 450                         total_size = -1ULL;
 451                 else
 452                         total_size += f->real_file_size;
 453         }
 454
 455         /*
 456          * device/file sizes are zero and no size given, punt
 457          */
 458         if ((!total_size || total_size == -1ULL) && !td->o.size &&
 459             !(td->io_ops->flags & FIO_NOIO) && !td->o.fill_device) {
 460                 log_err("%s: you need to specify size=\n", td->o.name);
 461                 td_verror(td, EINVAL, "total_file_size");
 462                 return 1;
 463         }
 464
 465         /*
 466          * now file sizes are known, so we can set ->io_size. if size= is
 467          * not given, ->io_size is just equal to ->real_file_size. if size
 468          * is given, ->io_size is size / nr_files.
 469          */
 470         extend_size = total_size = 0;
 471         need_extend = 0;
 472         for_each_file(td, f, i) {
 473                 f->file_offset = td->o.start_offset;
 474
 475                 if (!td->o.file_size_low) {
 476                         /*
 477                          * no file size range given, file size is equal to
 478                          * total size divided by number of files. if that is
 479                          * zero, set it to the real file size.
 480                          */
 481                         f->io_size = td->o.size / td->o.nr_files;
 482                         if (!f->io_size)
 483                                 f->io_size = f->real_file_size - f->file_offset;
 484                 } else if (f->real_file_size < td->o.file_size_low ||
 485                            f->real_file_size > td->o.file_size_high) {
 486                         if (f->file_offset > td->o.file_size_low)
 487                                 goto err_offset;
 488                         /*
 489                          * file size given. if it's fixed, use that. if it's a
 490                          * range, generate a random size in-between.
 491                          */
 492                         if (td->o.file_size_low == td->o.file_size_high) {
 493                                 f->io_size = td->o.file_size_low
 494                                                 - f->file_offset;
 495                         } else {
 496                                 f->io_size = get_rand_file_size(td)
 497                                                 - f->file_offset;
 498                         }
 499                 } else
 500                         f->io_size = f->real_file_size - f->file_offset;
 501
 502                 if (f->io_size == -1ULL)
 503                         total_size = -1ULL;
 504                 else
 505                         total_size += f->io_size;
 506
 507                 if (f->filetype == FIO_TYPE_FILE &&
 508                     (f->io_size + f->file_offset) > f->real_file_size &&
 509                     !(td->io_ops->flags & FIO_DISKLESSIO)) {
 510                         if (!td->o.create_on_open) {
 511                                 need_extend++;
 512                                 extend_size += (f->io_size + f->file_offset);
 513                         } else
 514                                 f->real_file_size = f->io_size + f->file_offset;
 515                         f->flags |= FIO_FILE_EXTEND;
 516                 }
 517         }
 518
 519         if (!td->o.size || td->o.size > total_size)
 520                 td->o.size = total_size;
 521
 522         /*
 523          * See if we need to extend some files
 524          */
 525         if (need_extend) {
 526                 temp_stall_ts = 1;
 527                 if (!terse_output)
 528                         log_info("%s: Laying out IO file(s) (%u file(s) /"
 529                                  " %LuMiB)\n", td->o.name, need_extend,
 530                                         extend_size >> 20);
 531
 532                 for_each_file(td, f, i) {
 533                         unsigned long long old_len, extend_len;
 534
 535                         if (!(f->flags & FIO_FILE_EXTEND))
 536                                 continue;
 537
 538                         assert(f->filetype == FIO_TYPE_FILE);
 539                         f->flags &= ~FIO_FILE_EXTEND;
 540                         old_len = f->real_file_size;
 541                         extend_len = f->io_size + f->file_offset - old_len;
 542                         f->real_file_size = (f->io_size + f->file_offset);
 543                         err = extend_file(td, f);
 544                         if (err)
 545                                 break;
 546
 547                         err = __file_invalidate_cache(td, f, old_len,
 548                                                                 extend_len);
 549                         close(f->fd);
 550                         f->fd = -1;
 551                         if (err)
 552                                 break;
 553                 }
 554                 temp_stall_ts = 0;
 555         }
 556
 557         if (err)
 558                 return err;
 559
 560         if (!td->o.zone_size)
 561                 td->o.zone_size = td->o.size;
 562
 563         /*
 564          * iolog already set the total io size, if we read back
 565          * stored entries.
 566          */
 567         if (!td->o.read_iolog_file)
 568                 td->total_io_size = td->o.size * td->o.loops;
 569         return 0;
 570 err_offset:
 571         log_err("%s: you need to specify valid offset=\n", td->o.name);
 572         return 1;
 573 }
 574
 575 int init_random_map(struct thread_data *td)
 576 {
 577         unsigned long long blocks, num_maps;
 578         struct fio_file *f;
 579         unsigned int i;
 580
 581         if (td->o.norandommap || !td_random(td))
 582                 return 0;
 583
 584         for_each_file(td, f, i) {
 585                 blocks = (f->real_file_size + td->o.rw_min_bs - 1) /
 586                                 (unsigned long long) td->o.rw_min_bs;
 587                 num_maps = (blocks + BLOCKS_PER_MAP - 1) /
 588                                 (unsigned long long) BLOCKS_PER_MAP;
 589                 f->file_map = smalloc(num_maps * sizeof(int));
 590                 if (f->file_map) {
 591                         f->num_maps = num_maps;
 592                         continue;
 593                 }
 594                 if (!td->o.softrandommap) {
 595                         log_err("fio: failed allocating random map. If running"
 596                                 " a large number of jobs, try the 'norandommap'"
 597                                 " option or set 'softrandommap'. Or give"
 598                                 " a larger --alloc-size to fio.\n");
 599                         return 1;
 600                 }
 601
 602                 log_info("fio: file %s failed allocating random map. Running "
 603                          "job without.\n", f->file_name);
 604                 f->num_maps = 0;
 605         }
 606
 607         return 0;
 608 }
 609
 610 void close_files(struct thread_data *td)
 611 {
 612         struct fio_file *f;
 613         unsigned int i;
 614
 615         for_each_file(td, f, i)
 616                 td_io_close_file(td, f);
 617 }
 618
 619 void close_and_free_files(struct thread_data *td)
 620 {
 621         struct fio_file *f;
 622         unsigned int i;
 623
 624         dprint(FD_FILE, "close files\n");
 625
 626         for_each_file(td, f, i) {
 627                 if (td->o.unlink && f->filetype == FIO_TYPE_FILE) {
 628                         dprint(FD_FILE, "free unlink %s\n", f->file_name);
 629                         unlink(f->file_name);
 630                 }
 631
 632                 td_io_close_file(td, f);
 633                 remove_file_hash(f);
 634
 635                 sfree(f->file_name);
 636                 f->file_name = NULL;
 637
 638                 if (f->file_map) {
 639                         sfree(f->file_map);
 640                         f->file_map = NULL;
 641                 }
 642                 sfree(f);
 643         }
 644
 645         td->o.filename = NULL;
 646         free(td->files);
 647         td->files_index = 0;
 648         td->files = NULL;
 649         td->o.nr_files = 0;
 650 }
 651
 652 static void get_file_type(struct fio_file *f)
 653 {
 654         struct stat sb;
 655
 656         if (!strcmp(f->file_name, "-"))
 657                 f->filetype = FIO_TYPE_PIPE;
 658         else
 659                 f->filetype = FIO_TYPE_FILE;
 660
 661         if (!lstat(f->file_name, &sb)) {
 662                 if (S_ISBLK(sb.st_mode))
 663                         f->filetype = FIO_TYPE_BD;
 664                 else if (S_ISCHR(sb.st_mode))
 665                         f->filetype = FIO_TYPE_CHAR;
 666                 else if (S_ISFIFO(sb.st_mode))
 667                         f->filetype = FIO_TYPE_PIPE;
 668         }
 669 }
 670
 671 int add_file(struct thread_data *td, const char *fname)
 672 {
 673         int cur_files = td->files_index;
 674         char file_name[PATH_MAX];
 675         struct fio_file *f;
 676         int len = 0;
 677
 678         dprint(FD_FILE, "add file %s\n", fname);
 679
 680         f = smalloc(sizeof(*f));
 681         if (!f) {
 682                 log_err("fio: smalloc OOM\n");
 683                 assert(0);
 684         }
 685
 686         f->fd = -1;
 687
 688         if (td->files_size <= td->files_index) {
 689                 int new_size = td->o.nr_files + 1;
 690
 691                 dprint(FD_FILE, "resize file array to %d files\n", new_size);
 692
 693                 td->files = realloc(td->files, new_size * sizeof(f));
 694                 td->files_size = new_size;
 695         }
 696         td->files[cur_files] = f;
 697
 698         /*
 699          * init function, io engine may not be loaded yet
 700          */
 701         if (td->io_ops && (td->io_ops->flags & FIO_DISKLESSIO))
 702                 f->real_file_size = -1ULL;
 703
 704         if (td->o.directory)
 705                 len = sprintf(file_name, "%s/", td->o.directory);
 706
 707         sprintf(file_name + len, "%s", fname);
 708         f->file_name = smalloc_strdup(file_name);
 709         if (!f->file_name) {
 710                 log_err("fio: smalloc OOM\n");
 711                 assert(0);
 712         }
 713
 714         get_file_type(f);
 715
 716         switch (td->o.file_lock_mode) {
 717         case FILE_LOCK_NONE:
 718                 break;
 719         case FILE_LOCK_READWRITE:
 720                 f->lock = fio_mutex_rw_init();
 721                 break;
 722         case FILE_LOCK_EXCLUSIVE:
 723                 f->lock = fio_mutex_init(1);
 724                 break;
 725         default:
 726                 log_err("fio: unknown lock mode: %d\n", td->o.file_lock_mode);
 727                 assert(0);
 728         }
 729
 730         td->files_index++;
 731         if (f->filetype == FIO_TYPE_FILE)
 732                 td->nr_normal_files++;
 733
 734         dprint(FD_FILE, "file %p \"%s\" added at %d\n", f, f->file_name,
 735                                                         cur_files);
 736
 737         return cur_files;
 738 }
 739
 740 void get_file(struct fio_file *f)
 741 {
 742         dprint(FD_FILE, "get file %s, ref=%d\n", f->file_name, f->references);
 743         assert(f->flags & FIO_FILE_OPEN);
 744         f->references++;
 745 }
 746
 747 int put_file(struct thread_data *td, struct fio_file *f)
 748 {
 749         int f_ret = 0, ret = 0;
 750
 751         dprint(FD_FILE, "put file %s, ref=%d\n", f->file_name, f->references);
 752
 753         if (!(f->flags & FIO_FILE_OPEN))
 754                 return 0;
 755
 756         assert(f->references);
 757         if (--f->references)
 758                 return 0;
 759
 760         if (should_fsync(td) && td->o.fsync_on_close)
 761                 f_ret = fsync(f->fd);
 762
 763         if (td->io_ops->close_file)
 764                 ret = td->io_ops->close_file(td, f);
 765
 766         if (!ret)
 767                 ret = f_ret;
 768
 769         td->nr_open_files--;
 770         f->flags &= ~FIO_FILE_OPEN;
 771         return ret;
 772 }
 773
 774 void lock_file(struct thread_data *td, struct fio_file *f, enum fio_ddir ddir)
 775 {
 776         if (!f->lock || td->o.file_lock_mode == FILE_LOCK_NONE)
 777                 return;
 778
 779         if (f->lock_owner == td && f->lock_batch--)
 780                 return;
 781
 782         if (td->o.file_lock_mode == FILE_LOCK_READWRITE) {
 783                 if (ddir == DDIR_READ)
 784                         fio_mutex_down_read(f->lock);
 785                 else
 786                         fio_mutex_down_write(f->lock);
 787         } else if (td->o.file_lock_mode == FILE_LOCK_EXCLUSIVE)
 788                 fio_mutex_down(f->lock);
 789
 790         f->lock_owner = td;
 791         f->lock_batch = td->o.lockfile_batch;
 792         f->lock_ddir = ddir;
 793 }
 794
 795 void unlock_file(struct thread_data *td, struct fio_file *f)
 796 {
 797         if (!f->lock || td->o.file_lock_mode == FILE_LOCK_NONE)
 798                 return;
 799         if (f->lock_batch)
 800                 return;
 801
 802         if (td->o.file_lock_mode == FILE_LOCK_READWRITE) {
 803                 const int is_read = f->lock_ddir == DDIR_READ;
 804                 int val = fio_mutex_getval(f->lock);
 805
 806                 if ((is_read && val == 1) || (!is_read && val == -1))
 807                         f->lock_owner = NULL;
 808
 809                 if (is_read)
 810                         fio_mutex_up_read(f->lock);
 811                 else
 812                         fio_mutex_up_write(f->lock);
 813         } else if (td->o.file_lock_mode == FILE_LOCK_EXCLUSIVE) {
 814                 int val = fio_mutex_getval(f->lock);
 815
 816                 if (val == 0)
 817                         f->lock_owner = NULL;
 818
 819                 fio_mutex_up(f->lock);
 820         }
 821 }
 822
 823 void unlock_file_all(struct thread_data *td, struct fio_file *f)
 824 {
 825         if (f->lock_owner != td)
 826                 return;
 827
 828         f->lock_batch = 0;
 829         unlock_file(td, f);
 830 }
 831
 832 static int recurse_dir(struct thread_data *td, const char *dirname)
 833 {
 834         struct dirent *dir;
 835         int ret = 0;
 836         DIR *D;
 837
 838         D = opendir(dirname);
 839         if (!D) {
 840                 char buf[FIO_VERROR_SIZE];
 841
 842                 snprintf(buf, FIO_VERROR_SIZE - 1, "opendir(%s)", dirname);
 843                 td_verror(td, errno, buf);
 844                 return 1;
 845         }
 846
 847         while ((dir = readdir(D)) != NULL) {
 848                 char full_path[PATH_MAX];
 849                 struct stat sb;
 850
 851                 if (!strcmp(dir->d_name, ".") || !strcmp(dir->d_name, ".."))
 852                         continue;
 853
 854                 sprintf(full_path, "%s/%s", dirname, dir->d_name);
 855
 856                 if (lstat(full_path, &sb) == -1) {
 857                         if (errno != ENOENT) {
 858                                 td_verror(td, errno, "stat");
 859                                 return 1;
 860                         }
 861                 }
 862
 863                 if (S_ISREG(sb.st_mode)) {
 864                         add_file(td, full_path);
 865                         td->o.nr_files++;
 866                         continue;
 867                 }
 868                 if (!S_ISDIR(sb.st_mode))
 869                         continue;
 870
 871                 ret = recurse_dir(td, full_path);
 872                 if (ret)
 873                         break;
 874         }
 875
 876         closedir(D);
 877         return ret;
 878 }
 879
 880 int add_dir_files(struct thread_data *td, const char *path)
 881 {
 882         int ret = recurse_dir(td, path);
 883
 884         if (!ret)
 885                 log_info("fio: opendir added %d files\n", td->o.nr_files);
 886
 887         return ret;
 888 }
 889
 890 void dup_files(struct thread_data *td, struct thread_data *org)
 891 {
 892         struct fio_file *f;
 893         unsigned int i;
 894
 895         dprint(FD_FILE, "dup files: %d\n", org->files_index);
 896
 897         if (!org->files)
 898                 return;
 899
 900         td->files = malloc(org->files_index * sizeof(f));
 901
 902         for_each_file(org, f, i) {
 903                 struct fio_file *__f;
 904
 905                 __f = smalloc(sizeof(*__f));
 906                 if (!__f) {
 907                         log_err("fio: smalloc OOM\n");
 908                         assert(0);
 909                 }
 910
 911                 if (f->file_name) {
 912                         __f->file_name = smalloc_strdup(f->file_name);
 913                         if (!__f->file_name) {
 914                                 log_err("fio: smalloc OOM\n");
 915                                 assert(0);
 916                         }
 917
 918                         __f->filetype = f->filetype;
 919                 }
 920
 921                 td->files[i] = __f;
 922         }
 923 }
 924
 925 /*
 926  * Returns the index that matches the filename, or -1 if not there
 927  */
 928 int get_fileno(struct thread_data *td, const char *fname)
 929 {
 930         struct fio_file *f;
 931         unsigned int i;
 932
 933         for_each_file(td, f, i)
 934                 if (!strcmp(f->file_name, fname))
 935                         return i;
 936
 937         return -1;
 938 }
 939
 940 /*
 941  * For log usage, where we add/open/close files automatically
 942  */
 943 void free_release_files(struct thread_data *td)
 944 {
 945         close_files(td);
 946         td->files_index = 0;
 947         td->nr_normal_files = 0;
 948 }