c9148ad7a73b321b08751353326e453581fbac59
[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 #include "diskutil.h"
12 #include "lib/ieee754.h"
13 #include "json.h"
14 #include "lib/getrusage.h"
15 #include "idletime.h"
16 #include "lib/pow2.h"
17 #include "lib/output_buffer.h"
18 #include "helper_thread.h"
19 #include "smalloc.h"
20
21 #define LOG_MSEC_SLACK  10
22
23 struct fio_mutex *stat_mutex;
24
25 void clear_rusage_stat(struct thread_data *td)
26 {
27         struct thread_stat *ts = &td->ts;
28
29         fio_getrusage(&td->ru_start);
30         ts->usr_time = ts->sys_time = 0;
31         ts->ctx = 0;
32         ts->minf = ts->majf = 0;
33 }
34
35 void update_rusage_stat(struct thread_data *td)
36 {
37         struct thread_stat *ts = &td->ts;
38
39         fio_getrusage(&td->ru_end);
40         ts->usr_time += mtime_since(&td->ru_start.ru_utime,
41                                         &td->ru_end.ru_utime);
42         ts->sys_time += mtime_since(&td->ru_start.ru_stime,
43                                         &td->ru_end.ru_stime);
44         ts->ctx += td->ru_end.ru_nvcsw + td->ru_end.ru_nivcsw
45                         - (td->ru_start.ru_nvcsw + td->ru_start.ru_nivcsw);
46         ts->minf += td->ru_end.ru_minflt - td->ru_start.ru_minflt;
47         ts->majf += td->ru_end.ru_majflt - td->ru_start.ru_majflt;
48
49         memcpy(&td->ru_start, &td->ru_end, sizeof(td->ru_end));
50 }
51
52 /*
53  * Given a latency, return the index of the corresponding bucket in
54  * the structure tracking percentiles.
55  *
56  * (1) find the group (and error bits) that the value (latency)
57  * belongs to by looking at its MSB. (2) find the bucket number in the
58  * group by looking at the index bits.
59  *
60  */
61 static unsigned int plat_val_to_idx(unsigned int val)
62 {
63         unsigned int msb, error_bits, base, offset, idx;
64
65         /* Find MSB starting from bit 0 */
66         if (val == 0)
67                 msb = 0;
68         else
69                 msb = (sizeof(val)*8) - __builtin_clz(val) - 1;
70
71         /*
72          * MSB <= (FIO_IO_U_PLAT_BITS-1), cannot be rounded off. Use
73          * all bits of the sample as index
74          */
75         if (msb <= FIO_IO_U_PLAT_BITS)
76                 return val;
77
78         /* Compute the number of error bits to discard*/
79         error_bits = msb - FIO_IO_U_PLAT_BITS;
80
81         /* Compute the number of buckets before the group */
82         base = (error_bits + 1) << FIO_IO_U_PLAT_BITS;
83
84         /*
85          * Discard the error bits and apply the mask to find the
86          * index for the buckets in the group
87          */
88         offset = (FIO_IO_U_PLAT_VAL - 1) & (val >> error_bits);
89
90         /* Make sure the index does not exceed (array size - 1) */
91         idx = (base + offset) < (FIO_IO_U_PLAT_NR - 1) ?
92                 (base + offset) : (FIO_IO_U_PLAT_NR - 1);
93
94         return idx;
95 }
96
97 /*
98  * Convert the given index of the bucket array to the value
99  * represented by the bucket
100  */
101 static unsigned int plat_idx_to_val(unsigned int idx)
102 {
103         unsigned int error_bits, k, base;
104
105         assert(idx < FIO_IO_U_PLAT_NR);
106
107         /* MSB <= (FIO_IO_U_PLAT_BITS-1), cannot be rounded off. Use
108          * all bits of the sample as index */
109         if (idx < (FIO_IO_U_PLAT_VAL << 1))
110                 return idx;
111
112         /* Find the group and compute the minimum value of that group */
113         error_bits = (idx >> FIO_IO_U_PLAT_BITS) - 1;
114         base = 1 << (error_bits + FIO_IO_U_PLAT_BITS);
115
116         /* Find its bucket number of the group */
117         k = idx % FIO_IO_U_PLAT_VAL;
118
119         /* Return the mean of the range of the bucket */
120         return base + ((k + 0.5) * (1 << error_bits));
121 }
122
123 static int double_cmp(const void *a, const void *b)
124 {
125         const fio_fp64_t fa = *(const fio_fp64_t *) a;
126         const fio_fp64_t fb = *(const fio_fp64_t *) b;
127         int cmp = 0;
128
129         if (fa.u.f > fb.u.f)
130                 cmp = 1;
131         else if (fa.u.f < fb.u.f)
132                 cmp = -1;
133
134         return cmp;
135 }
136
137 unsigned int calc_clat_percentiles(unsigned int *io_u_plat, unsigned long nr,
138                                    fio_fp64_t *plist, unsigned int **output,
139                                    unsigned int *maxv, unsigned int *minv)
140 {
141         unsigned long sum = 0;
142         unsigned int len, i, j = 0;
143         unsigned int oval_len = 0;
144         unsigned int *ovals = NULL;
145         int is_last;
146
147         *minv = -1U;
148         *maxv = 0;
149
150         len = 0;
151         while (len < FIO_IO_U_LIST_MAX_LEN && plist[len].u.f != 0.0)
152                 len++;
153
154         if (!len)
155                 return 0;
156
157         /*
158          * Sort the percentile list. Note that it may already be sorted if
159          * we are using the default values, but since it's a short list this
160          * isn't a worry. Also note that this does not work for NaN values.
161          */
162         if (len > 1)
163                 qsort((void *)plist, len, sizeof(plist[0]), double_cmp);
164
165         /*
166          * Calculate bucket values, note down max and min values
167          */
168         is_last = 0;
169         for (i = 0; i < FIO_IO_U_PLAT_NR && !is_last; i++) {
170                 sum += io_u_plat[i];
171                 while (sum >= (plist[j].u.f / 100.0 * nr)) {
172                         assert(plist[j].u.f <= 100.0);
173
174                         if (j == oval_len) {
175                                 oval_len += 100;
176                                 ovals = realloc(ovals, oval_len * sizeof(unsigned int));
177                         }
178
179                         ovals[j] = plat_idx_to_val(i);
180                         if (ovals[j] < *minv)
181                                 *minv = ovals[j];
182                         if (ovals[j] > *maxv)
183                                 *maxv = ovals[j];
184
185                         is_last = (j == len - 1);
186                         if (is_last)
187                                 break;
188
189                         j++;
190                 }
191         }
192
193         *output = ovals;
194         return len;
195 }
196
197 /*
198  * Find and display the p-th percentile of clat
199  */
200 static void show_clat_percentiles(unsigned int *io_u_plat, unsigned long nr,
201                                   fio_fp64_t *plist, unsigned int precision,
202                                   struct buf_output *out)
203 {
204         unsigned int len, j = 0, minv, maxv;
205         unsigned int *ovals;
206         int is_last, per_line, scale_down;
207         char fmt[32];
208
209         len = calc_clat_percentiles(io_u_plat, nr, plist, &ovals, &maxv, &minv);
210         if (!len)
211                 goto out;
212
213         /*
214          * We default to usecs, but if the value range is such that we
215          * should scale down to msecs, do that.
216          */
217         if (minv > 2000 && maxv > 99999) {
218                 scale_down = 1;
219                 log_buf(out, "    clat percentiles (msec):\n     |");
220         } else {
221                 scale_down = 0;
222                 log_buf(out, "    clat percentiles (usec):\n     |");
223         }
224
225         snprintf(fmt, sizeof(fmt), "%%1.%uf", precision);
226         per_line = (80 - 7) / (precision + 14);
227
228         for (j = 0; j < len; j++) {
229                 char fbuf[16], *ptr = fbuf;
230
231                 /* for formatting */
232                 if (j != 0 && (j % per_line) == 0)
233                         log_buf(out, "     |");
234
235                 /* end of the list */
236                 is_last = (j == len - 1);
237
238                 if (plist[j].u.f < 10.0)
239                         ptr += sprintf(fbuf, " ");
240
241                 snprintf(ptr, sizeof(fbuf), fmt, plist[j].u.f);
242
243                 if (scale_down)
244                         ovals[j] = (ovals[j] + 999) / 1000;
245
246                 log_buf(out, " %sth=[%5u]%c", fbuf, ovals[j], is_last ? '\n' : ',');
247
248                 if (is_last)
249                         break;
250
251                 if ((j % per_line) == per_line - 1)     /* for formatting */
252                         log_buf(out, "\n");
253         }
254
255 out:
256         if (ovals)
257                 free(ovals);
258 }
259
260 bool calc_lat(struct io_stat *is, unsigned long *min, unsigned long *max,
261               double *mean, double *dev)
262 {
263         double n = (double) is->samples;
264
265         if (n == 0)
266                 return false;
267
268         *min = is->min_val;
269         *max = is->max_val;
270         *mean = is->mean.u.f;
271
272         if (n > 1.0)
273                 *dev = sqrt(is->S.u.f / (n - 1.0));
274         else
275                 *dev = 0;
276
277         return true;
278 }
279
280 void show_group_stats(struct group_run_stats *rs, struct buf_output *out)
281 {
282         char *p1, *p2, *p3, *p4;
283         const char *str[] = { "   READ", "  WRITE" , "   TRIM"};
284         int i;
285
286         log_buf(out, "\nRun status group %d (all jobs):\n", rs->groupid);
287
288         for (i = 0; i < DDIR_RWDIR_CNT; i++) {
289                 const int i2p = is_power_of_2(rs->kb_base);
290
291                 if (!rs->max_run[i])
292                         continue;
293
294                 p1 = num2str(rs->io_kb[i], 6, rs->kb_base, i2p, 8);
295                 p2 = num2str(rs->agg[i], 6, rs->kb_base, i2p, rs->unit_base);
296                 p3 = num2str(rs->min_bw[i], 6, rs->kb_base, i2p, rs->unit_base);
297                 p4 = num2str(rs->max_bw[i], 6, rs->kb_base, i2p, rs->unit_base);
298
299                 log_buf(out, "%s: io=%s, aggrb=%s/s, minb=%s/s, maxb=%s/s,"
300                          " mint=%llumsec, maxt=%llumsec\n",
301                                 rs->unified_rw_rep ? "  MIXED" : str[i],
302                                 p1, p2, p3, p4,
303                                 (unsigned long long) rs->min_run[i],
304                                 (unsigned long long) rs->max_run[i]);
305
306                 free(p1);
307                 free(p2);
308                 free(p3);
309                 free(p4);
310         }
311 }
312
313 void stat_calc_dist(unsigned int *map, unsigned long total, double *io_u_dist)
314 {
315         int i;
316
317         /*
318          * Do depth distribution calculations
319          */
320         for (i = 0; i < FIO_IO_U_MAP_NR; i++) {
321                 if (total) {
322                         io_u_dist[i] = (double) map[i] / (double) total;
323                         io_u_dist[i] *= 100.0;
324                         if (io_u_dist[i] < 0.1 && map[i])
325                                 io_u_dist[i] = 0.1;
326                 } else
327                         io_u_dist[i] = 0.0;
328         }
329 }
330
331 static void stat_calc_lat(struct thread_stat *ts, double *dst,
332                           unsigned int *src, int nr)
333 {
334         unsigned long total = ddir_rw_sum(ts->total_io_u);
335         int i;
336
337         /*
338          * Do latency distribution calculations
339          */
340         for (i = 0; i < nr; i++) {
341                 if (total) {
342                         dst[i] = (double) src[i] / (double) total;
343                         dst[i] *= 100.0;
344                         if (dst[i] < 0.01 && src[i])
345                                 dst[i] = 0.01;
346                 } else
347                         dst[i] = 0.0;
348         }
349 }
350
351 void stat_calc_lat_u(struct thread_stat *ts, double *io_u_lat)
352 {
353         stat_calc_lat(ts, io_u_lat, ts->io_u_lat_u, FIO_IO_U_LAT_U_NR);
354 }
355
356 void stat_calc_lat_m(struct thread_stat *ts, double *io_u_lat)
357 {
358         stat_calc_lat(ts, io_u_lat, ts->io_u_lat_m, FIO_IO_U_LAT_M_NR);
359 }
360
361 static void display_lat(const char *name, unsigned long min, unsigned long max,
362                         double mean, double dev, struct buf_output *out)
363 {
364         const char *base = "(usec)";
365         char *minp, *maxp;
366
367         if (usec_to_msec(&min, &max, &mean, &dev))
368                 base = "(msec)";
369
370         minp = num2str(min, 6, 1, 0, 0);
371         maxp = num2str(max, 6, 1, 0, 0);
372
373         log_buf(out, "    %s %s: min=%s, max=%s, avg=%5.02f,"
374                  " stdev=%5.02f\n", name, base, minp, maxp, mean, dev);
375
376         free(minp);
377         free(maxp);
378 }
379
380 static void show_ddir_status(struct group_run_stats *rs, struct thread_stat *ts,
381                              int ddir, struct buf_output *out)
382 {
383         const char *str[] = { "read ", "write", "trim" };
384         unsigned long min, max, runt;
385         unsigned long long bw, iops;
386         double mean, dev;
387         char *io_p, *bw_p, *iops_p;
388         int i2p;
389
390         assert(ddir_rw(ddir));
391
392         if (!ts->runtime[ddir])
393                 return;
394
395         i2p = is_power_of_2(rs->kb_base);
396         runt = ts->runtime[ddir];
397
398         bw = (1000 * ts->io_bytes[ddir]) / runt;
399         io_p = num2str(ts->io_bytes[ddir], 6, 1, i2p, 8);
400         bw_p = num2str(bw, 6, 1, i2p, ts->unit_base);
401
402         iops = (1000 * (uint64_t)ts->total_io_u[ddir]) / runt;
403         iops_p = num2str(iops, 6, 1, 0, 0);
404
405         log_buf(out, "  %s: io=%s, bw=%s/s, iops=%s, runt=%6llumsec\n",
406                                 rs->unified_rw_rep ? "mixed" : str[ddir],
407                                 io_p, bw_p, iops_p,
408                                 (unsigned long long) ts->runtime[ddir]);
409
410         free(io_p);
411         free(bw_p);
412         free(iops_p);
413
414         if (calc_lat(&ts->slat_stat[ddir], &min, &max, &mean, &dev))
415                 display_lat("slat", min, max, mean, dev, out);
416         if (calc_lat(&ts->clat_stat[ddir], &min, &max, &mean, &dev))
417                 display_lat("clat", min, max, mean, dev, out);
418         if (calc_lat(&ts->lat_stat[ddir], &min, &max, &mean, &dev))
419                 display_lat(" lat", min, max, mean, dev, out);
420
421         if (ts->clat_percentiles) {
422                 show_clat_percentiles(ts->io_u_plat[ddir],
423                                         ts->clat_stat[ddir].samples,
424                                         ts->percentile_list,
425                                         ts->percentile_precision, out);
426         }
427         if (calc_lat(&ts->bw_stat[ddir], &min, &max, &mean, &dev)) {
428                 double p_of_agg = 100.0, fkb_base = (double)rs->kb_base;
429                 const char *bw_str = (rs->unit_base == 1 ? "Kbit" : "KB");
430
431                 if (rs->unit_base == 1) {
432                         min *= 8.0;
433                         max *= 8.0;
434                         mean *= 8.0;
435                         dev *= 8.0;
436                 }
437
438                 if (rs->agg[ddir]) {
439                         p_of_agg = mean * 100 / (double) rs->agg[ddir];
440                         if (p_of_agg > 100.0)
441                                 p_of_agg = 100.0;
442                 }
443
444                 if (mean > fkb_base * fkb_base) {
445                         min /= fkb_base;
446                         max /= fkb_base;
447                         mean /= fkb_base;
448                         dev /= fkb_base;
449                         bw_str = (rs->unit_base == 1 ? "Mbit" : "MB");
450                 }
451
452                 log_buf(out, "    bw (%-4s/s): min=%5lu, max=%5lu, per=%3.2f%%,"
453                          " avg=%5.02f, stdev=%5.02f\n", bw_str, min, max,
454                                                         p_of_agg, mean, dev);
455         }
456 }
457
458 static int show_lat(double *io_u_lat, int nr, const char **ranges,
459                     const char *msg, struct buf_output *out)
460 {
461         int new_line = 1, i, line = 0, shown = 0;
462
463         for (i = 0; i < nr; i++) {
464                 if (io_u_lat[i] <= 0.0)
465                         continue;
466                 shown = 1;
467                 if (new_line) {
468                         if (line)
469                                 log_buf(out, "\n");
470                         log_buf(out, "    lat (%s) : ", msg);
471                         new_line = 0;
472                         line = 0;
473                 }
474                 if (line)
475                         log_buf(out, ", ");
476                 log_buf(out, "%s%3.2f%%", ranges[i], io_u_lat[i]);
477                 line++;
478                 if (line == 5)
479                         new_line = 1;
480         }
481
482         if (shown)
483                 log_buf(out, "\n");
484
485         return shown;
486 }
487
488 static void show_lat_u(double *io_u_lat_u, struct buf_output *out)
489 {
490         const char *ranges[] = { "2=", "4=", "10=", "20=", "50=", "100=",
491                                  "250=", "500=", "750=", "1000=", };
492
493         show_lat(io_u_lat_u, FIO_IO_U_LAT_U_NR, ranges, "usec", out);
494 }
495
496 static void show_lat_m(double *io_u_lat_m, struct buf_output *out)
497 {
498         const char *ranges[] = { "2=", "4=", "10=", "20=", "50=", "100=",
499                                  "250=", "500=", "750=", "1000=", "2000=",
500                                  ">=2000=", };
501
502         show_lat(io_u_lat_m, FIO_IO_U_LAT_M_NR, ranges, "msec", out);
503 }
504
505 static void show_latencies(struct thread_stat *ts, struct buf_output *out)
506 {
507         double io_u_lat_u[FIO_IO_U_LAT_U_NR];
508         double io_u_lat_m[FIO_IO_U_LAT_M_NR];
509
510         stat_calc_lat_u(ts, io_u_lat_u);
511         stat_calc_lat_m(ts, io_u_lat_m);
512
513         show_lat_u(io_u_lat_u, out);
514         show_lat_m(io_u_lat_m, out);
515 }
516
517 static int block_state_category(int block_state)
518 {
519         switch (block_state) {
520         case BLOCK_STATE_UNINIT:
521                 return 0;
522         case BLOCK_STATE_TRIMMED:
523         case BLOCK_STATE_WRITTEN:
524                 return 1;
525         case BLOCK_STATE_WRITE_FAILURE:
526         case BLOCK_STATE_TRIM_FAILURE:
527                 return 2;
528         default:
529                 /* Silence compile warning on some BSDs and have a return */
530                 assert(0);
531                 return -1;
532         }
533 }
534
535 static int compare_block_infos(const void *bs1, const void *bs2)
536 {
537         uint32_t block1 = *(uint32_t *)bs1;
538         uint32_t block2 = *(uint32_t *)bs2;
539         int state1 = BLOCK_INFO_STATE(block1);
540         int state2 = BLOCK_INFO_STATE(block2);
541         int bscat1 = block_state_category(state1);
542         int bscat2 = block_state_category(state2);
543         int cycles1 = BLOCK_INFO_TRIMS(block1);
544         int cycles2 = BLOCK_INFO_TRIMS(block2);
545
546         if (bscat1 < bscat2)
547                 return -1;
548         if (bscat1 > bscat2)
549                 return 1;
550
551         if (cycles1 < cycles2)
552                 return -1;
553         if (cycles1 > cycles2)
554                 return 1;
555
556         if (state1 < state2)
557                 return -1;
558         if (state1 > state2)
559                 return 1;
560
561         assert(block1 == block2);
562         return 0;
563 }
564
565 static int calc_block_percentiles(int nr_block_infos, uint32_t *block_infos,
566                                   fio_fp64_t *plist, unsigned int **percentiles,
567                                   unsigned int *types)
568 {
569         int len = 0;
570         int i, nr_uninit;
571
572         qsort(block_infos, nr_block_infos, sizeof(uint32_t), compare_block_infos);
573
574         while (len < FIO_IO_U_LIST_MAX_LEN && plist[len].u.f != 0.0)
575                 len++;
576
577         if (!len)
578                 return 0;
579
580         /*
581          * Sort the percentile list. Note that it may already be sorted if
582          * we are using the default values, but since it's a short list this
583          * isn't a worry. Also note that this does not work for NaN values.
584          */
585         if (len > 1)
586                 qsort((void *)plist, len, sizeof(plist[0]), double_cmp);
587
588         nr_uninit = 0;
589         /* Start only after the uninit entries end */
590         for (nr_uninit = 0;
591              nr_uninit < nr_block_infos
592                 && BLOCK_INFO_STATE(block_infos[nr_uninit]) == BLOCK_STATE_UNINIT;
593              nr_uninit ++)
594                 ;
595
596         if (nr_uninit == nr_block_infos)
597                 return 0;
598
599         *percentiles = calloc(len, sizeof(**percentiles));
600
601         for (i = 0; i < len; i++) {
602                 int idx = (plist[i].u.f * (nr_block_infos - nr_uninit) / 100)
603                                 + nr_uninit;
604                 (*percentiles)[i] = BLOCK_INFO_TRIMS(block_infos[idx]);
605         }
606
607         memset(types, 0, sizeof(*types) * BLOCK_STATE_COUNT);
608         for (i = 0; i < nr_block_infos; i++)
609                 types[BLOCK_INFO_STATE(block_infos[i])]++;
610
611         return len;
612 }
613
614 static const char *block_state_names[] = {
615         [BLOCK_STATE_UNINIT] = "unwritten",
616         [BLOCK_STATE_TRIMMED] = "trimmed",
617         [BLOCK_STATE_WRITTEN] = "written",
618         [BLOCK_STATE_TRIM_FAILURE] = "trim failure",
619         [BLOCK_STATE_WRITE_FAILURE] = "write failure",
620 };
621
622 static void show_block_infos(int nr_block_infos, uint32_t *block_infos,
623                              fio_fp64_t *plist, struct buf_output *out)
624 {
625         int len, pos, i;
626         unsigned int *percentiles = NULL;
627         unsigned int block_state_counts[BLOCK_STATE_COUNT];
628
629         len = calc_block_percentiles(nr_block_infos, block_infos, plist,
630                                      &percentiles, block_state_counts);
631
632         log_buf(out, "  block lifetime percentiles :\n   |");
633         pos = 0;
634         for (i = 0; i < len; i++) {
635                 uint32_t block_info = percentiles[i];
636 #define LINE_LENGTH     75
637                 char str[LINE_LENGTH];
638                 int strln = snprintf(str, LINE_LENGTH, " %3.2fth=%u%c",
639                                      plist[i].u.f, block_info,
640                                      i == len - 1 ? '\n' : ',');
641                 assert(strln < LINE_LENGTH);
642                 if (pos + strln > LINE_LENGTH) {
643                         pos = 0;
644                         log_buf(out, "\n   |");
645                 }
646                 log_buf(out, "%s", str);
647                 pos += strln;
648 #undef LINE_LENGTH
649         }
650         if (percentiles)
651                 free(percentiles);
652
653         log_buf(out, "        states               :");
654         for (i = 0; i < BLOCK_STATE_COUNT; i++)
655                 log_buf(out, " %s=%u%c",
656                          block_state_names[i], block_state_counts[i],
657                          i == BLOCK_STATE_COUNT - 1 ? '\n' : ',');
658 }
659
660 static void show_thread_status_normal(struct thread_stat *ts,
661                                       struct group_run_stats *rs,
662                                       struct buf_output *out)
663 {
664         double usr_cpu, sys_cpu;
665         unsigned long runtime;
666         double io_u_dist[FIO_IO_U_MAP_NR];
667         time_t time_p;
668         char time_buf[32];
669
670         if (!ddir_rw_sum(ts->io_bytes) && !ddir_rw_sum(ts->total_io_u))
671                 return;
672                 
673         memset(time_buf, 0, sizeof(time_buf));
674
675         time(&time_p);
676         os_ctime_r((const time_t *) &time_p, time_buf, sizeof(time_buf));
677
678         if (!ts->error) {
679                 log_buf(out, "%s: (groupid=%d, jobs=%d): err=%2d: pid=%d: %s",
680                                         ts->name, ts->groupid, ts->members,
681                                         ts->error, (int) ts->pid, time_buf);
682         } else {
683                 log_buf(out, "%s: (groupid=%d, jobs=%d): err=%2d (%s): pid=%d: %s",
684                                         ts->name, ts->groupid, ts->members,
685                                         ts->error, ts->verror, (int) ts->pid,
686                                         time_buf);
687         }
688
689         if (strlen(ts->description))
690                 log_buf(out, "  Description  : [%s]\n", ts->description);
691
692         if (ts->io_bytes[DDIR_READ])
693                 show_ddir_status(rs, ts, DDIR_READ, out);
694         if (ts->io_bytes[DDIR_WRITE])
695                 show_ddir_status(rs, ts, DDIR_WRITE, out);
696         if (ts->io_bytes[DDIR_TRIM])
697                 show_ddir_status(rs, ts, DDIR_TRIM, out);
698
699         show_latencies(ts, out);
700
701         runtime = ts->total_run_time;
702         if (runtime) {
703                 double runt = (double) runtime;
704
705                 usr_cpu = (double) ts->usr_time * 100 / runt;
706                 sys_cpu = (double) ts->sys_time * 100 / runt;
707         } else {
708                 usr_cpu = 0;
709                 sys_cpu = 0;
710         }
711
712         log_buf(out, "  cpu          : usr=%3.2f%%, sys=%3.2f%%, ctx=%llu,"
713                  " majf=%llu, minf=%llu\n", usr_cpu, sys_cpu,
714                         (unsigned long long) ts->ctx,
715                         (unsigned long long) ts->majf,
716                         (unsigned long long) ts->minf);
717
718         stat_calc_dist(ts->io_u_map, ddir_rw_sum(ts->total_io_u), io_u_dist);
719         log_buf(out, "  IO depths    : 1=%3.1f%%, 2=%3.1f%%, 4=%3.1f%%, 8=%3.1f%%,"
720                  " 16=%3.1f%%, 32=%3.1f%%, >=64=%3.1f%%\n", io_u_dist[0],
721                                         io_u_dist[1], io_u_dist[2],
722                                         io_u_dist[3], io_u_dist[4],
723                                         io_u_dist[5], io_u_dist[6]);
724
725         stat_calc_dist(ts->io_u_submit, ts->total_submit, io_u_dist);
726         log_buf(out, "     submit    : 0=%3.1f%%, 4=%3.1f%%, 8=%3.1f%%, 16=%3.1f%%,"
727                  " 32=%3.1f%%, 64=%3.1f%%, >=64=%3.1f%%\n", io_u_dist[0],
728                                         io_u_dist[1], io_u_dist[2],
729                                         io_u_dist[3], io_u_dist[4],
730                                         io_u_dist[5], io_u_dist[6]);
731         stat_calc_dist(ts->io_u_complete, ts->total_complete, io_u_dist);
732         log_buf(out, "     complete  : 0=%3.1f%%, 4=%3.1f%%, 8=%3.1f%%, 16=%3.1f%%,"
733                  " 32=%3.1f%%, 64=%3.1f%%, >=64=%3.1f%%\n", io_u_dist[0],
734                                         io_u_dist[1], io_u_dist[2],
735                                         io_u_dist[3], io_u_dist[4],
736                                         io_u_dist[5], io_u_dist[6]);
737         log_buf(out, "     issued    : total=r=%llu/w=%llu/d=%llu,"
738                                  " short=r=%llu/w=%llu/d=%llu,"
739                                  " drop=r=%llu/w=%llu/d=%llu\n",
740                                         (unsigned long long) ts->total_io_u[0],
741                                         (unsigned long long) ts->total_io_u[1],
742                                         (unsigned long long) ts->total_io_u[2],
743                                         (unsigned long long) ts->short_io_u[0],
744                                         (unsigned long long) ts->short_io_u[1],
745                                         (unsigned long long) ts->short_io_u[2],
746                                         (unsigned long long) ts->drop_io_u[0],
747                                         (unsigned long long) ts->drop_io_u[1],
748                                         (unsigned long long) ts->drop_io_u[2]);
749         if (ts->continue_on_error) {
750                 log_buf(out, "     errors    : total=%llu, first_error=%d/<%s>\n",
751                                         (unsigned long long)ts->total_err_count,
752                                         ts->first_error,
753                                         strerror(ts->first_error));
754         }
755         if (ts->latency_depth) {
756                 log_buf(out, "     latency   : target=%llu, window=%llu, percentile=%.2f%%, depth=%u\n",
757                                         (unsigned long long)ts->latency_target,
758                                         (unsigned long long)ts->latency_window,
759                                         ts->latency_percentile.u.f,
760                                         ts->latency_depth);
761         }
762
763         if (ts->nr_block_infos)
764                 show_block_infos(ts->nr_block_infos, ts->block_infos,
765                                   ts->percentile_list, out);
766 }
767
768 static void show_ddir_status_terse(struct thread_stat *ts,
769                                    struct group_run_stats *rs, int ddir,
770                                    struct buf_output *out)
771 {
772         unsigned long min, max;
773         unsigned long long bw, iops;
774         unsigned int *ovals = NULL;
775         double mean, dev;
776         unsigned int len, minv, maxv;
777         int i;
778
779         assert(ddir_rw(ddir));
780
781         iops = bw = 0;
782         if (ts->runtime[ddir]) {
783                 uint64_t runt = ts->runtime[ddir];
784
785                 bw = ((1000 * ts->io_bytes[ddir]) / runt) / 1024;
786                 iops = (1000 * (uint64_t) ts->total_io_u[ddir]) / runt;
787         }
788
789         log_buf(out, ";%llu;%llu;%llu;%llu",
790                 (unsigned long long) ts->io_bytes[ddir] >> 10, bw, iops,
791                                         (unsigned long long) ts->runtime[ddir]);
792
793         if (calc_lat(&ts->slat_stat[ddir], &min, &max, &mean, &dev))
794                 log_buf(out, ";%lu;%lu;%f;%f", min, max, mean, dev);
795         else
796                 log_buf(out, ";%lu;%lu;%f;%f", 0UL, 0UL, 0.0, 0.0);
797
798         if (calc_lat(&ts->clat_stat[ddir], &min, &max, &mean, &dev))
799                 log_buf(out, ";%lu;%lu;%f;%f", min, max, mean, dev);
800         else
801                 log_buf(out, ";%lu;%lu;%f;%f", 0UL, 0UL, 0.0, 0.0);
802
803         if (ts->clat_percentiles) {
804                 len = calc_clat_percentiles(ts->io_u_plat[ddir],
805                                         ts->clat_stat[ddir].samples,
806                                         ts->percentile_list, &ovals, &maxv,
807                                         &minv);
808         } else
809                 len = 0;
810
811         for (i = 0; i < FIO_IO_U_LIST_MAX_LEN; i++) {
812                 if (i >= len) {
813                         log_buf(out, ";0%%=0");
814                         continue;
815                 }
816                 log_buf(out, ";%f%%=%u", ts->percentile_list[i].u.f, ovals[i]);
817         }
818
819         if (calc_lat(&ts->lat_stat[ddir], &min, &max, &mean, &dev))
820                 log_buf(out, ";%lu;%lu;%f;%f", min, max, mean, dev);
821         else
822                 log_buf(out, ";%lu;%lu;%f;%f", 0UL, 0UL, 0.0, 0.0);
823
824         if (ovals)
825                 free(ovals);
826
827         if (calc_lat(&ts->bw_stat[ddir], &min, &max, &mean, &dev)) {
828                 double p_of_agg = 100.0;
829
830                 if (rs->agg[ddir]) {
831                         p_of_agg = mean * 100 / (double) rs->agg[ddir];
832                         if (p_of_agg > 100.0)
833                                 p_of_agg = 100.0;
834                 }
835
836                 log_buf(out, ";%lu;%lu;%f%%;%f;%f", min, max, p_of_agg, mean, dev);
837         } else
838                 log_buf(out, ";%lu;%lu;%f%%;%f;%f", 0UL, 0UL, 0.0, 0.0, 0.0);
839 }
840
841 static void add_ddir_status_json(struct thread_stat *ts,
842                 struct group_run_stats *rs, int ddir, struct json_object *parent)
843 {
844         unsigned long min, max;
845         unsigned long long bw;
846         unsigned int *ovals = NULL;
847         double mean, dev, iops;
848         unsigned int len, minv, maxv;
849         int i;
850         const char *ddirname[] = {"read", "write", "trim"};
851         struct json_object *dir_object, *tmp_object, *percentile_object, *clat_bins_object;
852         char buf[120];
853         double p_of_agg = 100.0;
854
855         assert(ddir_rw(ddir));
856
857         if (ts->unified_rw_rep && ddir != DDIR_READ)
858                 return;
859
860         dir_object = json_create_object();
861         json_object_add_value_object(parent,
862                 ts->unified_rw_rep ? "mixed" : ddirname[ddir], dir_object);
863
864         bw = 0;
865         iops = 0.0;
866         if (ts->runtime[ddir]) {
867                 uint64_t runt = ts->runtime[ddir];
868
869                 bw = ((1000 * ts->io_bytes[ddir]) / runt) / 1024;
870                 iops = (1000.0 * (uint64_t) ts->total_io_u[ddir]) / runt;
871         }
872
873         json_object_add_value_int(dir_object, "io_bytes", ts->io_bytes[ddir] >> 10);
874         json_object_add_value_int(dir_object, "bw", bw);
875         json_object_add_value_float(dir_object, "iops", iops);
876         json_object_add_value_int(dir_object, "runtime", ts->runtime[ddir]);
877         json_object_add_value_int(dir_object, "total_ios", ts->total_io_u[ddir]);
878         json_object_add_value_int(dir_object, "short_ios", ts->short_io_u[ddir]);
879         json_object_add_value_int(dir_object, "drop_ios", ts->drop_io_u[ddir]);
880
881         if (!calc_lat(&ts->slat_stat[ddir], &min, &max, &mean, &dev)) {
882                 min = max = 0;
883                 mean = dev = 0.0;
884         }
885         tmp_object = json_create_object();
886         json_object_add_value_object(dir_object, "slat", tmp_object);
887         json_object_add_value_int(tmp_object, "min", min);
888         json_object_add_value_int(tmp_object, "max", max);
889         json_object_add_value_float(tmp_object, "mean", mean);
890         json_object_add_value_float(tmp_object, "stddev", dev);
891
892         if (!calc_lat(&ts->clat_stat[ddir], &min, &max, &mean, &dev)) {
893                 min = max = 0;
894                 mean = dev = 0.0;
895         }
896         tmp_object = json_create_object();
897         json_object_add_value_object(dir_object, "clat", tmp_object);
898         json_object_add_value_int(tmp_object, "min", min);
899         json_object_add_value_int(tmp_object, "max", max);
900         json_object_add_value_float(tmp_object, "mean", mean);
901         json_object_add_value_float(tmp_object, "stddev", dev);
902
903         if (ts->clat_percentiles) {
904                 len = calc_clat_percentiles(ts->io_u_plat[ddir],
905                                         ts->clat_stat[ddir].samples,
906                                         ts->percentile_list, &ovals, &maxv,
907                                         &minv);
908         } else
909                 len = 0;
910
911         percentile_object = json_create_object();
912         json_object_add_value_object(tmp_object, "percentile", percentile_object);
913         for (i = 0; i < FIO_IO_U_LIST_MAX_LEN; i++) {
914                 if (i >= len) {
915                         json_object_add_value_int(percentile_object, "0.00", 0);
916                         continue;
917                 }
918                 snprintf(buf, sizeof(buf), "%f", ts->percentile_list[i].u.f);
919                 json_object_add_value_int(percentile_object, (const char *)buf, ovals[i]);
920         }
921
922         if (output_format & FIO_OUTPUT_JSON_PLUS) {
923                 clat_bins_object = json_create_object();
924                 json_object_add_value_object(tmp_object, "bins", clat_bins_object);
925                 for(i = 0; i < FIO_IO_U_PLAT_NR; i++) {
926                         snprintf(buf, sizeof(buf), "%d", i);
927                         json_object_add_value_int(clat_bins_object, (const char *)buf, ts->io_u_plat[ddir][i]);
928                 }
929                 json_object_add_value_int(clat_bins_object, "FIO_IO_U_PLAT_BITS", FIO_IO_U_PLAT_BITS);
930                 json_object_add_value_int(clat_bins_object, "FIO_IO_U_PLAT_VAL", FIO_IO_U_PLAT_VAL);
931                 json_object_add_value_int(clat_bins_object, "FIO_IO_U_PLAT_NR", FIO_IO_U_PLAT_NR);
932         }
933
934         if (!calc_lat(&ts->lat_stat[ddir], &min, &max, &mean, &dev)) {
935                 min = max = 0;
936                 mean = dev = 0.0;
937         }
938         tmp_object = json_create_object();
939         json_object_add_value_object(dir_object, "lat", tmp_object);
940         json_object_add_value_int(tmp_object, "min", min);
941         json_object_add_value_int(tmp_object, "max", max);
942         json_object_add_value_float(tmp_object, "mean", mean);
943         json_object_add_value_float(tmp_object, "stddev", dev);
944         if (ovals)
945                 free(ovals);
946
947         if (calc_lat(&ts->bw_stat[ddir], &min, &max, &mean, &dev)) {
948                 if (rs->agg[ddir]) {
949                         p_of_agg = mean * 100 / (double) rs->agg[ddir];
950                         if (p_of_agg > 100.0)
951                                 p_of_agg = 100.0;
952                 }
953         } else {
954                 min = max = 0;
955                 p_of_agg = mean = dev = 0.0;
956         }
957         json_object_add_value_int(dir_object, "bw_min", min);
958         json_object_add_value_int(dir_object, "bw_max", max);
959         json_object_add_value_float(dir_object, "bw_agg", p_of_agg);
960         json_object_add_value_float(dir_object, "bw_mean", mean);
961         json_object_add_value_float(dir_object, "bw_dev", dev);
962 }
963
964 static void show_thread_status_terse_v2(struct thread_stat *ts,
965                                         struct group_run_stats *rs,
966                                         struct buf_output *out)
967 {
968         double io_u_dist[FIO_IO_U_MAP_NR];
969         double io_u_lat_u[FIO_IO_U_LAT_U_NR];
970         double io_u_lat_m[FIO_IO_U_LAT_M_NR];
971         double usr_cpu, sys_cpu;
972         int i;
973
974         /* General Info */
975         log_buf(out, "2;%s;%d;%d", ts->name, ts->groupid, ts->error);
976         /* Log Read Status */
977         show_ddir_status_terse(ts, rs, DDIR_READ, out);
978         /* Log Write Status */
979         show_ddir_status_terse(ts, rs, DDIR_WRITE, out);
980         /* Log Trim Status */
981         show_ddir_status_terse(ts, rs, DDIR_TRIM, out);
982
983         /* CPU Usage */
984         if (ts->total_run_time) {
985                 double runt = (double) ts->total_run_time;
986
987                 usr_cpu = (double) ts->usr_time * 100 / runt;
988                 sys_cpu = (double) ts->sys_time * 100 / runt;
989         } else {
990                 usr_cpu = 0;
991                 sys_cpu = 0;
992         }
993
994         log_buf(out, ";%f%%;%f%%;%llu;%llu;%llu", usr_cpu, sys_cpu,
995                                                 (unsigned long long) ts->ctx,
996                                                 (unsigned long long) ts->majf,
997                                                 (unsigned long long) ts->minf);
998
999         /* Calc % distribution of IO depths, usecond, msecond latency */
1000         stat_calc_dist(ts->io_u_map, ddir_rw_sum(ts->total_io_u), io_u_dist);
1001         stat_calc_lat_u(ts, io_u_lat_u);
1002         stat_calc_lat_m(ts, io_u_lat_m);
1003
1004         /* Only show fixed 7 I/O depth levels*/
1005         log_buf(out, ";%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%",
1006                         io_u_dist[0], io_u_dist[1], io_u_dist[2], io_u_dist[3],
1007                         io_u_dist[4], io_u_dist[5], io_u_dist[6]);
1008
1009         /* Microsecond latency */
1010         for (i = 0; i < FIO_IO_U_LAT_U_NR; i++)
1011                 log_buf(out, ";%3.2f%%", io_u_lat_u[i]);
1012         /* Millisecond latency */
1013         for (i = 0; i < FIO_IO_U_LAT_M_NR; i++)
1014                 log_buf(out, ";%3.2f%%", io_u_lat_m[i]);
1015         /* Additional output if continue_on_error set - default off*/
1016         if (ts->continue_on_error)
1017                 log_buf(out, ";%llu;%d", (unsigned long long) ts->total_err_count, ts->first_error);
1018         log_buf(out, "\n");
1019
1020         /* Additional output if description is set */
1021         if (strlen(ts->description))
1022                 log_buf(out, ";%s", ts->description);
1023
1024         log_buf(out, "\n");
1025 }
1026
1027 static void show_thread_status_terse_v3_v4(struct thread_stat *ts,
1028                                            struct group_run_stats *rs, int ver,
1029                                            struct buf_output *out)
1030 {
1031         double io_u_dist[FIO_IO_U_MAP_NR];
1032         double io_u_lat_u[FIO_IO_U_LAT_U_NR];
1033         double io_u_lat_m[FIO_IO_U_LAT_M_NR];
1034         double usr_cpu, sys_cpu;
1035         int i;
1036
1037         /* General Info */
1038         log_buf(out, "%d;%s;%s;%d;%d", ver, fio_version_string,
1039                                         ts->name, ts->groupid, ts->error);
1040         /* Log Read Status */
1041         show_ddir_status_terse(ts, rs, DDIR_READ, out);
1042         /* Log Write Status */
1043         show_ddir_status_terse(ts, rs, DDIR_WRITE, out);
1044         /* Log Trim Status */
1045         if (ver == 4)
1046                 show_ddir_status_terse(ts, rs, DDIR_TRIM, out);
1047
1048         /* CPU Usage */
1049         if (ts->total_run_time) {
1050                 double runt = (double) ts->total_run_time;
1051
1052                 usr_cpu = (double) ts->usr_time * 100 / runt;
1053                 sys_cpu = (double) ts->sys_time * 100 / runt;
1054         } else {
1055                 usr_cpu = 0;
1056                 sys_cpu = 0;
1057         }
1058
1059         log_buf(out, ";%f%%;%f%%;%llu;%llu;%llu", usr_cpu, sys_cpu,
1060                                                 (unsigned long long) ts->ctx,
1061                                                 (unsigned long long) ts->majf,
1062                                                 (unsigned long long) ts->minf);
1063
1064         /* Calc % distribution of IO depths, usecond, msecond latency */
1065         stat_calc_dist(ts->io_u_map, ddir_rw_sum(ts->total_io_u), io_u_dist);
1066         stat_calc_lat_u(ts, io_u_lat_u);
1067         stat_calc_lat_m(ts, io_u_lat_m);
1068
1069         /* Only show fixed 7 I/O depth levels*/
1070         log_buf(out, ";%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%;%3.1f%%",
1071                         io_u_dist[0], io_u_dist[1], io_u_dist[2], io_u_dist[3],
1072                         io_u_dist[4], io_u_dist[5], io_u_dist[6]);
1073
1074         /* Microsecond latency */
1075         for (i = 0; i < FIO_IO_U_LAT_U_NR; i++)
1076                 log_buf(out, ";%3.2f%%", io_u_lat_u[i]);
1077         /* Millisecond latency */
1078         for (i = 0; i < FIO_IO_U_LAT_M_NR; i++)
1079                 log_buf(out, ";%3.2f%%", io_u_lat_m[i]);
1080
1081         /* disk util stats, if any */
1082         show_disk_util(1, NULL, out);
1083
1084         /* Additional output if continue_on_error set - default off*/
1085         if (ts->continue_on_error)
1086                 log_buf(out, ";%llu;%d", (unsigned long long) ts->total_err_count, ts->first_error);
1087
1088         /* Additional output if description is set */
1089         if (strlen(ts->description))
1090                 log_buf(out, ";%s", ts->description);
1091
1092         log_buf(out, "\n");
1093 }
1094
1095 static void json_add_job_opts(struct json_object *root, const char *name,
1096                               struct flist_head *opt_list, bool num_jobs)
1097 {
1098         struct json_object *dir_object;
1099         struct flist_head *entry;
1100         struct print_option *p;
1101
1102         if (flist_empty(opt_list))
1103                 return;
1104
1105         dir_object = json_create_object();
1106         json_object_add_value_object(root, name, dir_object);
1107
1108         flist_for_each(entry, opt_list) {
1109                 const char *pos = "";
1110
1111                 p = flist_entry(entry, struct print_option, list);
1112                 if (!num_jobs && !strcmp(p->name, "numjobs"))
1113                         continue;
1114                 if (p->value)
1115                         pos = p->value;
1116                 json_object_add_value_string(dir_object, p->name, pos);
1117         }
1118 }
1119
1120 static struct json_object *show_thread_status_json(struct thread_stat *ts,
1121                                                    struct group_run_stats *rs,
1122                                                    struct flist_head *opt_list)
1123 {
1124         struct json_object *root, *tmp;
1125         struct jobs_eta *je;
1126         double io_u_dist[FIO_IO_U_MAP_NR];
1127         double io_u_lat_u[FIO_IO_U_LAT_U_NR];
1128         double io_u_lat_m[FIO_IO_U_LAT_M_NR];
1129         double usr_cpu, sys_cpu;
1130         int i;
1131         size_t size;
1132
1133         root = json_create_object();
1134         json_object_add_value_string(root, "jobname", ts->name);
1135         json_object_add_value_int(root, "groupid", ts->groupid);
1136         json_object_add_value_int(root, "error", ts->error);
1137
1138         /* ETA Info */
1139         je = get_jobs_eta(true, &size);
1140         if (je) {
1141                 json_object_add_value_int(root, "eta", je->eta_sec);
1142                 json_object_add_value_int(root, "elapsed", je->elapsed_sec);
1143         }
1144
1145         if (opt_list)
1146                 json_add_job_opts(root, "job options", opt_list, true);
1147
1148         add_ddir_status_json(ts, rs, DDIR_READ, root);
1149         add_ddir_status_json(ts, rs, DDIR_WRITE, root);
1150         add_ddir_status_json(ts, rs, DDIR_TRIM, root);
1151
1152         /* CPU Usage */
1153         if (ts->total_run_time) {
1154                 double runt = (double) ts->total_run_time;
1155
1156                 usr_cpu = (double) ts->usr_time * 100 / runt;
1157                 sys_cpu = (double) ts->sys_time * 100 / runt;
1158         } else {
1159                 usr_cpu = 0;
1160                 sys_cpu = 0;
1161         }
1162         json_object_add_value_float(root, "usr_cpu", usr_cpu);
1163         json_object_add_value_float(root, "sys_cpu", sys_cpu);
1164         json_object_add_value_int(root, "ctx", ts->ctx);
1165         json_object_add_value_int(root, "majf", ts->majf);
1166         json_object_add_value_int(root, "minf", ts->minf);
1167
1168
1169         /* Calc % distribution of IO depths, usecond, msecond latency */
1170         stat_calc_dist(ts->io_u_map, ddir_rw_sum(ts->total_io_u), io_u_dist);
1171         stat_calc_lat_u(ts, io_u_lat_u);
1172         stat_calc_lat_m(ts, io_u_lat_m);
1173
1174         tmp = json_create_object();
1175         json_object_add_value_object(root, "iodepth_level", tmp);
1176         /* Only show fixed 7 I/O depth levels*/
1177         for (i = 0; i < 7; i++) {
1178                 char name[20];
1179                 if (i < 6)
1180                         snprintf(name, 20, "%d", 1 << i);
1181                 else
1182                         snprintf(name, 20, ">=%d", 1 << i);
1183                 json_object_add_value_float(tmp, (const char *)name, io_u_dist[i]);
1184         }
1185
1186         tmp = json_create_object();
1187         json_object_add_value_object(root, "latency_us", tmp);
1188         /* Microsecond latency */
1189         for (i = 0; i < FIO_IO_U_LAT_U_NR; i++) {
1190                 const char *ranges[] = { "2", "4", "10", "20", "50", "100",
1191                                  "250", "500", "750", "1000", };
1192                 json_object_add_value_float(tmp, ranges[i], io_u_lat_u[i]);
1193         }
1194         /* Millisecond latency */
1195         tmp = json_create_object();
1196         json_object_add_value_object(root, "latency_ms", tmp);
1197         for (i = 0; i < FIO_IO_U_LAT_M_NR; i++) {
1198                 const char *ranges[] = { "2", "4", "10", "20", "50", "100",
1199                                  "250", "500", "750", "1000", "2000",
1200                                  ">=2000", };
1201                 json_object_add_value_float(tmp, ranges[i], io_u_lat_m[i]);
1202         }
1203
1204         /* Additional output if continue_on_error set - default off*/
1205         if (ts->continue_on_error) {
1206                 json_object_add_value_int(root, "total_err", ts->total_err_count);
1207                 json_object_add_value_int(root, "first_error", ts->first_error);
1208         }
1209
1210         if (ts->latency_depth) {
1211                 json_object_add_value_int(root, "latency_depth", ts->latency_depth);
1212                 json_object_add_value_int(root, "latency_target", ts->latency_target);
1213                 json_object_add_value_float(root, "latency_percentile", ts->latency_percentile.u.f);
1214                 json_object_add_value_int(root, "latency_window", ts->latency_window);
1215         }
1216
1217         /* Additional output if description is set */
1218         if (strlen(ts->description))
1219                 json_object_add_value_string(root, "desc", ts->description);
1220
1221         if (ts->nr_block_infos) {
1222                 /* Block error histogram and types */
1223                 int len;
1224                 unsigned int *percentiles = NULL;
1225                 unsigned int block_state_counts[BLOCK_STATE_COUNT];
1226
1227                 len = calc_block_percentiles(ts->nr_block_infos, ts->block_infos,
1228                                              ts->percentile_list,
1229                                              &percentiles, block_state_counts);
1230
1231                 if (len) {
1232                         struct json_object *block, *percentile_object, *states;
1233                         int state;
1234                         block = json_create_object();
1235                         json_object_add_value_object(root, "block", block);
1236
1237                         percentile_object = json_create_object();
1238                         json_object_add_value_object(block, "percentiles",
1239                                                      percentile_object);
1240                         for (i = 0; i < len; i++) {
1241                                 char buf[20];
1242                                 snprintf(buf, sizeof(buf), "%f",
1243                                          ts->percentile_list[i].u.f);
1244                                 json_object_add_value_int(percentile_object,
1245                                                           (const char *)buf,
1246                                                           percentiles[i]);
1247                         }
1248
1249                         states = json_create_object();
1250                         json_object_add_value_object(block, "states", states);
1251                         for (state = 0; state < BLOCK_STATE_COUNT; state++) {
1252                                 json_object_add_value_int(states,
1253                                         block_state_names[state],
1254                                         block_state_counts[state]);
1255                         }
1256                         free(percentiles);
1257                 }
1258         }
1259
1260         return root;
1261 }
1262
1263 static void show_thread_status_terse(struct thread_stat *ts,
1264                                      struct group_run_stats *rs,
1265                                      struct buf_output *out)
1266 {
1267         if (terse_version == 2)
1268                 show_thread_status_terse_v2(ts, rs, out);
1269         else if (terse_version == 3 || terse_version == 4)
1270                 show_thread_status_terse_v3_v4(ts, rs, terse_version, out);
1271         else
1272                 log_err("fio: bad terse version!? %d\n", terse_version);
1273 }
1274
1275 struct json_object *show_thread_status(struct thread_stat *ts,
1276                                        struct group_run_stats *rs,
1277                                        struct flist_head *opt_list,
1278                                        struct buf_output *out)
1279 {
1280         struct json_object *ret = NULL;
1281
1282         if (output_format & FIO_OUTPUT_TERSE)
1283                 show_thread_status_terse(ts, rs,  out);
1284         if (output_format & FIO_OUTPUT_JSON)
1285                 ret = show_thread_status_json(ts, rs, opt_list);
1286         if (output_format & FIO_OUTPUT_NORMAL)
1287                 show_thread_status_normal(ts, rs,  out);
1288
1289         return ret;
1290 }
1291
1292 static void sum_stat(struct io_stat *dst, struct io_stat *src, bool first)
1293 {
1294         double mean, S;
1295
1296         if (src->samples == 0)
1297                 return;
1298
1299         dst->min_val = min(dst->min_val, src->min_val);
1300         dst->max_val = max(dst->max_val, src->max_val);
1301
1302         /*
1303          * Compute new mean and S after the merge
1304          * <http://en.wikipedia.org/wiki/Algorithms_for_calculating_variance
1305          *  #Parallel_algorithm>
1306          */
1307         if (first) {
1308                 mean = src->mean.u.f;
1309                 S = src->S.u.f;
1310         } else {
1311                 double delta = src->mean.u.f - dst->mean.u.f;
1312
1313                 mean = ((src->mean.u.f * src->samples) +
1314                         (dst->mean.u.f * dst->samples)) /
1315                         (dst->samples + src->samples);
1316
1317                 S =  src->S.u.f + dst->S.u.f + pow(delta, 2.0) *
1318                         (dst->samples * src->samples) /
1319                         (dst->samples + src->samples);
1320         }
1321
1322         dst->samples += src->samples;
1323         dst->mean.u.f = mean;
1324         dst->S.u.f = S;
1325 }
1326
1327 void sum_group_stats(struct group_run_stats *dst, struct group_run_stats *src)
1328 {
1329         int i;
1330
1331         for (i = 0; i < DDIR_RWDIR_CNT; i++) {
1332                 if (dst->max_run[i] < src->max_run[i])
1333                         dst->max_run[i] = src->max_run[i];
1334                 if (dst->min_run[i] && dst->min_run[i] > src->min_run[i])
1335                         dst->min_run[i] = src->min_run[i];
1336                 if (dst->max_bw[i] < src->max_bw[i])
1337                         dst->max_bw[i] = src->max_bw[i];
1338                 if (dst->min_bw[i] && dst->min_bw[i] > src->min_bw[i])
1339                         dst->min_bw[i] = src->min_bw[i];
1340
1341                 dst->io_kb[i] += src->io_kb[i];
1342                 dst->agg[i] += src->agg[i];
1343         }
1344
1345         if (!dst->kb_base)
1346                 dst->kb_base = src->kb_base;
1347         if (!dst->unit_base)
1348                 dst->unit_base = src->unit_base;
1349 }
1350
1351 void sum_thread_stats(struct thread_stat *dst, struct thread_stat *src,
1352                       bool first)
1353 {
1354         int l, k;
1355
1356         for (l = 0; l < DDIR_RWDIR_CNT; l++) {
1357                 if (!dst->unified_rw_rep) {
1358                         sum_stat(&dst->clat_stat[l], &src->clat_stat[l], first);
1359                         sum_stat(&dst->slat_stat[l], &src->slat_stat[l], first);
1360                         sum_stat(&dst->lat_stat[l], &src->lat_stat[l], first);
1361                         sum_stat(&dst->bw_stat[l], &src->bw_stat[l], first);
1362
1363                         dst->io_bytes[l] += src->io_bytes[l];
1364
1365                         if (dst->runtime[l] < src->runtime[l])
1366                                 dst->runtime[l] = src->runtime[l];
1367                 } else {
1368                         sum_stat(&dst->clat_stat[0], &src->clat_stat[l], first);
1369                         sum_stat(&dst->slat_stat[0], &src->slat_stat[l], first);
1370                         sum_stat(&dst->lat_stat[0], &src->lat_stat[l], first);
1371                         sum_stat(&dst->bw_stat[0], &src->bw_stat[l], first);
1372
1373                         dst->io_bytes[0] += src->io_bytes[l];
1374
1375                         if (dst->runtime[0] < src->runtime[l])
1376                                 dst->runtime[0] = src->runtime[l];
1377
1378                         /*
1379                          * We're summing to the same destination, so override
1380                          * 'first' after the first iteration of the loop
1381                          */
1382                         first = false;
1383                 }
1384         }
1385
1386         dst->usr_time += src->usr_time;
1387         dst->sys_time += src->sys_time;
1388         dst->ctx += src->ctx;
1389         dst->majf += src->majf;
1390         dst->minf += src->minf;
1391
1392         for (k = 0; k < FIO_IO_U_MAP_NR; k++)
1393                 dst->io_u_map[k] += src->io_u_map[k];
1394         for (k = 0; k < FIO_IO_U_MAP_NR; k++)
1395                 dst->io_u_submit[k] += src->io_u_submit[k];
1396         for (k = 0; k < FIO_IO_U_MAP_NR; k++)
1397                 dst->io_u_complete[k] += src->io_u_complete[k];
1398         for (k = 0; k < FIO_IO_U_LAT_U_NR; k++)
1399                 dst->io_u_lat_u[k] += src->io_u_lat_u[k];
1400         for (k = 0; k < FIO_IO_U_LAT_M_NR; k++)
1401                 dst->io_u_lat_m[k] += src->io_u_lat_m[k];
1402
1403         for (k = 0; k < DDIR_RWDIR_CNT; k++) {
1404                 if (!dst->unified_rw_rep) {
1405                         dst->total_io_u[k] += src->total_io_u[k];
1406                         dst->short_io_u[k] += src->short_io_u[k];
1407                         dst->drop_io_u[k] += src->drop_io_u[k];
1408                 } else {
1409                         dst->total_io_u[0] += src->total_io_u[k];
1410                         dst->short_io_u[0] += src->short_io_u[k];
1411                         dst->drop_io_u[0] += src->drop_io_u[k];
1412                 }
1413         }
1414
1415         for (k = 0; k < DDIR_RWDIR_CNT; k++) {
1416                 int m;
1417
1418                 for (m = 0; m < FIO_IO_U_PLAT_NR; m++) {
1419                         if (!dst->unified_rw_rep)
1420                                 dst->io_u_plat[k][m] += src->io_u_plat[k][m];
1421                         else
1422                                 dst->io_u_plat[0][m] += src->io_u_plat[k][m];
1423                 }
1424         }
1425
1426         dst->total_run_time += src->total_run_time;
1427         dst->total_submit += src->total_submit;
1428         dst->total_complete += src->total_complete;
1429 }
1430
1431 void init_group_run_stat(struct group_run_stats *gs)
1432 {
1433         int i;
1434         memset(gs, 0, sizeof(*gs));
1435
1436         for (i = 0; i < DDIR_RWDIR_CNT; i++)
1437                 gs->min_bw[i] = gs->min_run[i] = ~0UL;
1438 }
1439
1440 void init_thread_stat(struct thread_stat *ts)
1441 {
1442         int j;
1443
1444         memset(ts, 0, sizeof(*ts));
1445
1446         for (j = 0; j < DDIR_RWDIR_CNT; j++) {
1447                 ts->lat_stat[j].min_val = -1UL;
1448                 ts->clat_stat[j].min_val = -1UL;
1449                 ts->slat_stat[j].min_val = -1UL;
1450                 ts->bw_stat[j].min_val = -1UL;
1451         }
1452         ts->groupid = -1;
1453 }
1454
1455 void __show_run_stats(void)
1456 {
1457         struct group_run_stats *runstats, *rs;
1458         struct thread_data *td;
1459         struct thread_stat *threadstats, *ts;
1460         int i, j, k, nr_ts, last_ts, idx;
1461         int kb_base_warned = 0;
1462         int unit_base_warned = 0;
1463         struct json_object *root = NULL;
1464         struct json_array *array = NULL;
1465         struct buf_output output[FIO_OUTPUT_NR];
1466         struct flist_head **opt_lists;
1467
1468         runstats = malloc(sizeof(struct group_run_stats) * (groupid + 1));
1469
1470         for (i = 0; i < groupid + 1; i++)
1471                 init_group_run_stat(&runstats[i]);
1472
1473         /*
1474          * find out how many threads stats we need. if group reporting isn't
1475          * enabled, it's one-per-td.
1476          */
1477         nr_ts = 0;
1478         last_ts = -1;
1479         for_each_td(td, i) {
1480                 if (!td->o.group_reporting) {
1481                         nr_ts++;
1482                         continue;
1483                 }
1484                 if (last_ts == td->groupid)
1485                         continue;
1486
1487                 last_ts = td->groupid;
1488                 nr_ts++;
1489         }
1490
1491         threadstats = malloc(nr_ts * sizeof(struct thread_stat));
1492         opt_lists = malloc(nr_ts * sizeof(struct flist_head *));
1493
1494         for (i = 0; i < nr_ts; i++) {
1495                 init_thread_stat(&threadstats[i]);
1496                 opt_lists[i] = NULL;
1497         }
1498
1499         j = 0;
1500         last_ts = -1;
1501         idx = 0;
1502         for_each_td(td, i) {
1503                 if (idx && (!td->o.group_reporting ||
1504                     (td->o.group_reporting && last_ts != td->groupid))) {
1505                         idx = 0;
1506                         j++;
1507                 }
1508
1509                 last_ts = td->groupid;
1510
1511                 ts = &threadstats[j];
1512
1513                 ts->clat_percentiles = td->o.clat_percentiles;
1514                 ts->percentile_precision = td->o.percentile_precision;
1515                 memcpy(ts->percentile_list, td->o.percentile_list, sizeof(td->o.percentile_list));
1516                 opt_lists[j] = &td->opt_list;
1517
1518                 idx++;
1519                 ts->members++;
1520
1521                 if (ts->groupid == -1) {
1522                         /*
1523                          * These are per-group shared already
1524                          */
1525                         strncpy(ts->name, td->o.name, FIO_JOBNAME_SIZE - 1);
1526                         if (td->o.description)
1527                                 strncpy(ts->description, td->o.description,
1528                                                 FIO_JOBDESC_SIZE - 1);
1529                         else
1530                                 memset(ts->description, 0, FIO_JOBDESC_SIZE);
1531
1532                         /*
1533                          * If multiple entries in this group, this is
1534                          * the first member.
1535                          */
1536                         ts->thread_number = td->thread_number;
1537                         ts->groupid = td->groupid;
1538
1539                         /*
1540                          * first pid in group, not very useful...
1541                          */
1542                         ts->pid = td->pid;
1543
1544                         ts->kb_base = td->o.kb_base;
1545                         ts->unit_base = td->o.unit_base;
1546                         ts->unified_rw_rep = td->o.unified_rw_rep;
1547                 } else if (ts->kb_base != td->o.kb_base && !kb_base_warned) {
1548                         log_info("fio: kb_base differs for jobs in group, using"
1549                                  " %u as the base\n", ts->kb_base);
1550                         kb_base_warned = 1;
1551                 } else if (ts->unit_base != td->o.unit_base && !unit_base_warned) {
1552                         log_info("fio: unit_base differs for jobs in group, using"
1553                                  " %u as the base\n", ts->unit_base);
1554                         unit_base_warned = 1;
1555                 }
1556
1557                 ts->continue_on_error = td->o.continue_on_error;
1558                 ts->total_err_count += td->total_err_count;
1559                 ts->first_error = td->first_error;
1560                 if (!ts->error) {
1561                         if (!td->error && td->o.continue_on_error &&
1562                             td->first_error) {
1563                                 ts->error = td->first_error;
1564                                 ts->verror[sizeof(ts->verror) - 1] = '\0';
1565                                 strncpy(ts->verror, td->verror, sizeof(ts->verror) - 1);
1566                         } else  if (td->error) {
1567                                 ts->error = td->error;
1568                                 ts->verror[sizeof(ts->verror) - 1] = '\0';
1569                                 strncpy(ts->verror, td->verror, sizeof(ts->verror) - 1);
1570                         }
1571                 }
1572
1573                 ts->latency_depth = td->latency_qd;
1574                 ts->latency_target = td->o.latency_target;
1575                 ts->latency_percentile = td->o.latency_percentile;
1576                 ts->latency_window = td->o.latency_window;
1577
1578                 ts->nr_block_infos = td->ts.nr_block_infos;
1579                 for (k = 0; k < ts->nr_block_infos; k++)
1580                         ts->block_infos[k] = td->ts.block_infos[k];
1581
1582                 sum_thread_stats(ts, &td->ts, idx == 1);
1583         }
1584
1585         for (i = 0; i < nr_ts; i++) {
1586                 unsigned long long bw;
1587
1588                 ts = &threadstats[i];
1589                 if (ts->groupid == -1)
1590                         continue;
1591                 rs = &runstats[ts->groupid];
1592                 rs->kb_base = ts->kb_base;
1593                 rs->unit_base = ts->unit_base;
1594                 rs->unified_rw_rep += ts->unified_rw_rep;
1595
1596                 for (j = 0; j < DDIR_RWDIR_CNT; j++) {
1597                         if (!ts->runtime[j])
1598                                 continue;
1599                         if (ts->runtime[j] < rs->min_run[j] || !rs->min_run[j])
1600                                 rs->min_run[j] = ts->runtime[j];
1601                         if (ts->runtime[j] > rs->max_run[j])
1602                                 rs->max_run[j] = ts->runtime[j];
1603
1604                         bw = 0;
1605                         if (ts->runtime[j]) {
1606                                 unsigned long runt = ts->runtime[j];
1607                                 unsigned long long kb;
1608
1609                                 kb = ts->io_bytes[j] / rs->kb_base;
1610                                 bw = kb * 1000 / runt;
1611                         }
1612                         if (bw < rs->min_bw[j])
1613                                 rs->min_bw[j] = bw;
1614                         if (bw > rs->max_bw[j])
1615                                 rs->max_bw[j] = bw;
1616
1617                         rs->io_kb[j] += ts->io_bytes[j] / rs->kb_base;
1618                 }
1619         }
1620
1621         for (i = 0; i < groupid + 1; i++) {
1622                 int ddir;
1623
1624                 rs = &runstats[i];
1625
1626                 for (ddir = 0; ddir < DDIR_RWDIR_CNT; ddir++) {
1627                         if (rs->max_run[ddir])
1628                                 rs->agg[ddir] = (rs->io_kb[ddir] * 1000) /
1629                                                 rs->max_run[ddir];
1630                 }
1631         }
1632
1633         for (i = 0; i < FIO_OUTPUT_NR; i++)
1634                 buf_output_init(&output[i]);
1635
1636         /*
1637          * don't overwrite last signal output
1638          */
1639         if (output_format & FIO_OUTPUT_NORMAL)
1640                 log_buf(&output[__FIO_OUTPUT_NORMAL], "\n");
1641         if (output_format & FIO_OUTPUT_JSON) {
1642                 struct thread_data *global;
1643                 char time_buf[32];
1644                 struct timeval now;
1645                 unsigned long long ms_since_epoch;
1646
1647                 gettimeofday(&now, NULL);
1648                 ms_since_epoch = (unsigned long long)(now.tv_sec) * 1000 +
1649                                  (unsigned long long)(now.tv_usec) / 1000;
1650
1651                 os_ctime_r((const time_t *) &now.tv_sec, time_buf,
1652                                 sizeof(time_buf));
1653                 time_buf[strlen(time_buf) - 1] = '\0';
1654
1655                 root = json_create_object();
1656                 json_object_add_value_string(root, "fio version", fio_version_string);
1657                 json_object_add_value_int(root, "timestamp", now.tv_sec);
1658                 json_object_add_value_int(root, "timestamp_ms", ms_since_epoch);
1659                 json_object_add_value_string(root, "time", time_buf);
1660                 global = get_global_options();
1661                 json_add_job_opts(root, "global options", &global->opt_list, false);
1662                 array = json_create_array();
1663                 json_object_add_value_array(root, "jobs", array);
1664         }
1665
1666         if (is_backend)
1667                 fio_server_send_job_options(&get_global_options()->opt_list, -1U);
1668
1669         for (i = 0; i < nr_ts; i++) {
1670                 ts = &threadstats[i];
1671                 rs = &runstats[ts->groupid];
1672
1673                 if (is_backend) {
1674                         fio_server_send_job_options(opt_lists[i], i);
1675                         fio_server_send_ts(ts, rs);
1676                 } else {
1677                         if (output_format & FIO_OUTPUT_TERSE)
1678                                 show_thread_status_terse(ts, rs, &output[__FIO_OUTPUT_TERSE]);
1679                         if (output_format & FIO_OUTPUT_JSON) {
1680                                 struct json_object *tmp = show_thread_status_json(ts, rs, opt_lists[i]);
1681                                 json_array_add_value_object(array, tmp);
1682                         }
1683                         if (output_format & FIO_OUTPUT_NORMAL)
1684                                 show_thread_status_normal(ts, rs, &output[__FIO_OUTPUT_NORMAL]);
1685                 }
1686         }
1687         if (!is_backend && (output_format & FIO_OUTPUT_JSON)) {
1688                 /* disk util stats, if any */
1689                 show_disk_util(1, root, &output[__FIO_OUTPUT_JSON]);
1690
1691                 show_idle_prof_stats(FIO_OUTPUT_JSON, root, &output[__FIO_OUTPUT_JSON]);
1692
1693                 json_print_object(root, &output[__FIO_OUTPUT_JSON]);
1694                 log_buf(&output[__FIO_OUTPUT_JSON], "\n");
1695                 json_free_object(root);
1696         }
1697
1698         for (i = 0; i < groupid + 1; i++) {
1699                 rs = &runstats[i];
1700
1701                 rs->groupid = i;
1702                 if (is_backend)
1703                         fio_server_send_gs(rs);
1704                 else if (output_format & FIO_OUTPUT_NORMAL)
1705                         show_group_stats(rs, &output[__FIO_OUTPUT_NORMAL]);
1706         }
1707
1708         if (is_backend)
1709                 fio_server_send_du();
1710         else if (output_format & FIO_OUTPUT_NORMAL) {
1711                 show_disk_util(0, NULL, &output[__FIO_OUTPUT_NORMAL]);
1712                 show_idle_prof_stats(FIO_OUTPUT_NORMAL, NULL, &output[__FIO_OUTPUT_NORMAL]);
1713         }
1714
1715         for (i = 0; i < FIO_OUTPUT_NR; i++) {
1716                 buf_output_flush(&output[i]);
1717                 buf_output_free(&output[i]);
1718         }
1719
1720         log_info_flush();
1721         free(runstats);
1722         free(threadstats);
1723         free(opt_lists);
1724 }
1725
1726 void show_run_stats(void)
1727 {
1728         fio_mutex_down(stat_mutex);
1729         __show_run_stats();
1730         fio_mutex_up(stat_mutex);
1731 }
1732
1733 void __show_running_run_stats(void)
1734 {
1735         struct thread_data *td;
1736         unsigned long long *rt;
1737         struct timeval tv;
1738         int i;
1739
1740         fio_mutex_down(stat_mutex);
1741
1742         rt = malloc(thread_number * sizeof(unsigned long long));
1743         fio_gettime(&tv, NULL);
1744
1745         for_each_td(td, i) {
1746                 td->update_rusage = 1;
1747                 td->ts.io_bytes[DDIR_READ] = td->io_bytes[DDIR_READ];
1748                 td->ts.io_bytes[DDIR_WRITE] = td->io_bytes[DDIR_WRITE];
1749                 td->ts.io_bytes[DDIR_TRIM] = td->io_bytes[DDIR_TRIM];
1750                 td->ts.total_run_time = mtime_since(&td->epoch, &tv);
1751
1752                 rt[i] = mtime_since(&td->start, &tv);
1753                 if (td_read(td) && td->ts.io_bytes[DDIR_READ])
1754                         td->ts.runtime[DDIR_READ] += rt[i];
1755                 if (td_write(td) && td->ts.io_bytes[DDIR_WRITE])
1756                         td->ts.runtime[DDIR_WRITE] += rt[i];
1757                 if (td_trim(td) && td->ts.io_bytes[DDIR_TRIM])
1758                         td->ts.runtime[DDIR_TRIM] += rt[i];
1759         }
1760
1761         for_each_td(td, i) {
1762                 if (td->runstate >= TD_EXITED)
1763                         continue;
1764                 if (td->rusage_sem) {
1765                         td->update_rusage = 1;
1766                         fio_mutex_down(td->rusage_sem);
1767                 }
1768                 td->update_rusage = 0;
1769         }
1770
1771         __show_run_stats();
1772
1773         for_each_td(td, i) {
1774                 if (td_read(td) && td->ts.io_bytes[DDIR_READ])
1775                         td->ts.runtime[DDIR_READ] -= rt[i];
1776                 if (td_write(td) && td->ts.io_bytes[DDIR_WRITE])
1777                         td->ts.runtime[DDIR_WRITE] -= rt[i];
1778                 if (td_trim(td) && td->ts.io_bytes[DDIR_TRIM])
1779                         td->ts.runtime[DDIR_TRIM] -= rt[i];
1780         }
1781
1782         free(rt);
1783         fio_mutex_up(stat_mutex);
1784 }
1785
1786 static int status_interval_init;
1787 static struct timeval status_time;
1788 static int status_file_disabled;
1789
1790 #define FIO_STATUS_FILE         "fio-dump-status"
1791
1792 static int check_status_file(void)
1793 {
1794         struct stat sb;
1795         const char *temp_dir;
1796         char fio_status_file_path[PATH_MAX];
1797
1798         if (status_file_disabled)
1799                 return 0;
1800
1801         temp_dir = getenv("TMPDIR");
1802         if (temp_dir == NULL) {
1803                 temp_dir = getenv("TEMP");
1804                 if (temp_dir && strlen(temp_dir) >= PATH_MAX)
1805                         temp_dir = NULL;
1806         }
1807         if (temp_dir == NULL)
1808                 temp_dir = "/tmp";
1809
1810         snprintf(fio_status_file_path, sizeof(fio_status_file_path), "%s/%s", temp_dir, FIO_STATUS_FILE);
1811
1812         if (stat(fio_status_file_path, &sb))
1813                 return 0;
1814
1815         if (unlink(fio_status_file_path) < 0) {
1816                 log_err("fio: failed to unlink %s: %s\n", fio_status_file_path,
1817                                                         strerror(errno));
1818                 log_err("fio: disabling status file updates\n");
1819                 status_file_disabled = 1;
1820         }
1821
1822         return 1;
1823 }
1824
1825 void check_for_running_stats(void)
1826 {
1827         if (status_interval) {
1828                 if (!status_interval_init) {
1829                         fio_gettime(&status_time, NULL);
1830                         status_interval_init = 1;
1831                 } else if (mtime_since_now(&status_time) >= status_interval) {
1832                         show_running_run_stats();
1833                         fio_gettime(&status_time, NULL);
1834                         return;
1835                 }
1836         }
1837         if (check_status_file()) {
1838                 show_running_run_stats();
1839                 return;
1840         }
1841 }
1842
1843 static inline void add_stat_sample(struct io_stat *is, unsigned long data)
1844 {
1845         double val = data;
1846         double delta;
1847
1848         if (data > is->max_val)
1849                 is->max_val = data;
1850         if (data < is->min_val)
1851                 is->min_val = data;
1852
1853         delta = val - is->mean.u.f;
1854         if (delta) {
1855                 is->mean.u.f += delta / (is->samples + 1.0);
1856                 is->S.u.f += delta * (val - is->mean.u.f);
1857         }
1858
1859         is->samples++;
1860 }
1861
1862 /*
1863  * Return a struct io_logs, which is added to the tail of the log
1864  * list for 'iolog'.
1865  */
1866 static struct io_logs *get_new_log(struct io_log *iolog)
1867 {
1868         size_t new_size, new_samples;
1869         struct io_logs *cur_log;
1870
1871         /*
1872          * Cap the size at MAX_LOG_ENTRIES, so we don't keep doubling
1873          * forever
1874          */
1875         if (!iolog->cur_log_max)
1876                 new_samples = DEF_LOG_ENTRIES;
1877         else {
1878                 new_samples = iolog->cur_log_max * 2;
1879                 if (new_samples > MAX_LOG_ENTRIES)
1880                         new_samples = MAX_LOG_ENTRIES;
1881         }
1882
1883         new_size = new_samples * log_entry_sz(iolog);
1884
1885         cur_log = smalloc(sizeof(*cur_log));
1886         if (cur_log) {
1887                 INIT_FLIST_HEAD(&cur_log->list);
1888                 cur_log->log = malloc(new_size);
1889                 if (cur_log->log) {
1890                         cur_log->nr_samples = 0;
1891                         cur_log->max_samples = new_samples;
1892                         flist_add_tail(&cur_log->list, &iolog->io_logs);
1893                         iolog->cur_log_max = new_samples;
1894                         return cur_log;
1895                 }
1896                 sfree(cur_log);
1897         }
1898
1899         return NULL;
1900 }
1901
1902 /*
1903  * Add and return a new log chunk, or return current log if big enough
1904  */
1905 static struct io_logs *regrow_log(struct io_log *iolog)
1906 {
1907         struct io_logs *cur_log;
1908         int i;
1909
1910         if (!iolog || iolog->disabled)
1911                 goto disable;
1912
1913         cur_log = iolog_cur_log(iolog);
1914         if (!cur_log) {
1915                 cur_log = get_new_log(iolog);
1916                 if (!cur_log)
1917                         return NULL;
1918         }
1919
1920         if (cur_log->nr_samples < cur_log->max_samples)
1921                 return cur_log;
1922
1923         /*
1924          * No room for a new sample. If we're compressing on the fly, flush
1925          * out the current chunk
1926          */
1927         if (iolog->log_gz) {
1928                 if (iolog_cur_flush(iolog, cur_log)) {
1929                         log_err("fio: failed flushing iolog! Will stop logging.\n");
1930                         return NULL;
1931                 }
1932         }
1933
1934         /*
1935          * Get a new log array, and add to our list
1936          */
1937         cur_log = get_new_log(iolog);
1938         if (!cur_log) {
1939                 log_err("fio: failed extending iolog! Will stop logging.\n");
1940                 return NULL;
1941         }
1942
1943         if (!iolog->pending || !iolog->pending->nr_samples)
1944                 return cur_log;
1945
1946         /*
1947          * Flush pending items to new log
1948          */
1949         for (i = 0; i < iolog->pending->nr_samples; i++) {
1950                 struct io_sample *src, *dst;
1951
1952                 src = get_sample(iolog, iolog->pending, i);
1953                 dst = get_sample(iolog, cur_log, i);
1954                 memcpy(dst, src, log_entry_sz(iolog));
1955         }
1956         cur_log->nr_samples = iolog->pending->nr_samples;
1957
1958         iolog->pending->nr_samples = 0;
1959         return cur_log;
1960 disable:
1961         if (iolog)
1962                 iolog->disabled = true;
1963         return NULL;
1964 }
1965
1966 void regrow_logs(struct thread_data *td)
1967 {
1968         regrow_log(td->slat_log);
1969         regrow_log(td->clat_log);
1970         regrow_log(td->clat_hist_log);
1971         regrow_log(td->lat_log);
1972         regrow_log(td->bw_log);
1973         regrow_log(td->iops_log);
1974         td->flags &= ~TD_F_REGROW_LOGS;
1975 }
1976
1977 static struct io_logs *get_cur_log(struct io_log *iolog)
1978 {
1979         struct io_logs *cur_log;
1980
1981         cur_log = iolog_cur_log(iolog);
1982         if (!cur_log) {
1983                 cur_log = get_new_log(iolog);
1984                 if (!cur_log)
1985                         return NULL;
1986         }
1987
1988         if (cur_log->nr_samples < cur_log->max_samples)
1989                 return cur_log;
1990
1991         /*
1992          * Out of space. If we're in IO offload mode, or we're not doing
1993          * per unit logging (hence logging happens outside of the IO thread
1994          * as well), add a new log chunk inline. If we're doing inline
1995          * submissions, flag 'td' as needing a log regrow and we'll take
1996          * care of it on the submission side.
1997          */
1998         if (iolog->td->o.io_submit_mode == IO_MODE_OFFLOAD ||
1999             !per_unit_log(iolog))
2000                 return regrow_log(iolog);
2001
2002         iolog->td->flags |= TD_F_REGROW_LOGS;
2003         assert(iolog->pending->nr_samples < iolog->pending->max_samples);
2004         return iolog->pending;
2005 }
2006
2007 static void __add_log_sample(struct io_log *iolog, unsigned long val,
2008                              enum fio_ddir ddir, unsigned int bs,
2009                              unsigned long t, uint64_t offset)
2010 {
2011         struct io_logs *cur_log;
2012
2013         if (iolog->disabled)
2014                 return;
2015         if (flist_empty(&iolog->io_logs))
2016                 iolog->avg_last = t;
2017
2018         cur_log = get_cur_log(iolog);
2019         if (cur_log) {
2020                 struct io_sample *s;
2021
2022                 s = get_sample(iolog, cur_log, cur_log->nr_samples);
2023
2024                 s->val = val;
2025                 s->time = t + iolog->td->unix_epoch;
2026                 io_sample_set_ddir(iolog, s, ddir);
2027                 s->bs = bs;
2028
2029                 if (iolog->log_offset) {
2030                         struct io_sample_offset *so = (void *) s;
2031
2032                         so->offset = offset;
2033                 }
2034
2035                 cur_log->nr_samples++;
2036                 return;
2037         }
2038
2039         iolog->disabled = true;
2040 }
2041
2042 static inline void reset_io_stat(struct io_stat *ios)
2043 {
2044         ios->max_val = ios->min_val = ios->samples = 0;
2045         ios->mean.u.f = ios->S.u.f = 0;
2046 }
2047
2048 void reset_io_stats(struct thread_data *td)
2049 {
2050         struct thread_stat *ts = &td->ts;
2051         int i, j;
2052
2053         for (i = 0; i < DDIR_RWDIR_CNT; i++) {
2054                 reset_io_stat(&ts->clat_stat[i]);
2055                 reset_io_stat(&ts->slat_stat[i]);
2056                 reset_io_stat(&ts->lat_stat[i]);
2057                 reset_io_stat(&ts->bw_stat[i]);
2058                 reset_io_stat(&ts->iops_stat[i]);
2059
2060                 ts->io_bytes[i] = 0;
2061                 ts->runtime[i] = 0;
2062
2063                 for (j = 0; j < FIO_IO_U_PLAT_NR; j++)
2064                         ts->io_u_plat[i][j] = 0;
2065         }
2066
2067         for (i = 0; i < FIO_IO_U_MAP_NR; i++) {
2068                 ts->io_u_map[i] = 0;
2069                 ts->io_u_submit[i] = 0;
2070                 ts->io_u_complete[i] = 0;
2071                 ts->io_u_lat_u[i] = 0;
2072                 ts->io_u_lat_m[i] = 0;
2073                 ts->total_submit = 0;
2074                 ts->total_complete = 0;
2075         }
2076
2077         for (i = 0; i < 3; i++) {
2078                 ts->total_io_u[i] = 0;
2079                 ts->short_io_u[i] = 0;
2080                 ts->drop_io_u[i] = 0;
2081         }
2082 }
2083
2084 static void __add_stat_to_log(struct io_log *iolog, enum fio_ddir ddir,
2085                               unsigned long elapsed, bool log_max)
2086 {
2087         /*
2088          * Note an entry in the log. Use the mean from the logged samples,
2089          * making sure to properly round up. Only write a log entry if we
2090          * had actual samples done.
2091          */
2092         if (iolog->avg_window[ddir].samples) {
2093                 unsigned long val;
2094
2095                 if (log_max)
2096                         val = iolog->avg_window[ddir].max_val;
2097                 else
2098                         val = iolog->avg_window[ddir].mean.u.f + 0.50;
2099
2100                 __add_log_sample(iolog, val, ddir, 0, elapsed, 0);
2101         }
2102
2103         reset_io_stat(&iolog->avg_window[ddir]);
2104 }
2105
2106 static void _add_stat_to_log(struct io_log *iolog, unsigned long elapsed,
2107                              bool log_max)
2108 {
2109         int ddir;
2110
2111         for (ddir = 0; ddir < DDIR_RWDIR_CNT; ddir++)
2112                 __add_stat_to_log(iolog, ddir, elapsed, log_max);
2113 }
2114
2115 static long add_log_sample(struct thread_data *td, struct io_log *iolog,
2116                            unsigned long val, enum fio_ddir ddir,
2117                            unsigned int bs, uint64_t offset)
2118 {
2119         unsigned long elapsed, this_window;
2120
2121         if (!ddir_rw(ddir))
2122                 return 0;
2123
2124         elapsed = mtime_since_now(&td->epoch);
2125
2126         /*
2127          * If no time averaging, just add the log sample.
2128          */
2129         if (!iolog->avg_msec) {
2130                 __add_log_sample(iolog, val, ddir, bs, elapsed, offset);
2131                 return 0;
2132         }
2133
2134         /*
2135          * Add the sample. If the time period has passed, then
2136          * add that entry to the log and clear.
2137          */
2138         add_stat_sample(&iolog->avg_window[ddir], val);
2139
2140         /*
2141          * If period hasn't passed, adding the above sample is all we
2142          * need to do.
2143          */
2144         this_window = elapsed - iolog->avg_last;
2145         if (elapsed < iolog->avg_last)
2146                 return iolog->avg_last - elapsed;
2147         else if (this_window < iolog->avg_msec) {
2148                 int diff = iolog->avg_msec - this_window;
2149
2150                 if (inline_log(iolog) || diff > LOG_MSEC_SLACK)
2151                         return diff;
2152         }
2153
2154         _add_stat_to_log(iolog, elapsed, td->o.log_max != 0);
2155
2156         iolog->avg_last = elapsed - (this_window - iolog->avg_msec);
2157         return iolog->avg_msec;
2158 }
2159
2160 void finalize_logs(struct thread_data *td, bool unit_logs)
2161 {
2162         unsigned long elapsed;
2163
2164         elapsed = mtime_since_now(&td->epoch);
2165
2166         if (td->clat_log && unit_logs)
2167                 _add_stat_to_log(td->clat_log, elapsed, td->o.log_max != 0);
2168         if (td->slat_log && unit_logs)
2169                 _add_stat_to_log(td->slat_log, elapsed, td->o.log_max != 0);
2170         if (td->lat_log && unit_logs)
2171                 _add_stat_to_log(td->lat_log, elapsed, td->o.log_max != 0);
2172         if (td->bw_log && (unit_logs == per_unit_log(td->bw_log)))
2173                 _add_stat_to_log(td->bw_log, elapsed, td->o.log_max != 0);
2174         if (td->iops_log && (unit_logs == per_unit_log(td->iops_log)))
2175                 _add_stat_to_log(td->iops_log, elapsed, td->o.log_max != 0);
2176 }
2177
2178 void add_agg_sample(unsigned long val, enum fio_ddir ddir, unsigned int bs)
2179 {
2180         struct io_log *iolog;
2181
2182         if (!ddir_rw(ddir))
2183                 return;
2184
2185         iolog = agg_io_log[ddir];
2186         __add_log_sample(iolog, val, ddir, bs, mtime_since_genesis(), 0);
2187 }
2188
2189 static void add_clat_percentile_sample(struct thread_stat *ts,
2190                                 unsigned long usec, enum fio_ddir ddir)
2191 {
2192         unsigned int idx = plat_val_to_idx(usec);
2193         assert(idx < FIO_IO_U_PLAT_NR);
2194
2195         ts->io_u_plat[ddir][idx]++;
2196 }
2197
2198 void add_clat_sample(struct thread_data *td, enum fio_ddir ddir,
2199                      unsigned long usec, unsigned int bs, uint64_t offset)
2200 {
2201         unsigned long elapsed, this_window;
2202         struct thread_stat *ts = &td->ts;
2203         struct io_log *iolog = td->clat_hist_log;
2204
2205         td_io_u_lock(td);
2206
2207         add_stat_sample(&ts->clat_stat[ddir], usec);
2208
2209         if (td->clat_log)
2210                 add_log_sample(td, td->clat_log, usec, ddir, bs, offset);
2211
2212         if (ts->clat_percentiles)
2213                 add_clat_percentile_sample(ts, usec, ddir);
2214
2215         if (iolog && iolog->hist_msec) {
2216                 struct io_hist *hw = &iolog->hist_window[ddir];
2217
2218                 hw->samples++;
2219                 elapsed = mtime_since_now(&td->epoch);
2220                 if (!hw->hist_last)
2221                         hw->hist_last = elapsed;
2222                 this_window = elapsed - hw->hist_last;
2223                 
2224                 if (this_window >= iolog->hist_msec) {
2225                         unsigned int *io_u_plat;
2226                         struct io_u_plat_entry *dst;
2227
2228                         /*
2229                          * Make a byte-for-byte copy of the latency histogram
2230                          * stored in td->ts.io_u_plat[ddir], recording it in a
2231                          * log sample. Note that the matching call to free() is
2232                          * located in iolog.c after printing this sample to the
2233                          * log file.
2234                          */
2235                         io_u_plat = (unsigned int *) td->ts.io_u_plat[ddir];
2236                         dst = malloc(sizeof(struct io_u_plat_entry));
2237                         memcpy(&(dst->io_u_plat), io_u_plat,
2238                                 FIO_IO_U_PLAT_NR * sizeof(unsigned int));
2239                         flist_add(&dst->list, &hw->list);
2240                         __add_log_sample(iolog, (unsigned long)dst, ddir, bs,
2241                                                 elapsed, offset);
2242
2243                         /*
2244                          * Update the last time we recorded as being now, minus
2245                          * any drift in time we encountered before actually
2246                          * making the record.
2247                          */
2248                         hw->hist_last = elapsed - (this_window - iolog->hist_msec);
2249                         hw->samples = 0;
2250                 }
2251         }
2252
2253         td_io_u_unlock(td);
2254 }
2255
2256 void add_slat_sample(struct thread_data *td, enum fio_ddir ddir,
2257                      unsigned long usec, unsigned int bs, uint64_t offset)
2258 {
2259         struct thread_stat *ts = &td->ts;
2260
2261         if (!ddir_rw(ddir))
2262                 return;
2263
2264         td_io_u_lock(td);
2265
2266         add_stat_sample(&ts->slat_stat[ddir], usec);
2267
2268         if (td->slat_log)
2269                 add_log_sample(td, td->slat_log, usec, ddir, bs, offset);
2270
2271         td_io_u_unlock(td);
2272 }
2273
2274 void add_lat_sample(struct thread_data *td, enum fio_ddir ddir,
2275                     unsigned long usec, unsigned int bs, uint64_t offset)
2276 {
2277         struct thread_stat *ts = &td->ts;
2278
2279         if (!ddir_rw(ddir))
2280                 return;
2281
2282         td_io_u_lock(td);
2283
2284         add_stat_sample(&ts->lat_stat[ddir], usec);
2285
2286         if (td->lat_log)
2287                 add_log_sample(td, td->lat_log, usec, ddir, bs, offset);
2288
2289         td_io_u_unlock(td);
2290 }
2291
2292 void add_bw_sample(struct thread_data *td, struct io_u *io_u,
2293                    unsigned int bytes, unsigned long spent)
2294 {
2295         struct thread_stat *ts = &td->ts;
2296         unsigned long rate;
2297
2298         if (spent)
2299                 rate = bytes * 1000 / spent;
2300         else
2301                 rate = 0;
2302
2303         td_io_u_lock(td);
2304
2305         add_stat_sample(&ts->bw_stat[io_u->ddir], rate);
2306
2307         if (td->bw_log)
2308                 add_log_sample(td, td->bw_log, rate, io_u->ddir, bytes, io_u->offset);
2309
2310         td->stat_io_bytes[io_u->ddir] = td->this_io_bytes[io_u->ddir];
2311         td_io_u_unlock(td);
2312 }
2313
2314 static int add_bw_samples(struct thread_data *td, struct timeval *t)
2315 {
2316         struct thread_stat *ts = &td->ts;
2317         unsigned long spent, rate;
2318         enum fio_ddir ddir;
2319         unsigned int next, next_log;
2320
2321         next_log = td->o.bw_avg_time;
2322
2323         spent = mtime_since(&td->bw_sample_time, t);
2324         if (spent < td->o.bw_avg_time &&
2325             td->o.bw_avg_time - spent >= LOG_MSEC_SLACK)
2326                 return td->o.bw_avg_time - spent;
2327
2328         td_io_u_lock(td);
2329
2330         /*
2331          * Compute both read and write rates for the interval.
2332          */
2333         for (ddir = DDIR_READ; ddir < DDIR_RWDIR_CNT; ddir++) {
2334                 uint64_t delta;
2335
2336                 delta = td->this_io_bytes[ddir] - td->stat_io_bytes[ddir];
2337                 if (!delta)
2338                         continue; /* No entries for interval */
2339
2340                 if (spent)
2341                         rate = delta * 1000 / spent / 1024;
2342                 else
2343                         rate = 0;
2344
2345                 add_stat_sample(&ts->bw_stat[ddir], rate);
2346
2347                 if (td->bw_log) {
2348                         unsigned int bs = 0;
2349
2350                         if (td->o.min_bs[ddir] == td->o.max_bs[ddir])
2351                                 bs = td->o.min_bs[ddir];
2352
2353                         next = add_log_sample(td, td->bw_log, rate, ddir, bs, 0);
2354                         next_log = min(next_log, next);
2355                 }
2356
2357                 td->stat_io_bytes[ddir] = td->this_io_bytes[ddir];
2358         }
2359
2360         timeval_add_msec(&td->bw_sample_time, td->o.bw_avg_time);
2361
2362         td_io_u_unlock(td);
2363
2364         if (spent <= td->o.bw_avg_time)
2365                 return min(next_log, td->o.bw_avg_time);
2366
2367         next = td->o.bw_avg_time - (1 + spent - td->o.bw_avg_time);
2368         return min(next, next_log);
2369 }
2370
2371 void add_iops_sample(struct thread_data *td, struct io_u *io_u,
2372                      unsigned int bytes)
2373 {
2374         struct thread_stat *ts = &td->ts;
2375
2376         td_io_u_lock(td);
2377
2378         add_stat_sample(&ts->iops_stat[io_u->ddir], 1);
2379
2380         if (td->iops_log)
2381                 add_log_sample(td, td->iops_log, 1, io_u->ddir, bytes, io_u->offset);
2382
2383         td->stat_io_blocks[io_u->ddir] = td->this_io_blocks[io_u->ddir];
2384         td_io_u_unlock(td);
2385 }
2386
2387 static int add_iops_samples(struct thread_data *td, struct timeval *t)
2388 {
2389         struct thread_stat *ts = &td->ts;
2390         unsigned long spent, iops;
2391         enum fio_ddir ddir;
2392         unsigned int next, next_log;
2393
2394         next_log = td->o.iops_avg_time;
2395
2396         spent = mtime_since(&td->iops_sample_time, t);
2397         if (spent < td->o.iops_avg_time &&
2398             td->o.iops_avg_time - spent >= LOG_MSEC_SLACK)
2399                 return td->o.iops_avg_time - spent;
2400
2401         td_io_u_lock(td);
2402
2403         /*
2404          * Compute both read and write rates for the interval.
2405          */
2406         for (ddir = DDIR_READ; ddir < DDIR_RWDIR_CNT; ddir++) {
2407                 uint64_t delta;
2408
2409                 delta = td->this_io_blocks[ddir] - td->stat_io_blocks[ddir];
2410                 if (!delta)
2411                         continue; /* No entries for interval */
2412
2413                 if (spent)
2414                         iops = (delta * 1000) / spent;
2415                 else
2416                         iops = 0;
2417
2418                 add_stat_sample(&ts->iops_stat[ddir], iops);
2419
2420                 if (td->iops_log) {
2421                         unsigned int bs = 0;
2422
2423                         if (td->o.min_bs[ddir] == td->o.max_bs[ddir])
2424                                 bs = td->o.min_bs[ddir];
2425
2426                         next = add_log_sample(td, td->iops_log, iops, ddir, bs, 0);
2427                         next_log = min(next_log, next);
2428                 }
2429
2430                 td->stat_io_blocks[ddir] = td->this_io_blocks[ddir];
2431         }
2432
2433         timeval_add_msec(&td->iops_sample_time, td->o.iops_avg_time);
2434
2435         td_io_u_unlock(td);
2436
2437         if (spent <= td->o.iops_avg_time)
2438                 return min(next_log, td->o.iops_avg_time);
2439
2440         next = td->o.iops_avg_time - (1 + spent - td->o.iops_avg_time);
2441         return min(next, next_log);
2442 }
2443
2444 /*
2445  * Returns msecs to next event
2446  */
2447 int calc_log_samples(void)
2448 {
2449         struct thread_data *td;
2450         unsigned int next = ~0U, tmp;
2451         struct timeval now;
2452         int i;
2453
2454         fio_gettime(&now, NULL);
2455
2456         for_each_td(td, i) {
2457                 if (in_ramp_time(td) ||
2458                     !(td->runstate == TD_RUNNING || td->runstate == TD_VERIFYING)) {
2459                         next = min(td->o.iops_avg_time, td->o.bw_avg_time);
2460                         continue;
2461                 }
2462                 if (td->bw_log && !per_unit_log(td->bw_log)) {
2463                         tmp = add_bw_samples(td, &now);
2464                         if (tmp < next)
2465                                 next = tmp;
2466                 }
2467                 if (td->iops_log && !per_unit_log(td->iops_log)) {
2468                         tmp = add_iops_samples(td, &now);
2469                         if (tmp < next)
2470                                 next = tmp;
2471                 }
2472         }
2473
2474         return next == ~0U ? 0 : next;
2475 }
2476
2477 void stat_init(void)
2478 {
2479         stat_mutex = fio_mutex_init(FIO_MUTEX_UNLOCKED);
2480 }
2481
2482 void stat_exit(void)
2483 {
2484         /*
2485          * When we have the mutex, we know out-of-band access to it
2486          * have ended.
2487          */
2488         fio_mutex_down(stat_mutex);
2489         fio_mutex_remove(stat_mutex);
2490 }
2491
2492 /*
2493  * Called from signal handler. Wake up status thread.
2494  */
2495 void show_running_run_stats(void)
2496 {
2497         helper_do_stat();
2498 }
2499
2500 uint32_t *io_u_block_info(struct thread_data *td, struct io_u *io_u)
2501 {
2502         /* Ignore io_u's which span multiple blocks--they will just get
2503          * inaccurate counts. */
2504         int idx = (io_u->offset - io_u->file->file_offset)
2505                         / td->o.bs[DDIR_TRIM];
2506         uint32_t *info = &td->ts.block_infos[idx];
2507         assert(idx < td->ts.nr_block_infos);
2508         return info;
2509 }