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