1e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat/*
2e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat * blktrace output analysis: generate a timeline & gather statistics
3e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *
4e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat * Copyright (C) 2006 Alan D. Brunelle <Alan.Brunelle@hp.com>
5e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *
6e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  This program is free software; you can redistribute it and/or modify
7e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  it under the terms of the GNU General Public License as published by
8e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  the Free Software Foundation; either version 2 of the License, or
9e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  (at your option) any later version.
10e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *
11e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  This program is distributed in the hope that it will be useful,
12e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  GNU General Public License for more details.
15e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *
16e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  You should have received a copy of the GNU General Public License
17e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  along with this program; if not, write to the Free Software
18e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat *
20e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat */
21e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat#include "globals.h"
22e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
23e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat#define BKT_WIDTH	5
24e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat#define MAX_BKT		19
25e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat#define EXCESS_BKT	20
26e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat#define NBKTS		(EXCESS_BKT + 1)
27e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
28e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehatstruct hist_bkt {
29e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	__u32 dev;
30e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	int hist[NBKTS * sizeof(int)];
31e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat};
32e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
33e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehatvoid *unplug_hist_alloc(__u32 device)
34e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat{
35e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	struct hist_bkt *hbp;
36e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
37e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	if (unplug_hist_name == NULL) return NULL;
38e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
39e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	hbp = malloc(sizeof(*hbp));
40e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	hbp->dev = device;
41e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	memset(hbp->hist, 0, NBKTS * sizeof(int));
42e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
43e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	return hbp;
44e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat}
45e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
46e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehatvoid unplug_hist_add(struct io *u_iop)
47e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat{
48e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	struct d_info *dip;
49e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
50e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	dip = __dip_find(u_iop->t.device);
51e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	if (dip && dip->up_hist_handle) {
52e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		__u64 *val = u_iop->pdu;
53e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		int idx, n_unplugs = be64_to_cpu(*val);
54e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		struct hist_bkt *hbp = dip->up_hist_handle;
55e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
56e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		idx = (n_unplugs / BKT_WIDTH);
57e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		if (idx > EXCESS_BKT)
58e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat			idx = EXCESS_BKT;
59e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
60e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		hbp->hist[idx]++;
61e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	}
62e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat}
63e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
64e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehatvoid unplug_hist_free(void *arg)
65e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat{
66e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	if (arg) {
67e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		FILE *fp;
68e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		struct hist_bkt *hbp = arg;
69e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		int mjr = hbp->dev >> MINORBITS;
70e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		int mnr = hbp->dev & ((1 << MINORBITS) - 1);
71e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		char *oname = malloc(strlen(unplug_hist_name) + 32);
72e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
73e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		sprintf(oname, "%s_%03d,%03d.dat", unplug_hist_name, mjr, mnr);
74e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		if ((fp = my_fopen(oname, "w")) != NULL) {
75e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat			int i;
76e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
77e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat			for (i = 0; i < NBKTS; i++)
78e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat				fprintf(fp, "%d %d\n", i, hbp->hist[i]);
79e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat			fclose(fp);
80e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
81e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		} else
82e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat			perror(oname);
83e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat
84e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		free(oname);
85e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat		free(hbp);
86e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat	}
87e20e1347b9914aa05e30548c15d7cd5e412cc0e2San Mehat}
88