Move setup_rate() out of log.c
[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 "os.h"
12
13 /*
14  * Check if the file exists and it's large enough.
15  */
16 static int file_ok(struct thread_data *td, struct fio_file *f)
17 {
18         struct stat st;
19
20         if (f->filetype != FIO_TYPE_FILE ||
21             (td->io_ops->flags & FIO_DISKLESSIO))
22                 return 0;
23
24         if (lstat(f->file_name, &st) == -1)
25                 return 1;
26
27         /*
28          * if it's a special file, size is always ok for now
29          */
30         if (S_ISCHR(st.st_mode) || S_ISBLK(st.st_mode))
31                 return 0;
32         if (st.st_size < (off_t) f->file_size)
33                 return 1;
34
35         return 0;
36 }
37
38 static int create_file(struct thread_data *td, struct fio_file *f)
39 {
40         unsigned long long left;
41         unsigned int bs;
42         char *b;
43         int r;
44
45         f->fd = open(f->file_name, O_WRONLY | O_CREAT | O_TRUNC, 0644);
46         if (f->fd < 0) {
47                 td_verror(td, errno, "open");
48                 return 1;
49         }
50
51         if (ftruncate(f->fd, f->file_size) == -1) {
52                 td_verror(td, errno, "ftruncate");
53                 goto err;
54         }
55
56         if (posix_fallocate(f->fd, 0, f->file_size) < 0) {
57                 td_verror(td, errno, "posix_fallocate");
58                 goto err;
59         }
60
61         b = malloc(td->max_bs[DDIR_WRITE]);
62         memset(b, 0, td->max_bs[DDIR_WRITE]);
63
64         left = f->file_size;
65         while (left && !td->terminate) {
66                 bs = td->max_bs[DDIR_WRITE];
67                 if (bs > left)
68                         bs = left;
69
70                 r = write(f->fd, b, bs);
71
72                 if (r == (int) bs) {
73                         left -= bs;
74                         continue;
75                 } else {
76                         if (r < 0)
77                                 td_verror(td, errno, "write");
78                         else
79                                 td_verror(td, EIO, "write");
80
81                         break;
82                 }
83         }
84
85         if (td->terminate)
86                 unlink(f->file_name);
87         else if (td->create_fsync)
88                 fsync(f->fd);
89
90         free(b);
91         close(f->fd);
92         f->fd = -1;
93         return 0;
94 err:
95         close(f->fd);
96         f->fd = -1;
97         return 1;
98 }
99
100 static unsigned long long set_rand_file_size(struct thread_data *td,
101                                              unsigned long long total_size)
102 {
103         unsigned long long upper = total_size;
104         unsigned long long ret;
105         long r;
106
107         if (upper > td->file_size_high)
108                 upper = td->file_size_high;
109         else if (upper < td->file_size_low)
110                 return 0;
111         else if (!upper)
112                 return 0;
113
114         r = os_random_long(&td->file_size_state);
115         ret = td->file_size_low + (unsigned long long) ((double) upper * (r / (RAND_MAX + 1.0)));
116         ret -= (ret % td->rw_min_bs);
117         if (ret > upper)
118                 ret = upper;
119         return ret;
120 }
121
122 static int create_files(struct thread_data *td)
123 {
124         struct fio_file *f;
125         int err, need_create, can_extend;
126         unsigned long long total_file_size, local_file_size, create_size;
127         unsigned int i, new_files;
128
129         new_files = 0;
130         total_file_size = td->total_file_size;
131         for_each_file(td, f, i) {
132                 unsigned long long s;
133
134                 f->file_offset = td->start_offset;
135
136                 if (f->filetype != FIO_TYPE_FILE)
137                         continue;
138
139                 if (f->flags & FIO_FILE_EXISTS) {
140                         s = f->file_size;
141                         if (s > total_file_size)
142                                 s = total_file_size;
143
144                         total_file_size -= s;
145                 } else
146                         new_files++;
147         }
148
149         /*
150          * unless specifically asked for overwrite, let normal io extend it
151          */
152         can_extend = !td->overwrite && !(td->io_ops->flags & FIO_NOEXTEND);
153         if (can_extend)
154                 return 0;
155
156         local_file_size = total_file_size;
157         if (!local_file_size)
158                 local_file_size = -1;
159
160         total_file_size = 0;
161         need_create = 0;
162         create_size = 0;
163         for_each_file(td, f, i) {
164                 int file_there;
165
166                 if (f->filetype != FIO_TYPE_FILE)
167                         continue;
168                 if (f->flags & FIO_FILE_EXISTS) {
169                         total_file_size += f->file_size;
170                         continue;
171                 }
172
173                 if (!td->file_size_low)
174                         f->file_size = total_file_size / new_files;
175                 else {
176                         /*
177                          * If we don't have enough space left for a file
178                          * of the minimum size, bail.
179                          */
180                         if (local_file_size < td->file_size_low) {
181                                 log_info("fio: limited to %d files\n", i);
182                                 new_files -= (td->nr_files - i);
183                                 td->nr_files = i;
184                                 break;
185                         }
186
187                         f->file_size = set_rand_file_size(td, local_file_size);
188                         local_file_size -= f->file_size;
189                 }
190
191                 total_file_size += f->file_size;
192                 create_size += f->file_size;
193                 file_there = !file_ok(td, f);
194
195                 if (file_there && td_write(td) && !td->overwrite) {
196                         unlink(f->file_name);
197                         file_there = 0;
198                 }
199
200                 need_create += !file_there;
201         }
202
203         if (!need_create)
204                 return 0;
205
206         if (!td->total_file_size && !total_file_size) {
207                 log_err("Need size for create\n");
208                 td_verror(td, EINVAL, "file_size");
209                 return 1;
210         }
211
212         temp_stall_ts = 1;
213         log_info("%s: Laying out IO file(s) (%u files / %LuMiB)\n",
214                                 td->name, new_files, create_size >> 20);
215
216         err = 0;
217         for_each_file(td, f, i) {
218                 /*
219                  * Only unlink files that we created.
220                  */
221                 f->flags &= ~FIO_FILE_UNLINK;
222                 if (file_ok(td, f)) {
223                         if (td->unlink)
224                                 f->flags |= FIO_FILE_UNLINK;
225
226                         err = create_file(td, f);
227                         if (err)
228                                 break;
229                 }
230         }
231
232         temp_stall_ts = 0;
233         return err;
234 }
235
236 static int file_size(struct thread_data *td, struct fio_file *f)
237 {
238         struct stat st;
239
240         if (td->overwrite) {
241                 if (fstat(f->fd, &st) == -1) {
242                         td_verror(td, errno, "fstat");
243                         return 1;
244                 }
245
246                 f->real_file_size = st.st_size;
247
248                 if (!f->file_size || f->file_size > f->real_file_size)
249                         f->file_size = f->real_file_size;
250         } else
251                 f->real_file_size = f->file_size;
252
253         return 0;
254 }
255
256 static int bdev_size(struct thread_data *td, struct fio_file *f)
257 {
258         unsigned long long bytes;
259         int r;
260
261         r = blockdev_size(f->fd, &bytes);
262         if (r) {
263                 td_verror(td, r, "blockdev_size");
264                 return 1;
265         }
266
267         f->real_file_size = bytes;
268
269         /*
270          * no extend possibilities, so limit size to device size if too large
271          */
272         if (!f->file_size || f->file_size > f->real_file_size)
273                 f->file_size = f->real_file_size;
274
275         f->file_size -= f->file_offset;
276         return 0;
277 }
278
279 static int get_file_size(struct thread_data *td, struct fio_file *f)
280 {
281         int ret = 0;
282
283         if (f->filetype == FIO_TYPE_FILE) {
284                 if (!(f->flags & FIO_FILE_EXISTS))
285                         ret = file_size(td, f);
286         } else if (f->filetype == FIO_TYPE_BD)
287                 ret = bdev_size(td, f);
288         else
289                 f->real_file_size = -1;
290
291         if (ret)
292                 return ret;
293
294         if (f->file_offset > f->real_file_size) {
295                 log_err("%s: offset extends end (%Lu > %Lu)\n", td->name, f->file_offset, f->real_file_size);
296                 return 1;
297         }
298
299         return 0;
300 }
301
302 int file_invalidate_cache(struct thread_data *td, struct fio_file *f)
303 {
304         int ret = 0;
305
306         if (td->odirect)
307                 return 0;
308
309         /*
310          * FIXME: add blockdev flushing too
311          */
312         if (f->mmap)
313                 ret = madvise(f->mmap, f->file_size, MADV_DONTNEED);
314         else if (f->filetype == FIO_TYPE_FILE) {
315                 ret = fadvise(f->fd, f->file_offset, f->file_size, POSIX_FADV_DONTNEED);
316         } else if (f->filetype == FIO_TYPE_BD) {
317                 ret = blockdev_invalidate_cache(f->fd);
318         } else if (f->filetype == FIO_TYPE_CHAR)
319                 ret = 0;
320
321         if (ret < 0) {
322                 td_verror(td, errno, "invalidate_cache");
323                 return 1;
324         }
325
326         return ret;
327 }
328
329 void generic_close_file(struct thread_data fio_unused *td, struct fio_file *f)
330 {
331         close(f->fd);
332         f->fd = -1;
333 }
334
335 int generic_open_file(struct thread_data *td, struct fio_file *f)
336 {
337         int flags = 0;
338
339         if (td->odirect)
340                 flags |= OS_O_DIRECT;
341         if (td->sync_io)
342                 flags |= O_SYNC;
343
344         if (td_write(td) || td_rw(td)) {
345                 flags |= O_RDWR;
346
347                 if (f->filetype == FIO_TYPE_FILE)
348                         flags |= O_CREAT;
349
350                 f->fd = open(f->file_name, flags, 0600);
351         } else {
352                 if (f->filetype == FIO_TYPE_CHAR)
353                         flags |= O_RDWR;
354                 else
355                         flags |= O_RDONLY;
356
357                 f->fd = open(f->file_name, flags);
358         }
359
360         if (f->fd == -1) {
361                 int __e = errno;
362
363                 td_verror(td, __e, "open");
364                 if (__e == EINVAL && td->odirect)
365                         log_err("fio: destination does not support O_DIRECT\n");
366                 if (__e == EMFILE)
367                         log_err("fio: try reducing/setting openfiles (failed at %u of %u)\n", td->nr_open_files, td->nr_files);
368                 return 1;
369         }
370
371         if (get_file_size(td, f))
372                 goto err;
373
374         if (td->invalidate_cache && file_invalidate_cache(td, f))
375                 goto err;
376
377         if (!td_random(td)) {
378                 if (fadvise(f->fd, f->file_offset, f->file_size, POSIX_FADV_SEQUENTIAL) < 0) {
379                         td_verror(td, errno, "fadvise");
380                         goto err;
381                 }
382         } else {
383                 if (fadvise(f->fd, f->file_offset, f->file_size, POSIX_FADV_RANDOM) < 0) {
384                         td_verror(td, errno, "fadvise");
385                         goto err;
386                 }
387         }
388
389         return 0;
390 err:
391         close(f->fd);
392         return 1;
393 }
394
395 int open_files(struct thread_data *td)
396 {
397         struct fio_file *f;
398         unsigned int i;
399         int err = 0;
400
401         for_each_file(td, f, i) {
402                 err = td_io_open_file(td, f);
403                 if (err)
404                         break;
405
406                 if (td->open_files == td->nr_open_files)
407                         break;
408         }
409
410         if (!err)
411                 return 0;
412
413         for_each_file(td, f, i)
414                 td_io_close_file(td, f);
415
416         return err;
417 }
418
419 int setup_files(struct thread_data *td)
420 {
421         struct fio_file *f;
422         unsigned int i;
423         int err;
424
425         /*
426          * if ioengine defines a setup() method, it's responsible for
427          * setting up everything in the td->files[] area.
428          */
429         if (td->io_ops->setup)
430                 return td->io_ops->setup(td);
431
432         if (create_files(td))
433                 return 1;
434
435         err = open_files(td);
436         if (err)
437                 return err;
438
439         /*
440          * Recalculate the total file size now that files are set up.
441          */
442         td->total_file_size = 0;
443         for_each_file(td, f, i)
444                 td->total_file_size += f->file_size;
445
446         td->io_size = td->total_file_size;
447         if (td->io_size == 0) {
448                 log_err("%s: no io blocks\n", td->name);
449                 td_verror(td, EINVAL, "total_file_size");
450                 return 1;
451         }
452
453         if (!td->zone_size)
454                 td->zone_size = td->io_size;
455
456         td->total_io_size = td->io_size * td->loops;
457
458         for_each_file(td, f, i)
459                 td_io_close_file(td, f);
460
461         return err;
462 }
463
464 void close_files(struct thread_data *td)
465 {
466         struct fio_file *f;
467         unsigned int i;
468
469         for_each_file(td, f, i) {
470                 if (!f->file_name && (f->flags & FIO_FILE_UNLINK) &&
471                     f->filetype == FIO_TYPE_FILE) {
472                         unlink(f->file_name);
473                         free(f->file_name);
474                         f->file_name = NULL;
475                 }
476
477                 td_io_close_file(td, f);
478
479                 if (f->file_map)
480                         free(f->file_map);
481         }
482
483         td->filename = NULL;
484         td->files = NULL;
485         td->nr_files = 0;
486 }
487
488 static void get_file_type(struct fio_file *f)
489 {
490         struct stat sb;
491
492         f->filetype = FIO_TYPE_FILE;
493
494         if (!lstat(f->file_name, &sb)) {
495                 f->flags |= FIO_FILE_EXISTS;
496
497                 if (S_ISBLK(sb.st_mode))
498                         f->filetype = FIO_TYPE_BD;
499                 else if (S_ISCHR(sb.st_mode))
500                         f->filetype = FIO_TYPE_CHAR;
501                 else {
502                         /*
503                          * might as well do this here, and save a stat later on
504                          */
505                         f->real_file_size = sb.st_size;
506                         f->file_size = f->real_file_size;
507                 }
508         }
509 }
510
511 void add_file(struct thread_data *td, const char *fname)
512 {
513         int cur_files = td->files_index;
514         struct fio_file *f;
515
516         td->files = realloc(td->files, (cur_files + 1) * sizeof(*f));
517
518         f = &td->files[cur_files];
519         memset(f, 0, sizeof(*f));
520         f->fd = -1;
521         f->file_name = strdup(fname);
522
523         get_file_type(f);
524
525         td->files_index++;
526         if (f->filetype == FIO_TYPE_FILE)
527                 td->nr_normal_files++;
528 }
529
530 void get_file(struct fio_file *f)
531 {
532         f->references++;
533 }
534
535 void put_file(struct thread_data *td, struct fio_file *f)
536 {
537         if (!(f->flags & FIO_FILE_OPEN))
538                 return;
539
540         assert(f->references);
541         if (--f->references)
542                 return;
543
544         if (should_fsync(td) && td->fsync_on_close)
545                 fsync(f->fd);
546
547         if (td->io_ops->close_file)
548                 td->io_ops->close_file(td, f);
549         td->nr_open_files--;
550         f->flags &= ~FIO_FILE_OPEN;
551 }
552
553 static int recurse_dir(struct thread_data *td, const char *dirname)
554 {
555         struct dirent *dir;
556         int ret = 0;
557         DIR *D;
558
559         D = opendir(dirname);
560         if (!D) {
561                 td_verror(td, errno, "opendir");
562                 return 1;
563         }
564
565         while ((dir = readdir(D)) != NULL) {
566                 char full_path[PATH_MAX];
567                 struct stat sb;
568
569                 if (!strcmp(dir->d_name, ".") || !strcmp(dir->d_name, ".."))
570                         continue;
571
572                 sprintf(full_path, "%s/%s", dirname, dir->d_name);
573
574                 if (lstat(full_path, &sb) == -1) {
575                         if (errno != ENOENT) {
576                                 td_verror(td, errno, "stat");
577                                 return 1;
578                         }
579                 }
580
581                 if (S_ISREG(sb.st_mode)) {
582                         add_file(td, full_path);
583                         td->nr_files++;
584                         continue;
585                 }
586
587                 if ((ret = recurse_dir(td, full_path)) != 0)
588                         break;
589         }
590
591         closedir(D);
592         return ret;
593 }
594
595 int add_dir_files(struct thread_data *td, const char *path)
596 {
597         return recurse_dir(td, path);
598 }