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