gettime: Introduce fio_get_mono_time()
[fio.git] / helper_thread.c
1 #include <signal.h>
2 #ifdef CONFIG_VALGRIND_DEV
3 #include <valgrind/drd.h>
4 #else
5 #define DRD_IGNORE_VAR(x) do { } while (0)
6 #endif
7
8 #include "fio.h"
9 #include "smalloc.h"
10 #include "helper_thread.h"
11 #include "steadystate.h"
12 #include "pshared.h"
13
14 enum action {
15         A_EXIT          = 1,
16         A_RESET         = 2,
17         A_DO_STAT       = 3,
18 };
19
20 static struct helper_data {
21         volatile int exit;
22         int pipe[2]; /* 0: read end; 1: write end. */
23         struct sk_out *sk_out;
24         pthread_t thread;
25         struct fio_sem *startup_sem;
26 } *helper_data;
27
28 void helper_thread_destroy(void)
29 {
30         if (!helper_data)
31                 return;
32
33         close(helper_data->pipe[0]);
34         close(helper_data->pipe[1]);
35         sfree(helper_data);
36 }
37
38 #ifdef _WIN32
39 static void sock_init(void)
40 {
41         WSADATA wsaData;
42         int res;
43
44         /* It is allowed to call WSAStartup() more than once. */
45         res = WSAStartup(MAKEWORD(2, 2), &wsaData);
46         assert(res == 0);
47 }
48
49 static int make_nonblocking(int fd)
50 {
51         unsigned long arg = 1;
52
53         return ioctlsocket(fd, FIONBIO, &arg);
54 }
55
56 static int write_to_pipe(int fd, const void *buf, size_t len)
57 {
58         return send(fd, buf, len, 0);
59 }
60
61 static int read_from_pipe(int fd, void *buf, size_t len)
62 {
63         return recv(fd, buf, len, 0);
64 }
65 #else
66 static void sock_init(void)
67 {
68 }
69
70 static int make_nonblocking(int fd)
71 {
72         return fcntl(fd, F_SETFL, O_NONBLOCK);
73 }
74
75 static int write_to_pipe(int fd, const void *buf, size_t len)
76 {
77         return write(fd, buf, len);
78 }
79
80 static int read_from_pipe(int fd, void *buf, size_t len)
81 {
82         return read(fd, buf, len);
83 }
84 #endif
85
86 static void submit_action(enum action a)
87 {
88         const char data = a;
89         int ret;
90
91         if (!helper_data)
92                 return;
93
94         ret = write_to_pipe(helper_data->pipe[1], &data, sizeof(data));
95         assert(ret == 1);
96 }
97
98 void helper_reset(void)
99 {
100         submit_action(A_RESET);
101 }
102
103 /*
104  * May be invoked in signal handler context and hence must only call functions
105  * that are async-signal-safe. See also
106  * https://pubs.opengroup.org/onlinepubs/9699919799/functions/V2_chap02.html#tag_15_04_03.
107  */
108 void helper_do_stat(void)
109 {
110         submit_action(A_DO_STAT);
111 }
112
113 bool helper_should_exit(void)
114 {
115         if (!helper_data)
116                 return true;
117
118         return helper_data->exit;
119 }
120
121 void helper_thread_exit(void)
122 {
123         if (!helper_data)
124                 return;
125
126         helper_data->exit = 1;
127         submit_action(A_EXIT);
128         pthread_join(helper_data->thread, NULL);
129 }
130
131 static unsigned int task_helper(struct timespec *last, struct timespec *now, unsigned int period, void do_task())
132 {
133         unsigned int next, since;
134
135         since = mtime_since(last, now);
136         if (since >= period || period - since < 10) {
137                 do_task();
138                 timespec_add_msec(last, since);
139                 if (since > period)
140                         next = period - (since - period);
141                 else
142                         next = period;
143         } else
144                 next = period - since;
145
146         return next;
147 }
148
149 static void *helper_thread_main(void *data)
150 {
151         struct helper_data *hd = data;
152         unsigned int msec_to_next_event, next_log, next_si = status_interval;
153         unsigned int next_ss = STEADYSTATE_MSEC;
154         struct timespec ts, last_du, last_ss, last_si;
155         char action;
156         int ret = 0;
157
158         sk_out_assign(hd->sk_out);
159
160 #ifdef HAVE_PTHREAD_SIGMASK
161         {
162         sigset_t sigmask;
163
164         /* Let another thread handle signals. */
165         ret = pthread_sigmask(SIG_UNBLOCK, NULL, &sigmask);
166         assert(ret == 0);
167         ret = pthread_sigmask(SIG_BLOCK, &sigmask, NULL);
168         assert(ret == 0);
169         }
170 #endif
171
172         fio_get_mono_time(&ts);
173         memcpy(&last_du, &ts, sizeof(ts));
174         memcpy(&last_ss, &ts, sizeof(ts));
175         memcpy(&last_si, &ts, sizeof(ts));
176
177         fio_sem_up(hd->startup_sem);
178
179         msec_to_next_event = DISK_UTIL_MSEC;
180         while (!ret && !hd->exit) {
181                 uint64_t since_du;
182                 struct timeval timeout = {
183                         .tv_sec  = msec_to_next_event / 1000,
184                         .tv_usec = (msec_to_next_event % 1000) * 1000,
185                 };
186                 fd_set rfds, efds;
187
188                 if (read_from_pipe(hd->pipe[0], &action, sizeof(action)) < 0) {
189                         FD_ZERO(&rfds);
190                         FD_SET(hd->pipe[0], &rfds);
191                         FD_ZERO(&efds);
192                         FD_SET(hd->pipe[0], &efds);
193                         if (select(1, &rfds, NULL, &efds, &timeout) < 0) {
194                                 log_err("fio: select() call in helper thread failed: %s",
195                                         strerror(errno));
196                                 ret = 1;
197                         }
198                         if (read_from_pipe(hd->pipe[0], &action, sizeof(action)) <
199                             0)
200                                 action = 0;
201                 }
202
203                 fio_get_mono_time(&ts);
204
205                 if (action == A_RESET) {
206                         last_du = ts;
207                         last_ss = ts;
208                 }
209
210                 since_du = mtime_since(&last_du, &ts);
211                 if (since_du >= DISK_UTIL_MSEC || DISK_UTIL_MSEC - since_du < 10) {
212                         ret = update_io_ticks();
213                         timespec_add_msec(&last_du, DISK_UTIL_MSEC);
214                         msec_to_next_event = DISK_UTIL_MSEC;
215                         if (since_du >= DISK_UTIL_MSEC)
216                                 msec_to_next_event -= (since_du - DISK_UTIL_MSEC);
217                 } else
218                         msec_to_next_event = DISK_UTIL_MSEC - since_du;
219
220                 if (action == A_DO_STAT)
221                         __show_running_run_stats();
222
223                 if (status_interval) {
224                         next_si = task_helper(&last_si, &ts, status_interval, __show_running_run_stats);
225                         msec_to_next_event = min(next_si, msec_to_next_event);
226                 }
227
228                 next_log = calc_log_samples();
229                 if (!next_log)
230                         next_log = DISK_UTIL_MSEC;
231
232                 if (steadystate_enabled) {
233                         next_ss = task_helper(&last_ss, &ts, STEADYSTATE_MSEC, steadystate_check);
234                         msec_to_next_event = min(next_ss, msec_to_next_event);
235                 }
236
237                 msec_to_next_event = min(next_log, msec_to_next_event);
238                 dprint(FD_HELPERTHREAD, "next_si: %u, next_ss: %u, next_log: %u, msec_to_next_event: %u\n",
239                         next_si, next_ss, next_log, msec_to_next_event);
240
241                 if (!is_backend)
242                         print_thread_status();
243         }
244
245         fio_writeout_logs(false);
246
247         sk_out_drop();
248         return NULL;
249 }
250
251 /*
252  * Connect two sockets to each other to emulate the pipe() system call on Windows.
253  */
254 int pipe_over_loopback(int fd[2])
255 {
256         struct sockaddr_in addr = { .sin_family = AF_INET };
257         socklen_t len = sizeof(addr);
258         int res;
259
260         addr.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
261
262         sock_init();
263
264         fd[0] = socket(AF_INET, SOCK_STREAM, 0);
265         if (fd[0] < 0)
266                 goto err;
267         fd[1] = socket(AF_INET, SOCK_STREAM, 0);
268         if (fd[1] < 0)
269                 goto close_fd_0;
270         res = bind(fd[0], (struct sockaddr *)&addr, len);
271         if (res < 0)
272                 goto close_fd_1;
273         res = getsockname(fd[0], (struct sockaddr *)&addr, &len);
274         if (res < 0)
275                 goto close_fd_1;
276         res = listen(fd[0], 1);
277         if (res < 0)
278                 goto close_fd_1;
279         res = connect(fd[1], (struct sockaddr *)&addr, len);
280         if (res < 0)
281                 goto close_fd_1;
282         res = accept(fd[0], NULL, NULL);
283         if (res < 0)
284                 goto close_fd_1;
285         close(fd[0]);
286         fd[0] = res;
287         return 0;
288
289 close_fd_1:
290         close(fd[1]);
291
292 close_fd_0:
293         close(fd[0]);
294
295 err:
296         return -1;
297 }
298
299 int helper_thread_create(struct fio_sem *startup_sem, struct sk_out *sk_out)
300 {
301         struct helper_data *hd;
302         int ret;
303
304         hd = scalloc(1, sizeof(*hd));
305
306         setup_disk_util();
307         steadystate_setup();
308
309         hd->sk_out = sk_out;
310
311 #if defined(CONFIG_PIPE2)
312         ret = pipe2(hd->pipe, O_CLOEXEC);
313 #elif defined(CONFIG_PIPE)
314         ret = pipe(hd->pipe);
315 #else
316         ret = pipe_over_loopback(hd->pipe);
317 #endif
318         if (ret)
319                 return 1;
320
321         ret = make_nonblocking(hd->pipe[0]);
322         assert(ret >= 0);
323
324         hd->startup_sem = startup_sem;
325
326         DRD_IGNORE_VAR(helper_data);
327
328         ret = pthread_create(&hd->thread, NULL, helper_thread_main, hd);
329         if (ret) {
330                 log_err("Can't create helper thread: %s\n", strerror(ret));
331                 return 1;
332         }
333
334         helper_data = hd;
335
336         dprint(FD_MUTEX, "wait on startup_sem\n");
337         fio_sem_down(startup_sem);
338         dprint(FD_MUTEX, "done waiting on startup_sem\n");
339         return 0;
340 }