File close fixes
[fio.git] / ioengines.c
1 /*
2  * The io parts of the fio tool, includes workers for sync and mmap'ed
3  * io, as well as both posix and linux libaio support.
4  *
5  * sync io is implemented on top of aio.
6  *
7  * This is not really specific to fio, if the get_io_u/put_io_u and
8  * structures was pulled into this as well it would be a perfectly
9  * generic io engine that could be used for other projects.
10  *
11  */
12 #include <stdio.h>
13 #include <stdlib.h>
14 #include <unistd.h>
15 #include <string.h>
16 #include <dlfcn.h>
17 #include <assert.h>
18
19 #include "fio.h"
20 #include "diskutil.h"
21
22 static FLIST_HEAD(engine_list);
23
24 static int check_engine_ops(struct ioengine_ops *ops)
25 {
26         if (ops->version != FIO_IOOPS_VERSION) {
27                 log_err("bad ioops version %d (want %d)\n", ops->version,
28                                                         FIO_IOOPS_VERSION);
29                 return 1;
30         }
31
32         if (!ops->queue) {
33                 log_err("%s: no queue handler\n", ops->name);
34                 return 1;
35         }
36
37         /*
38          * sync engines only need a ->queue()
39          */
40         if (ops->flags & FIO_SYNCIO)
41                 return 0;
42
43         if (!ops->event) {
44                 log_err("%s: no event handler\n", ops->name);
45                 return 1;
46         }
47         if (!ops->getevents) {
48                 log_err("%s: no getevents handler\n", ops->name);
49                 return 1;
50         }
51         if (!ops->queue) {
52                 log_err("%s: no queue handler\n", ops->name);
53                 return 1;
54         }
55
56         return 0;
57 }
58
59 void unregister_ioengine(struct ioengine_ops *ops)
60 {
61         dprint(FD_IO, "ioengine %s unregistered\n", ops->name);
62         flist_del(&ops->list);
63         INIT_FLIST_HEAD(&ops->list);
64 }
65
66 void register_ioengine(struct ioengine_ops *ops)
67 {
68         dprint(FD_IO, "ioengine %s registered\n", ops->name);
69         INIT_FLIST_HEAD(&ops->list);
70         flist_add_tail(&ops->list, &engine_list);
71 }
72
73 static struct ioengine_ops *find_ioengine(const char *name)
74 {
75         struct ioengine_ops *ops;
76         struct flist_head *entry;
77
78         flist_for_each(entry, &engine_list) {
79                 ops = flist_entry(entry, struct ioengine_ops, list);
80                 if (!strcmp(name, ops->name))
81                         return ops;
82         }
83
84         return NULL;
85 }
86
87 static struct ioengine_ops *dlopen_ioengine(struct thread_data *td,
88                                             const char *engine_lib)
89 {
90         struct ioengine_ops *ops;
91         void *dlhandle;
92
93         dprint(FD_IO, "dload engine %s\n", engine_lib);
94
95         dlerror();
96         dlhandle = dlopen(engine_lib, RTLD_LAZY);
97         if (!dlhandle) {
98                 td_vmsg(td, -1, dlerror(), "dlopen");
99                 return NULL;
100         }
101
102         /*
103          * Unlike the included modules, external engines should have a
104          * non-static ioengine structure that we can reference.
105          */
106         ops = dlsym(dlhandle, "ioengine");
107         if (!ops) {
108                 td_vmsg(td, -1, dlerror(), "dlsym");
109                 dlclose(dlhandle);
110                 return NULL;
111         }
112
113         ops->dlhandle = dlhandle;
114         return ops;
115 }
116
117 struct ioengine_ops *load_ioengine(struct thread_data *td, const char *name)
118 {
119         struct ioengine_ops *ops, *ret;
120         char engine[16];
121
122         dprint(FD_IO, "load ioengine %s\n", name);
123
124         strncpy(engine, name, sizeof(engine) - 1);
125
126         /*
127          * linux libaio has alias names, so convert to what we want
128          */
129         if (!strncmp(engine, "linuxaio", 8) || !strncmp(engine, "aio", 3))
130                 strcpy(engine, "libaio");
131
132         ops = find_ioengine(engine);
133         if (!ops)
134                 ops = dlopen_ioengine(td, name);
135
136         if (!ops) {
137                 log_err("fio: engine %s not loadable\n", name);
138                 return NULL;
139         }
140
141         /*
142          * Check that the required methods are there.
143          */
144         if (check_engine_ops(ops))
145                 return NULL;
146
147         ret = malloc(sizeof(*ret));
148         memcpy(ret, ops, sizeof(*ret));
149         ret->data = NULL;
150
151         return ret;
152 }
153
154 void close_ioengine(struct thread_data *td)
155 {
156         dprint(FD_IO, "close ioengine %s\n", td->io_ops->name);
157
158         if (td->io_ops->cleanup) {
159                 td->io_ops->cleanup(td);
160                 td->io_ops->data = NULL;
161         }
162
163         if (td->io_ops->dlhandle)
164                 dlclose(td->io_ops->dlhandle);
165
166         free(td->io_ops);
167         td->io_ops = NULL;
168 }
169
170 int td_io_prep(struct thread_data *td, struct io_u *io_u)
171 {
172         dprint_io_u(io_u, "prep");
173         fio_ro_check(td, io_u);
174
175         lock_file(td, io_u->file, io_u->ddir);
176
177         if (td->io_ops->prep) {
178                 int ret = td->io_ops->prep(td, io_u);
179
180                 dprint(FD_IO, "->prep(%p)=%d\n", io_u, ret);
181                 if (ret)
182                         unlock_file(td, io_u->file);
183                 return ret;
184         }
185
186         return 0;
187 }
188
189 int td_io_getevents(struct thread_data *td, unsigned int min, unsigned int max,
190                     struct timespec *t)
191 {
192         int r = 0;
193
194         if (min > 0 && td->io_ops->commit) {
195                 r = td->io_ops->commit(td);
196                 if (r < 0)
197                         goto out;
198         }
199         if (max > td->cur_depth)
200                 max = td->cur_depth;
201         if (min > max)
202                 max = min;
203
204         r = 0;
205         if (max && td->io_ops->getevents)
206                 r = td->io_ops->getevents(td, min, max, t);
207 out:
208         if (r >= 0)
209                 io_u_mark_complete(td, r);
210         dprint(FD_IO, "getevents: %d\n", r);
211         return r;
212 }
213
214 int td_io_queue(struct thread_data *td, struct io_u *io_u)
215 {
216         int ret;
217
218         dprint_io_u(io_u, "queue");
219         fio_ro_check(td, io_u);
220
221         assert((io_u->flags & IO_U_F_FLIGHT) == 0);
222         io_u->flags |= IO_U_F_FLIGHT;
223
224         assert(fio_file_open(io_u->file));
225
226         io_u->error = 0;
227         io_u->resid = 0;
228
229         if (td->io_ops->flags & FIO_SYNCIO) {
230                 if (fio_fill_issue_time(td))
231                         fio_gettime(&io_u->issue_time, NULL);
232
233                 /*
234                  * only used for iolog
235                  */
236                 if (td->o.read_iolog_file)
237                         memcpy(&td->last_issue, &io_u->issue_time,
238                                         sizeof(struct timeval));
239         }
240
241         if (io_u->ddir != DDIR_SYNC)
242                 td->io_issues[io_u->ddir]++;
243
244         ret = td->io_ops->queue(td, io_u);
245
246         unlock_file(td, io_u->file);
247
248         if (!td->io_ops->commit) {
249                 io_u_mark_submit(td, 1);
250                 io_u_mark_complete(td, 1);
251         }
252
253         if (ret == FIO_Q_COMPLETED) {
254                 if (io_u->ddir != DDIR_SYNC) {
255                         io_u_mark_depth(td, 1);
256                         td->ts.total_io_u[io_u->ddir]++;
257                 }
258         } else if (ret == FIO_Q_QUEUED) {
259                 int r;
260
261                 if (io_u->ddir != DDIR_SYNC) {
262                         td->io_u_queued++;
263                         td->ts.total_io_u[io_u->ddir]++;
264                 }
265
266                 if (td->io_u_queued >= td->o.iodepth_batch) {
267                         r = td_io_commit(td);
268                         if (r < 0)
269                                 return r;
270                 }
271         }
272
273         if ((td->io_ops->flags & FIO_SYNCIO) == 0) {
274                 if (fio_fill_issue_time(td))
275                         fio_gettime(&io_u->issue_time, NULL);
276
277                 /*
278                  * only used for iolog
279                  */
280                 if (td->o.read_iolog_file)
281                         memcpy(&td->last_issue, &io_u->issue_time,
282                                         sizeof(struct timeval));
283         }
284
285         return ret;
286 }
287
288 int td_io_init(struct thread_data *td)
289 {
290         int ret = 0;
291
292         if (td->io_ops->init) {
293                 ret = td->io_ops->init(td);
294                 if (ret && td->o.iodepth > 1) {
295                         log_err("fio: io engine init failed. Perhaps try"
296                                 " reducing io depth?\n");
297                 }
298         }
299
300         return ret;
301 }
302
303 int td_io_commit(struct thread_data *td)
304 {
305         dprint(FD_IO, "calling ->commit(), depth %d\n", td->cur_depth);
306
307         if (!td->cur_depth || !td->io_u_queued)
308                 return 0;
309
310         io_u_mark_depth(td, td->io_u_queued);
311         td->io_u_queued = 0;
312
313         if (td->io_ops->commit)
314                 return td->io_ops->commit(td);
315
316         return 0;
317 }
318
319 int td_io_open_file(struct thread_data *td, struct fio_file *f)
320 {
321         assert(!fio_file_open(f));
322         assert(f->fd == -1);
323
324         if (td->io_ops->open_file(td, f)) {
325                 if (td->error == EINVAL && td->o.odirect)
326                         log_err("fio: destination does not support O_DIRECT\n");
327                 if (td->error == EMFILE) {
328                         log_err("fio: try reducing/setting openfiles (failed"
329                                 " at %u of %u)\n", td->nr_open_files,
330                                                         td->o.nr_files);
331                 }
332
333                 assert(f->fd == -1);
334                 assert(!fio_file_open(f));
335                 return 1;
336         }
337
338         fio_file_reset(f);
339         fio_file_set_open(f);
340         fio_file_clear_closing(f);
341         disk_util_inc(f->du);
342
343         td->nr_open_files++;
344         get_file(f);
345
346         if (f->filetype == FIO_TYPE_PIPE) {
347                 if (td_random(td)) {
348                         log_err("fio: can't seek on pipes (no random io)\n");
349                         goto err;
350                 }
351         }
352
353         if (td->io_ops->flags & FIO_DISKLESSIO)
354                 goto done;
355
356         if (td->o.invalidate_cache && file_invalidate_cache(td, f))
357                 goto err;
358
359         if (td->o.fadvise_hint &&
360             (f->filetype == FIO_TYPE_BD || f->filetype == FIO_TYPE_FILE)) {
361                 int flags;
362
363                 if (td_random(td))
364                         flags = POSIX_FADV_RANDOM;
365                 else
366                         flags = POSIX_FADV_SEQUENTIAL;
367
368                 if (fadvise(f->fd, f->file_offset, f->io_size, flags) < 0) {
369                         td_verror(td, errno, "fadvise");
370                         goto err;
371                 }
372         }
373
374 #ifdef FIO_OS_DIRECTIO
375         /*
376          * Some OS's have a distinct call to mark the file non-buffered,
377          * instead of using O_DIRECT (Solaris)
378          */
379         if (td->o.odirect) {
380                 int ret = fio_set_odirect(f->fd);
381
382                 if (ret) {
383                         td_verror(td, ret, "fio_set_odirect");
384                         goto err;
385                 }
386         }
387 #endif
388
389 done:
390         log_file(td, f, FIO_LOG_OPEN_FILE);
391         return 0;
392 err:
393         disk_util_dec(f->du);
394         if (td->io_ops->close_file)
395                 td->io_ops->close_file(td, f);
396         return 1;
397 }
398
399 int td_io_close_file(struct thread_data *td, struct fio_file *f)
400 {
401         assert(f->references);
402
403         if (!fio_file_closing(f))
404                 log_file(td, f, FIO_LOG_CLOSE_FILE);
405
406         /*
407          * mark as closing, do real close when last io on it has completed
408          */
409         fio_file_set_closing(f);
410
411         disk_util_dec(f->du);
412         unlock_file_all(td, f);
413
414         return put_file(td, f);
415 }
416
417 int td_io_get_file_size(struct thread_data *td, struct fio_file *f)
418 {
419         if (!td->io_ops->get_file_size)
420                 return 0;
421
422         return td->io_ops->get_file_size(td, f);
423 }