1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
|
/* -*- Mode:C; c-basic-offset:4; tab-width:4 -*-
****************************************************************************
* (C) 2009 - Juergen Gross - Fujitsu Technology Solutions
****************************************************************************
*
* File: xenlockprof.c
* Author: Juergen Gross (juergen.gross@ts.fujitsu.com)
* Date: Oct 2009
*
* Description:
*/
#include <xenctrl.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/mman.h>
#include <errno.h>
#include <string.h>
#include <inttypes.h>
static int lock_pages(void *addr, size_t len)
{
int e = 0;
#ifndef __sun__
e = mlock(addr, len);
#endif
return (e);
}
static void unlock_pages(void *addr, size_t len)
{
#ifndef __sun__
munlock(addr, len);
#endif
}
int main(int argc, char *argv[])
{
xc_interface *xc_handle;
uint32_t i, j, n;
uint64_t time;
double l, b, sl, sb;
char name[60];
xc_lockprof_data_t *data;
if ( (argc > 2) || ((argc == 2) && (strcmp(argv[1], "-r") != 0)) )
{
printf("%s: [-r]\n", argv[0]);
printf("no args: print lock profile data\n");
printf(" -r : reset profile data\n");
return 1;
}
if ( (xc_handle = xc_interface_open(0,0,0)) == 0 )
{
fprintf(stderr, "Error opening xc interface: %d (%s)\n",
errno, strerror(errno));
return 1;
}
if ( argc > 1 )
{
if ( xc_lockprof_reset(xc_handle) != 0 )
{
fprintf(stderr, "Error reseting profile data: %d (%s)\n",
errno, strerror(errno));
return 1;
}
return 0;
}
n = 0;
if ( xc_lockprof_query_number(xc_handle, &n) != 0 )
{
fprintf(stderr, "Error getting number of profile records: %d (%s)\n",
errno, strerror(errno));
return 1;
}
n += 32; /* just to be sure */
data = malloc(sizeof(*data) * n);
if ( (data == NULL) || (lock_pages(data, sizeof(*data) * n) != 0) )
{
fprintf(stderr, "Could not alloc or lock buffers: %d (%s)\n",
errno, strerror(errno));
return 1;
}
i = n;
if ( xc_lockprof_query(xc_handle, &i, &time, data) != 0 )
{
fprintf(stderr, "Error getting profile records: %d (%s)\n",
errno, strerror(errno));
return 1;
}
unlock_pages(data, sizeof(*data) * n);
if ( i > n )
{
printf("data incomplete, %d records are missing!\n\n", i - n);
i = n;
}
sl = 0;
sb = 0;
for ( j = 0; j < i; j++ )
{
switch ( data[j].type )
{
case LOCKPROF_TYPE_GLOBAL:
sprintf(name, "global lock %s", data[j].name);
break;
case LOCKPROF_TYPE_PERDOM:
sprintf(name, "domain %d lock %s", data[j].idx, data[j].name);
break;
default:
sprintf(name, "unknown type(%d) %d lock %s", data[j].type,
data[j].idx, data[j].name);
break;
}
l = (double)(data[j].lock_time) / 1E+09;
b = (double)(data[j].block_time) / 1E+09;
sl += l;
sb += b;
printf("%-50s: lock:%12"PRId64"(%20.9fs), "
"block:%12"PRId64"(%20.9fs)\n",
name, data[j].lock_cnt, l, data[j].block_cnt, b);
}
l = (double)time / 1E+09;
printf("total profiling time: %20.9fs\n", l);
printf("total locked time: %20.9fs\n", sl);
printf("total blocked time: %20.9fs\n", sb);
return 0;
}
|
