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
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
|
// Task time query and utility functions.
// Copyright (C) 2009, 2010 Red Hat Inc.
//
// This file is part of systemtap, and is free software. You can
// redistribute it and/or modify it under the terms of the GNU General
// Public License (GPL); either version 2, or (at your option) any
// later version.
// <tapsetdescription>
// Task time query and utility functions provide information about
// the time resource usage of the current task. These functions provide
// information about the user time and system time of the current
// task. And provide utility functions to turn the reported times
// into miliseconds and create human readable string representations
// of task time used. The reported times are approximates and should
// be used for "coarse grained" measurements only. The reported user
// and system time are only for the current task, not for the process
// as a whole nor of any time spend by children of the current task.
// </tapsetdescription>
%{
#include <asm/cputime.h>
#include <linux/time.h>
%}
/**
* sfunction task_utime - User time of the current task
*
* Description: Returns the user time of the current task in cputime.
* Does not include any time used by other tasks in this process, nor
* does it include any time of the children of this task.
*/
function task_utime:long ()
%{ /* pure */ /* unprivileged */
THIS->__retvalue = current->utime;
%}
/**
* sfunction task_utime - User time of the given task
*
* @tid: Thread id of the given task
*
* Description: Returns the user time of the given task in cputime,
* or zero if the task doesn't exist.
* Does not include any time used by other tasks in this process, nor
* does it include any time of the children of this task.
*/
function task_utime_tid:long(tid:long)
{
task = pid2task(tid);
if (task != 0)
return @cast(task, "task_struct", "kernel<linux/sched.h>")->utime;
else
return 0;
}
/**
* sfunction task_stime - System time of the current task
*
* Description: Returns the system time of the current task in cputime.
* Does not include any time used by other tasks in this process, nor
* does it include any time of the children of this task.
*/
function task_stime:long ()
%{ /* pure */ /* unprivileged */
THIS->__retvalue = current->stime;
%}
/**
* sfunction task_stime_tid - System time of the given task
*
* @tid: Thread id of the given task
*
* Description: Returns the system time of the given task in cputime,
* or zero if the task doesn't exist.
* Does not include any time used by other tasks in this process, nor
* does it include any time of the children of this task.
*/
function task_stime_tid:long(tid:long)
{
task = pid2task(tid);
if (task != 0)
return @cast(task, "task_struct", "kernel<linux/sched.h>")->stime;
else
return 0;
}
/**
* sfunction cputime_to_msecs - Translates the given cputime into milliseconds
* @cputime: Time to convert to milliseconds.
*/
function cputime_to_msecs:long (cputime:long)
%{ /* pure */ /* unprivileged */
THIS->__retvalue = cputime_to_msecs (THIS->cputime);
%}
/**
* sfunction msecs_to_string - Human readable string for given milliseconds
*
* @msecs: Number of milliseconds to translate.
*
* Description: Returns a string representing the number of
* milliseconds as a human readable string consisting of "XmY.ZZZs",
* where X is the number of minutes, Y is the number of seconds and
* ZZZ is the number of milliseconds.
*/
function msecs_to_string:string (msecs:long)
{
ms = msecs % 1000;
secs = msecs / 1000;
mins = secs / 60;
secs = secs % 60;
return sprintf("%dm%d.%.3ds", mins, secs, ms);
}
/**
* sfunction cputime_to_string - Human readable string for given cputime
*
* @cputime: Time to translate.
*
* Description: Equivalent to calling:
* msec_to_string (cputime_to_msecs (cputime).
*/
function cputime_to_string:string (cputime:long)
{
return msecs_to_string (cputime_to_msecs (cputime));
}
/**
* sfunction task_time_string - Human readable string of task time usage
*
* Description: Returns a human readable string showing the user and
* system time the current task has used up to now. For example
* "usr: 0m12.908s, sys: 1m6.851s".
*/
function task_time_string:string ()
{
return sprintf ("usr: %s, sys: %s",
cputime_to_string (task_utime()),
cputime_to_string (task_stime()));
}
/**
* sfunction task_time_string_tid - Human readable string of task time usage
*
* @tid: Thread id of the given task
*
* Description: Returns a human readable string showing the user and
* system time the given task has used up to now. For example
* "usr: 0m12.908s, sys: 1m6.851s".
*/
function task_time_string_tid:string (tid:long)
{
return sprintf ("usr: %s, sys: %s",
cputime_to_string (task_utime_tid(tid)),
cputime_to_string (task_stime_tid(tid)));
}
|
