generate ThreadCpu class

This commit is contained in:
Doug MacEachern 2004-11-17 04:56:18 +00:00
parent 84b4a376ae
commit 7eef781321
1 changed files with 18 additions and 1 deletions

View File

@ -360,6 +360,23 @@ my %classes = (
}, },
}, },
], ],
ThreadCpu => [
{
name => 'user', type => 'Long',
desc => 'Thread cpu user time',
plat => 'HLSW'
},
{
name => 'sys', type => 'Long',
desc => 'Thread cpu kernel time',
plat => 'HLSW'
},
{
name => 'total', type => 'Long',
desc => 'Thread cpu time (sum of User and Sys)',
plat => 'HLSW'
},
],
FileSystem => [ FileSystem => [
{ {
name => 'dir_name', type => 'String', name => 'dir_name', type => 'String',
@ -991,7 +1008,7 @@ while (my($name, $fields) = each %classes) {
($cname = $name) =~ s/([a-z])([A-Z])/$1_$2/g; ($cname = $name) =~ s/([a-z])([A-Z])/$1_$2/g;
$cname = lc $cname; $cname = lc $cname;
if ($cname =~ /^proc_(\w+)/) { if ($cname =~ /^proc_(\w+)/ or $cname =~ /^thread_cpu/) {
unless ($proc_no_arg{$1}) { unless ($proc_no_arg{$1}) {
$args_proto = ", jlong pid"; $args_proto = ", jlong pid";
$arg_type = 'sigar_pid_t'; $arg_type = 'sigar_pid_t';