[PATCH] syslet: fix leak of ring and ahu
[fio.git] / engines / syslet-rw.c
1 /*
2  * read/write() engine that uses syslet to be async
3  *
4  */
5 #include <stdio.h>
6 #include <stdlib.h>
7 #include <unistd.h>
8 #include <errno.h>
9 #include <assert.h>
10
11 #include "../fio.h"
12 #include "../os.h"
13
14 #ifdef FIO_HAVE_SYSLET
15
16 struct syslet_data {
17         struct io_u **events;
18         unsigned int nr_events;
19         
20         struct async_head_user *ahu;
21         struct syslet_uatom **ring;
22         unsigned int ring_index;
23 };
24
25 /*
26  * Inspect the ring to see if we have completed events
27  */
28 static void fio_syslet_complete(struct thread_data *td)
29 {
30         struct syslet_data *sd = td->io_ops->data;
31
32         do {
33                 struct syslet_uatom *atom;
34                 struct io_u *io_u;
35                 long ret;
36
37                 atom = sd->ring[sd->ring_index];
38                 if (!atom)
39                         break;
40
41                 sd->ring[sd->ring_index] = NULL;
42                 if (++sd->ring_index == td->iodepth)
43                         sd->ring_index = 0;
44
45                 io_u = atom->private;
46                 ret = *atom->ret_ptr;
47                 if (ret > 0)
48                         io_u->resid = io_u->xfer_buflen - ret;
49                 else if (ret < 0)
50                         io_u->error = ret;
51
52                 sd->events[sd->nr_events++] = io_u;
53         } while (1);
54 }
55
56 static int fio_syslet_getevents(struct thread_data *td, int min,
57                                 int fio_unused max,
58                                 struct timespec fio_unused *t)
59 {
60         struct syslet_data *sd = td->io_ops->data;
61         int get_events;
62         long ret;
63
64         do {
65                 fio_syslet_complete(td);
66
67                 /*
68                  * do we have enough immediate completions?
69                  */
70                 if (sd->nr_events >= (unsigned int) min)
71                         break;
72
73                 /*
74                  * OK, we need to wait for some events...
75                  */
76                 get_events = min - sd->nr_events;
77                 ret = async_wait(get_events);
78                 if (ret < 0)
79                         return errno;
80         } while (1);
81
82         ret = sd->nr_events;
83         sd->nr_events = 0;
84         return ret;
85 }
86
87 static struct io_u *fio_syslet_event(struct thread_data *td, int event)
88 {
89         struct syslet_data *sd = td->io_ops->data;
90
91         return sd->events[event];
92 }
93
94 static void init_atom(struct syslet_uatom *atom, int nr, void *arg0,
95                       void *arg1, void *arg2, void *arg3, void *ret_ptr,
96                       unsigned long flags, void *priv)
97 {
98         atom->flags = flags;
99         atom->nr = nr;
100         atom->ret_ptr = ret_ptr;
101         atom->next = NULL;
102         atom->arg_ptr[0] = arg0;
103         atom->arg_ptr[1] = arg1;
104         atom->arg_ptr[2] = arg2;
105         atom->arg_ptr[3] = arg3;
106         atom->arg_ptr[4] = atom->arg_ptr[5] = NULL;
107         atom->private = priv;
108 }
109
110 /*
111  * Use seek atom for sync
112  */
113 static void fio_syslet_prep_sync(struct io_u *io_u, struct fio_file *f)
114 {
115         init_atom(&io_u->req.atom, __NR_fsync, &f->fd, NULL, NULL, NULL,
116                   &io_u->req.ret, SYSLET_STOP_ON_NEGATIVE, io_u);
117 }
118
119 static void fio_syslet_prep_rw(struct io_u *io_u, struct fio_file *f)
120 {
121         int nr;
122
123         /*
124          * prepare rw
125          */
126         if (io_u->ddir == DDIR_READ)
127                 nr = __NR_pread64;
128         else
129                 nr = __NR_pwrite64;
130
131         init_atom(&io_u->req.atom, nr, &f->fd, &io_u->xfer_buf,
132                   &io_u->xfer_buflen, &io_u->offset, &io_u->req.ret,
133                   SYSLET_STOP_ON_NEGATIVE, io_u);
134 }
135
136 static int fio_syslet_prep(struct thread_data fio_unused *td, struct io_u *io_u)
137 {
138         struct fio_file *f = io_u->file;
139
140         if (io_u->ddir == DDIR_SYNC)
141                 fio_syslet_prep_sync(io_u, f);
142         else
143                 fio_syslet_prep_rw(io_u, f);
144
145         return 0;
146 }
147
148 static int fio_syslet_queue(struct thread_data *td, struct io_u *io_u)
149 {
150         struct syslet_data *sd = td->io_ops->data;
151         struct syslet_uatom *done;
152         long ret;
153
154         done = async_exec(&io_u->req.atom);
155         if (!done)
156                 return 0;
157
158         /*
159          * completed sync
160          */
161         ret = io_u->req.ret;
162         if (ret != (long) io_u->xfer_buflen) {
163                 if (ret > 0) {
164                         io_u->resid = io_u->xfer_buflen - ret;
165                         io_u->error = 0;
166                         return ret;
167                 } else
168                         io_u->error = errno;
169         }
170
171         if (!io_u->error)
172                 sd->events[sd->nr_events++] = io_u;
173         else
174                 td_verror(td, io_u->error);
175
176         return io_u->error;
177 }
178
179 static int async_head_init(struct syslet_data *sd, unsigned int depth)
180 {
181         unsigned long ring_size;
182
183         sd->ahu = malloc(sizeof(struct async_head_user));
184         memset(sd->ahu, 0, sizeof(struct async_head_user));
185
186         ring_size = sizeof(struct syslet_uatom *) * depth;
187         sd->ring = malloc(ring_size);
188         memset(sd->ring, 0, ring_size);
189
190         sd->ahu->completion_ring = sd->ring;
191         sd->ahu->ring_size_bytes = ring_size;
192         sd->ahu->max_nr_threads = -1;
193
194         if (async_register(sd->ahu, sizeof(*sd->ahu)) < 0) {
195                 perror("async_register");
196                 fprintf(stderr, "fio: syslet likely not supported\n");
197                 free(sd->ring);
198                 free(sd->ahu);
199                 return 1;
200         }
201
202         return 0;
203 }
204
205 static void async_head_exit(struct syslet_data *sd)
206 {
207         if (async_unregister(sd->ahu, sizeof(*sd->ahu)) < 0)
208                 perror("async_register");
209
210         free(sd->ahu);
211         free(sd->ring);
212 }
213
214 static void fio_syslet_cleanup(struct thread_data *td)
215 {
216         struct syslet_data *sd = td->io_ops->data;
217
218         if (sd) {
219                 async_head_exit(sd);
220                 free(sd->events);
221                 free(sd);
222                 td->io_ops->data = NULL;
223         }
224 }
225
226 static int fio_syslet_init(struct thread_data *td)
227 {
228         struct syslet_data *sd;
229
230
231         sd = malloc(sizeof(*sd));
232         memset(sd, 0, sizeof(*sd));
233         sd->events = malloc(sizeof(struct io_u *) * td->iodepth);
234         memset(sd->events, 0, sizeof(struct io_u *) * td->iodepth);
235
236         /*
237          * This will handily fail for kernels where syslet isn't available
238          */
239         if (async_head_init(sd, td->iodepth)) {
240                 free(sd->events);
241                 free(sd);
242                 return 1;
243         }
244
245         td->io_ops->data = sd;
246         return 0;
247 }
248
249 static struct ioengine_ops ioengine = {
250         .name           = "syslet-rw",
251         .version        = FIO_IOOPS_VERSION,
252         .init           = fio_syslet_init,
253         .prep           = fio_syslet_prep,
254         .queue          = fio_syslet_queue,
255         .getevents      = fio_syslet_getevents,
256         .event          = fio_syslet_event,
257         .cleanup        = fio_syslet_cleanup,
258 };
259
260 #else /* FIO_HAVE_SYSLET */
261
262 /*
263  * When we have a proper configure system in place, we simply wont build
264  * and install this io engine. For now install a crippled version that
265  * just complains and fails to load.
266  */
267 static int fio_syslet_init(struct thread_data fio_unused *td)
268 {
269         fprintf(stderr, "fio: syslet not available\n");
270         return 1;
271 }
272
273 static struct ioengine_ops ioengine = {
274         .name           = "syslet-rw",
275         .version        = FIO_IOOPS_VERSION,
276         .init           = fio_syslet_init,
277 };
278
279 #endif /* FIO_HAVE_SYSLET */
280
281 static void fio_init fio_syslet_register(void)
282 {
283         register_ioengine(&ioengine);
284 }
285
286 static void fio_exit fio_syslet_unregister(void)
287 {
288         unregister_ioengine(&ioengine);
289 }