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