Have the job set ->terminate when runtime is exceeded
[fio.git] / stat.c
1 #include <stdio.h>
2 #include <string.h>
3 #include <sys/time.h>
4 #include <sys/types.h>
5 #include <sys/stat.h>
6 #include <dirent.h>
7 #include <libgen.h>
8 #include <math.h>
9
10 #include "fio.h"
11
12 /*
13  * Cheesy number->string conversion, complete with carry rounding error.
14  */
15 static char *num2str(unsigned long num, int maxlen, int base, int pow2)
16 {
17         char postfix[] = { ' ', 'K', 'M', 'G', 'P', 'E' };
18         unsigned int thousand;
19         char *buf;
20         int i;
21
22         if (pow2)
23                 thousand = 1024;
24         else
25                 thousand = 1000;
26
27         buf = malloc(128);
28
29         for (i = 0; base > 1; i++)
30                 base /= thousand;
31
32         do {
33                 int len, carry = 0;
34
35                 len = sprintf(buf, "%'lu", num);
36                 if (len <= maxlen) {
37                         if (i >= 1) {
38                                 buf[len] = postfix[i];
39                                 buf[len + 1] = '\0';
40                         }
41                         return buf;
42                 }
43
44                 if ((num % thousand) >= (thousand / 2))
45                         carry = 1;
46
47                 num /= thousand;
48                 num += carry;
49                 i++;
50         } while (i <= 5);
51
52         return buf;
53 }
54
55 void update_rusage_stat(struct thread_data *td)
56 {
57         struct thread_stat *ts = &td->ts;
58
59         getrusage(RUSAGE_SELF, &ts->ru_end);
60
61         ts->usr_time += mtime_since(&ts->ru_start.ru_utime, &ts->ru_end.ru_utime);
62         ts->sys_time += mtime_since(&ts->ru_start.ru_stime, &ts->ru_end.ru_stime);
63         ts->ctx += ts->ru_end.ru_nvcsw + ts->ru_end.ru_nivcsw - (ts->ru_start.ru_nvcsw + ts->ru_start.ru_nivcsw);
64         
65         memcpy(&ts->ru_start, &ts->ru_end, sizeof(ts->ru_end));
66 }
67
68 static int calc_lat(struct io_stat *is, unsigned long *min, unsigned long *max,
69                     double *mean, double *dev)
70 {
71         double n = is->samples;
72
73         if (is->samples == 0)
74                 return 0;
75
76         *min = is->min_val;
77         *max = is->max_val;
78
79         n = (double) is->samples;
80         *mean = is->mean;
81
82         if (n > 1.0)
83                 *dev = sqrt(is->S / (n - 1.0));
84         else
85                 *dev = -1.0;
86
87         return 1;
88 }
89
90 static void show_group_stats(struct group_run_stats *rs, int id)
91 {
92         char *p1, *p2, *p3, *p4;
93         const char *ddir_str[] = { "   READ", "  WRITE" };
94         int i;
95
96         log_info("\nRun status group %d (all jobs):\n", id);
97
98         for (i = 0; i <= DDIR_WRITE; i++) {
99                 if (!rs->max_run[i])
100                         continue;
101
102                 p1 = num2str(rs->io_kb[i], 6, 1000, 1);
103                 p2 = num2str(rs->agg[i], 6, 1000, 1);
104                 p3 = num2str(rs->min_bw[i], 6, 1000, 1);
105                 p4 = num2str(rs->max_bw[i], 6, 1000, 1);
106
107                 log_info("%s: io=%siB, aggrb=%siB/s, minb=%siB/s, maxb=%siB/s, mint=%llumsec, maxt=%llumsec\n", ddir_str[i], p1, p2, p3, p4, rs->min_run[i], rs->max_run[i]);
108
109                 free(p1);
110                 free(p2);
111                 free(p3);
112                 free(p4);
113         }
114 }
115
116 #define ts_total_io_u(ts)       \
117         ((ts)->total_io_u[0] + (ts)->total_io_u[1])
118
119 static void stat_calc_dist(struct thread_stat *ts, double *io_u_dist)
120 {
121         int i;
122
123         /*
124          * Do depth distribution calculations
125          */
126         for (i = 0; i < FIO_IO_U_MAP_NR; i++) {
127                 io_u_dist[i] = (double) ts->io_u_map[i] / (double) ts_total_io_u(ts);
128                 io_u_dist[i] *= 100.0;
129                 if (io_u_dist[i] < 0.1 && ts->io_u_map[i])
130                         io_u_dist[i] = 0.1;
131         }
132 }
133
134 static void stat_calc_lat(struct thread_stat *ts, double *io_u_lat)
135 {
136         int i;
137
138         /*
139          * Do latency distribution calculations
140          */
141         for (i = 0; i < FIO_IO_U_LAT_NR; i++) {
142                 io_u_lat[i] = (double) ts->io_u_lat[i] / (double) ts_total_io_u(ts);
143                 io_u_lat[i] *= 100.0;
144                 if (io_u_lat[i] < 0.01 && ts->io_u_lat[i])
145                         io_u_lat[i] = 0.01;
146         }
147 }
148
149 static void show_ddir_status(struct group_run_stats *rs, struct thread_stat *ts,
150                              int ddir)
151 {
152         const char *ddir_str[] = { "read ", "write" };
153         unsigned long min, max;
154         unsigned long long bw, iops;
155         double mean, dev;
156         char *io_p, *bw_p, *iops_p;
157
158         if (!ts->runtime[ddir])
159                 return;
160
161         bw = ts->io_bytes[ddir] / ts->runtime[ddir];
162         iops = (1000 * ts->total_io_u[ddir]) / ts->runtime[ddir];
163         io_p = num2str(ts->io_bytes[ddir] >> 10, 6, 1000, 1);
164         bw_p = num2str(bw, 6, 1000, 1);
165         iops_p = num2str(iops, 6, 1, 0);
166
167         log_info("  %s: io=%siB, bw=%siB/s, iops=%s, runt=%6lumsec\n", ddir_str[ddir], io_p, bw_p, iops_p, ts->runtime[ddir]);
168
169         free(io_p);
170         free(bw_p);
171         free(iops_p);
172
173         if (calc_lat(&ts->slat_stat[ddir], &min, &max, &mean, &dev))
174                 log_info("    slat (msec): min=%5lu, max=%5lu, avg=%5.02f, stdev=%5.02f\n", min, max, mean, dev);
175
176         if (calc_lat(&ts->clat_stat[ddir], &min, &max, &mean, &dev))
177                 log_info("    clat (msec): min=%5lu, max=%5lu, avg=%5.02f, stdev=%5.02f\n", min, max, mean, dev);
178
179         if (calc_lat(&ts->bw_stat[ddir], &min, &max, &mean, &dev)) {
180                 double p_of_agg;
181
182                 p_of_agg = mean * 100 / (double) rs->agg[ddir];
183                 log_info("    bw (KiB/s) : min=%5lu, max=%5lu, per=%3.2f%%, avg=%5.02f, stdev=%5.02f\n", min, max, p_of_agg, mean, dev);
184         }
185 }
186
187 static void show_thread_status(struct thread_stat *ts,
188                                struct group_run_stats *rs)
189 {
190         double usr_cpu, sys_cpu;
191         unsigned long runtime;
192         double io_u_dist[FIO_IO_U_MAP_NR];
193         double io_u_lat[FIO_IO_U_LAT_NR];
194
195         if (!(ts->io_bytes[0] + ts->io_bytes[1]))
196                 return;
197
198         if (!ts->error)
199                 log_info("%s: (groupid=%d, jobs=%d): err=%2d: pid=%d\n", ts->name, ts->groupid, ts->members, ts->error, ts->pid);
200         else
201                 log_info("%s: (groupid=%d, jobs=%d): err=%2d (%s): pid=%d\n", ts->name, ts->groupid, ts->members, ts->error, ts->verror, ts->pid);
202
203         if (ts->description)
204                 log_info("  Description  : [%s]\n", ts->description);
205
206         if (ts->io_bytes[DDIR_READ])
207                 show_ddir_status(rs, ts, DDIR_READ);
208         if (ts->io_bytes[DDIR_WRITE])
209                 show_ddir_status(rs, ts, DDIR_WRITE);
210
211         runtime = ts->total_run_time;
212         if (runtime) {
213                 double runt = (double) runtime;
214
215                 usr_cpu = (double) ts->usr_time * 100 / runt;
216                 sys_cpu = (double) ts->sys_time * 100 / runt;
217         } else {
218                 usr_cpu = 0;
219                 sys_cpu = 0;
220         }
221
222         log_info("  cpu          : usr=%3.2f%%, sys=%3.2f%%, ctx=%lu\n", usr_cpu, sys_cpu, ts->ctx);
223
224         stat_calc_dist(ts, io_u_dist);
225         stat_calc_lat(ts, io_u_lat);
226
227         log_info("  IO depths    : 1=%3.1f%%, 2=%3.1f%%, 4=%3.1f%%, 8=%3.1f%%, 16=%3.1f%%, 32=%3.1f%%, >=64=%3.1f%%\n", io_u_dist[0], io_u_dist[1], io_u_dist[2], io_u_dist[3], io_u_dist[4], io_u_dist[5], io_u_dist[6]);
228         log_info("     issued r/w: total=%lu/%lu, short=%lu/%lu\n", ts->total_io_u[0], ts->total_io_u[1], ts->short_io_u[0], ts->short_io_u[1]);
229
230         log_info("     lat (msec): 2=%3.2f%%, 4=%3.2f%%, 10=%3.2f%%, 20=%3.2f%%, 50=%3.2f%%, 100=%3.2f%%\n", io_u_lat[0], io_u_lat[1], io_u_lat[2], io_u_lat[3], io_u_lat[4], io_u_lat[5]);
231         log_info("     lat (msec): 250=%3.2f%%, 500=%3.2f%%, 750=%3.2f%%, 1000=%3.2f%%, >=2000=%3.2f%%\n", io_u_lat[6], io_u_lat[7], io_u_lat[8], io_u_lat[9], io_u_lat[10]);
232 }
233
234 static void show_ddir_status_terse(struct thread_stat *ts,
235                                    struct group_run_stats *rs, int ddir)
236 {
237         unsigned long min, max;
238         unsigned long long bw;
239         double mean, dev;
240
241         bw = 0;
242         if (ts->runtime[ddir])
243                 bw = ts->io_bytes[ddir] / ts->runtime[ddir];
244
245         log_info(";%llu;%llu;%lu", ts->io_bytes[ddir] >> 10, bw, ts->runtime[ddir]);
246
247         if (calc_lat(&ts->slat_stat[ddir], &min, &max, &mean, &dev))
248                 log_info(";%lu;%lu;%f;%f", min, max, mean, dev);
249         else
250                 log_info(";%lu;%lu;%f;%f", 0UL, 0UL, 0.0, 0.0);
251
252         if (calc_lat(&ts->clat_stat[ddir], &min, &max, &mean, &dev))
253                 log_info(";%lu;%lu;%f;%f", min, max, mean, dev);
254         else
255                 log_info(";%lu;%lu;%f;%f", 0UL, 0UL, 0.0, 0.0);
256
257         if (calc_lat(&ts->bw_stat[ddir], &min, &max, &mean, &dev)) {
258                 double p_of_agg;
259
260                 p_of_agg = mean * 100 / (double) rs->agg[ddir];
261                 log_info(";%lu;%lu;%f%%;%f;%f", min, max, p_of_agg, mean, dev);
262         } else
263                 log_info(";%lu;%lu;%f%%;%f;%f", 0UL, 0UL, 0.0, 0.0, 0.0);
264 }
265
266
267 static void show_thread_status_terse(struct thread_stat *ts,
268                                      struct group_run_stats *rs)
269 {
270         double io_u_dist[FIO_IO_U_MAP_NR];
271         double io_u_lat[FIO_IO_U_LAT_NR];
272         double usr_cpu, sys_cpu;
273
274         log_info("%s;%d;%d", ts->name, ts->groupid, ts->error);
275
276         show_ddir_status_terse(ts, rs, 0);
277         show_ddir_status_terse(ts, rs, 1);
278
279         if (ts->total_run_time) {
280                 double runt = (double) ts->total_run_time;
281
282                 usr_cpu = (double) ts->usr_time * 100 / runt;
283                 sys_cpu = (double) ts->sys_time * 100 / runt;
284         } else {
285                 usr_cpu = 0;
286                 sys_cpu = 0;
287         }
288
289         log_info(";%f%%;%f%%;%lu", usr_cpu, sys_cpu, ts->ctx);
290
291         stat_calc_dist(ts, io_u_dist);
292         stat_calc_lat(ts, io_u_lat);
293
294         log_info(";%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%", io_u_dist[0], io_u_dist[1], io_u_dist[2], io_u_dist[3], io_u_dist[4], io_u_dist[5], io_u_dist[6]);
295
296         log_info(";%3.2f%%;%3.2f%%;%3.2f%%;%3.2f%%;%3.2f%%;%3.2f%%\n", io_u_lat[0], io_u_lat[1], io_u_lat[2], io_u_lat[3], io_u_lat[4], io_u_lat[5]);
297         log_info(";%3.2f%%;%3.2f%%;%3.2f%%;%3.2f%%;%3.2f%%", io_u_lat[6], io_u_lat[7], io_u_lat[8], io_u_lat[9], io_u_lat[10]);
298
299         if (ts->description)
300                 log_info(";%s", ts->description);
301
302         log_info("\n");
303 }
304
305 static void sum_stat(struct io_stat *dst, struct io_stat *src, int nr)
306 {
307         double mean, S;
308
309         dst->min_val = min(dst->min_val, src->min_val);
310         dst->max_val = max(dst->max_val, src->max_val);
311         dst->samples += src->samples;
312
313         /*
314          * Needs a new method for calculating stddev, we cannot just
315          * average them we do below for nr > 1
316          */
317         if (nr == 1) {
318                 mean = src->mean;
319                 S = src->S;
320         } else {
321                 mean = ((src->mean * (double) (nr - 1)) + dst->mean) / ((double) nr);
322                 S = ((src->S * (double) (nr - 1)) + dst->S) / ((double) nr);
323         }
324
325         dst->mean = mean;
326         dst->S = S;
327 }
328
329 void show_run_stats(void)
330 {
331         struct group_run_stats *runstats, *rs;
332         struct thread_data *td;
333         struct thread_stat *threadstats, *ts;
334         int i, j, k, l, nr_ts, last_ts, idx;
335
336         runstats = malloc(sizeof(struct group_run_stats) * (groupid + 1));
337
338         for (i = 0; i < groupid + 1; i++) {
339                 rs = &runstats[i];
340
341                 memset(rs, 0, sizeof(*rs));
342                 rs->min_bw[0] = rs->min_run[0] = ~0UL;
343                 rs->min_bw[1] = rs->min_run[1] = ~0UL;
344         }
345
346         /*
347          * find out how many threads stats we need. if group reporting isn't
348          * enabled, it's one-per-td.
349          */
350         nr_ts = 0;
351         last_ts = -1;
352         for_each_td(td, i) {
353                 if (!td->o.group_reporting) {
354                         nr_ts++;
355                         continue;
356                 }
357                 if (last_ts == td->groupid)
358                         continue;
359
360                 last_ts = td->groupid;
361                 nr_ts++;
362         }
363
364         threadstats = malloc(nr_ts * sizeof(struct thread_stat));
365
366         for (i = 0; i < nr_ts; i++) {
367                 ts = &threadstats[i];
368
369                 memset(ts, 0, sizeof(*ts));
370                 for (j = 0; j <= DDIR_WRITE; j++) {
371                         ts->clat_stat[j].min_val = -1UL;
372                         ts->slat_stat[j].min_val = -1UL;
373                         ts->bw_stat[j].min_val = -1UL;
374                 }
375                 ts->groupid = -1;
376         }
377
378         j = 0;
379         last_ts = -1;
380         idx = 0;
381         for_each_td(td, i) {
382                 if (idx && (!td->o.group_reporting ||
383                     (td->o.group_reporting && last_ts != td->groupid))) {
384                         idx = 0;
385                         j++;
386                 }
387
388                 last_ts = td->groupid;
389
390                 ts = &threadstats[j];
391
392                 idx++;
393                 ts->members++;
394
395                 if (ts->groupid == -1) {
396                         /*
397                          * These are per-group shared already
398                          */
399                         ts->name = td->o.name;
400                         ts->description = td->o.description;
401                         ts->groupid = td->groupid;
402
403                         /*
404                          * first pid in group, not very useful...
405                          */
406                         ts->pid = td->pid;
407                 }
408
409                 if (td->error && !ts->error) {
410                         ts->error = td->error;
411                         ts->verror = td->verror;
412                 }
413
414                 for (l = 0; l <= DDIR_WRITE; l++) {
415                         sum_stat(&ts->clat_stat[l], &td->ts.clat_stat[l], idx);
416                         sum_stat(&ts->slat_stat[l], &td->ts.slat_stat[l], idx);
417                         sum_stat(&ts->bw_stat[l], &td->ts.bw_stat[l], idx);
418
419                         ts->stat_io_bytes[l] += td->ts.stat_io_bytes[l];
420                         ts->io_bytes[l] += td->ts.io_bytes[l];
421
422                         if (ts->runtime[l] < td->ts.runtime[l])
423                                 ts->runtime[l] = td->ts.runtime[l];
424                 }
425
426                 ts->usr_time += td->ts.usr_time;
427                 ts->sys_time += td->ts.sys_time;
428                 ts->ctx += td->ts.ctx;
429
430                 for (k = 0; k < FIO_IO_U_MAP_NR; k++)
431                         ts->io_u_map[k] += td->ts.io_u_map[k];
432                 for (k = 0; k < FIO_IO_U_LAT_NR; k++)
433                         ts->io_u_lat[k] += td->ts.io_u_lat[k];
434
435                 for (k = 0; k <= DDIR_WRITE; k++) {
436                         ts->total_io_u[k] += td->ts.total_io_u[k];
437                         ts->short_io_u[k] += td->ts.short_io_u[k];
438                 }
439
440                 ts->total_run_time += td->ts.total_run_time;
441         }
442
443         for (i = 0; i < nr_ts; i++) {
444                 unsigned long long bw;
445
446                 ts = &threadstats[i];
447                 rs = &runstats[ts->groupid];
448
449                 for (j = 0; j <= DDIR_WRITE; j++) {
450                         if (!ts->runtime[j])
451                                 continue;
452                         if (ts->runtime[j] < rs->min_run[j] || !rs->min_run[j])
453                                 rs->min_run[j] = ts->runtime[j];
454                         if (ts->runtime[j] > rs->max_run[j])
455                                 rs->max_run[j] = ts->runtime[j];
456
457                         bw = 0;
458                         if (ts->runtime[j])
459                                 bw = ts->io_bytes[j] / (unsigned long long) ts->runtime[j];
460                         if (bw < rs->min_bw[j])
461                                 rs->min_bw[j] = bw;
462                         if (bw > rs->max_bw[j])
463                                 rs->max_bw[j] = bw;
464
465                         rs->io_kb[j] += ts->io_bytes[j] >> 10;
466                 }
467         }
468
469         for (i = 0; i < groupid + 1; i++) {
470                 rs = &runstats[i];
471
472                 if (rs->max_run[0])
473                         rs->agg[0] = (rs->io_kb[0]*1024) / rs->max_run[0];
474                 if (rs->max_run[1])
475                         rs->agg[1] = (rs->io_kb[1]*1024) / rs->max_run[1];
476         }
477
478         /*
479          * don't overwrite last signal output
480          */
481         if (!terse_output)
482                 printf("\n");
483
484         for (i = 0; i < nr_ts; i++) {
485                 ts = &threadstats[i];
486                 rs = &runstats[ts->groupid];
487
488                 if (terse_output)
489                         show_thread_status_terse(ts, rs);
490                 else
491                         show_thread_status(ts, rs);
492         }
493
494         if (!terse_output) {
495                 for (i = 0; i < groupid + 1; i++)
496                         show_group_stats(&runstats[i], i);
497
498                 show_disk_util();
499         }
500
501         free(runstats);
502         free(threadstats);
503 }
504
505 static inline void add_stat_sample(struct io_stat *is, unsigned long data)
506 {
507         double val = data;
508         double delta;
509
510         if (data > is->max_val)
511                 is->max_val = data;
512         if (data < is->min_val)
513                 is->min_val = data;
514
515         delta = val - is->mean;
516         if (delta) {
517                 is->mean += delta / (is->samples + 1.0);
518                 is->S += delta * (val - is->mean);
519         }
520
521         is->samples++;
522 }
523
524 static void __add_log_sample(struct io_log *iolog, unsigned long val,
525                              enum fio_ddir ddir, unsigned long time)
526 {
527         if (iolog->nr_samples == iolog->max_samples) {
528                 int new_size = sizeof(struct io_sample) * iolog->max_samples*2;
529
530                 iolog->log = realloc(iolog->log, new_size);
531                 iolog->max_samples <<= 1;
532         }
533
534         iolog->log[iolog->nr_samples].val = val;
535         iolog->log[iolog->nr_samples].time = time;
536         iolog->log[iolog->nr_samples].ddir = ddir;
537         iolog->nr_samples++;
538 }
539
540 static void add_log_sample(struct thread_data *td, struct io_log *iolog,
541                            unsigned long val, enum fio_ddir ddir)
542 {
543         __add_log_sample(iolog, val, ddir, mtime_since_now(&td->epoch));
544 }
545
546 void add_agg_sample(unsigned long val, enum fio_ddir ddir)
547 {
548         struct io_log *iolog = agg_io_log[ddir];
549
550         __add_log_sample(iolog, val, ddir, mtime_since_genesis());
551 }
552
553 void add_clat_sample(struct thread_data *td, enum fio_ddir ddir,
554                      unsigned long msec)
555 {
556         struct thread_stat *ts = &td->ts;
557
558         add_stat_sample(&ts->clat_stat[ddir], msec);
559
560         if (ts->clat_log)
561                 add_log_sample(td, ts->clat_log, msec, ddir);
562 }
563
564 void add_slat_sample(struct thread_data *td, enum fio_ddir ddir,
565                      unsigned long msec)
566 {
567         struct thread_stat *ts = &td->ts;
568
569         add_stat_sample(&ts->slat_stat[ddir], msec);
570
571         if (ts->slat_log)
572                 add_log_sample(td, ts->slat_log, msec, ddir);
573 }
574
575 void add_bw_sample(struct thread_data *td, enum fio_ddir ddir,
576                    struct timeval *t)
577 {
578         struct thread_stat *ts = &td->ts;
579         unsigned long spent = mtime_since(&ts->stat_sample_time[ddir], t);
580         unsigned long rate;
581
582         if (spent < td->o.bw_avg_time)
583                 return;
584
585         rate = (td->this_io_bytes[ddir] - ts->stat_io_bytes[ddir]) / spent;
586         add_stat_sample(&ts->bw_stat[ddir], rate);
587
588         if (ts->bw_log)
589                 add_log_sample(td, ts->bw_log, rate, ddir);
590
591         fio_gettime(&ts->stat_sample_time[ddir], NULL);
592         ts->stat_io_bytes[ddir] = td->this_io_bytes[ddir];
593 }