Lines Matching refs:cpu
180 while (my ($cpu, $cpst) = each %{$ks->{cpu}}) {
181 next if !exists($ks->{cpu_info}{$cpu}{"cpu_info$cpu"}{state});
184 my $state = $ks->{cpu_info}{$cpu}{"cpu_info$cpu"}{state};
188 $stat{$cpu}{tot} = ($cpu_sys->{cpu_nsec_idle} +
191 $stat{$cpu}{crtime} = $cpu_sys->{crtime};
192 $stat{$cpu}{ivecs} = {};
216 my $cpu = $intrcfg->{cpu};
218 next unless exists $stat{$cpu};
232 if (exists $stat{$cpu}{ivecs}{$cookie}) {
233 my $cookiestats = $stat{$cpu}{ivecs}{$cookie};
249 $stat{$cpu}{ivecs}{$cookie}{time} = $intrcfg->{time};
250 $stat{$cpu}{ivecs}{$cookie}{crtime} = $intrcfg->{crtime};
251 $stat{$cpu}{ivecs}{$cookie}{pil} = $intrcfg->{pil};
252 $stat{$cpu}{ivecs}{$cookie}{ino} = $intrcfg->{ino};
253 $stat{$cpu}{ivecs}{$cookie}{num_ino} = 1;
254 $stat{$cpu}{ivecs}{$cookie}{buspath} = $intrcfg->{buspath};
255 $stat{$cpu}{ivecs}{$cookie}{name} = $intrcfg->{name};
256 $stat{$cpu}{ivecs}{$cookie}{ihs} = 1;
263 \$stat{$cpu}{ivecs}{$cookie};
375 while (my ($cpu, $cpst) = each %$delta) {
379 $cpu, $cpst->{intrload}*100, $cpst->{bigintr}*100/$tot);
429 while (my ($cpu, $newcpst) = each %$newstat) {
435 if (VERIFY(exists $stat->{$cpu} &&
436 $stat->{$cpu}{crtime} == $newcpst->{crtime},
437 "generate_delta: cpu $cpu changed")) {
441 my $cpst = $stat->{$cpu};
442 $delta{$cpu}{tot} = $newcpst->{tot} - $cpst->{tot};
443 if (VERIFY($delta{$cpu}{tot} >= 0,
446 delete($delta{$cpu});
450 $delta{$cpu}{tot} = 1 if $delta{$cpu}{tot} == 0;
451 $delta{$cpu}{intrs} = 0;
452 $delta{$cpu}{bigintr} = 0;
455 $delta{$cpu}{ivecs} = \%ivecs;
461 "generate_delta: cpu $cpu has more/less".
479 "generate_delta: cpu $cpu inum $inum".
489 $delta{$cpu}{ivecs}{$inum} = \%dltivec;
497 delete($delta{$cpu}{ivecs}{$inum});
500 $delta{$cpu}{intrs} += $time;
502 if ($time > $delta{$cpu}{bigintr}) {
503 $delta{$cpu}{bigintr} = $time;
518 if ($delta{$cpu}{tot} < $delta{$cpu}{intrs}) {
521 $delta{$cpu}{tot} = $delta{$cpu}{intrs};
523 $delta{$cpu}{intrload} =
524 $delta{$cpu}{intrs} / $delta{$cpu}{tot};
525 $intrload += $delta{$cpu}{intrload};
526 $intrnsec += $delta{$cpu}{intrs};
569 while (my ($cpuid, $cpu) = each %$delta) {
570 next if !ref($cpu);
572 $intrs += $cpu->{intrs};
573 $tot += $cpu->{tot};
574 $newdelta{$cpuid}{intrs} += $cpu->{intrs};
575 $newdelta{$cpuid}{tot} += $cpu->{tot};
580 while (my ($inum, $ivec) = each %{$cpu->{ivecs}}) {
592 foreach my $cpu (values(%newdelta)) {
593 next if !ref($cpu); # ignore non-cpu fields
597 foreach my $ivec (values(%{$cpu->{ivecs}})) {
602 $cpu->{bigintr} = $bigintr;
603 $cpu->{intrload} = $cpu->{intrs} / $cpu->{tot};
604 if ($high_intrload < $cpu->{intrload}) {
605 $high_intrload = $cpu->{intrload};
607 $cpu->{tot} = 1 if $cpu->{tot} <= 0;
683 foreach my $cpu (values(%$delta)) {
684 next if !ref($cpu); # skip non-cpuid fields
686 $goodness = goodness_cpu($cpu, $delta->{avgintrload});
704 my ($cpu, $avgintrload) = @_;
707 my $load = $cpu->{intrs} / $cpu->{tot};
716 my $load_no_bigintr = ($cpu->{intrs} - $cpu->{bigintr}) / $cpu->{tot};
725 my $cnt = keys(%{$cpu->{ivecs}});
871 while (my ($cpuid, $cpu) = each %$delta) {
872 next if !ref($cpu); # skip non-cpu entries
875 while (my ($inum, $ivec) = each %{$cpu->{ivecs}}) {
897 my $cpu = shift(@cpusortlist);
898 if (($delta->{$cpu}{intrload} <= $goodness_unsafe_load) &&
899 ($delta->{$cpu}{intrload} <=
901 syslog('debug', "finished reconfig: cpu $cpu load ".
902 "$delta->{$cpu}{intrload} avgload ".
906 if (goodness_cpu($delta->{$cpu}, $delta->{avgintrload}) <
910 do_reconfig_cpu($delta, \@cpusortlist, $cpu);
934 while (my ($cpuid, $cpu) = each %$delta) {
936 while (my ($inum, $ivec) = each %{$cpu->{ivecs}}) {
970 my $cpu = $delta->{$oldcpuid};
975 last if goodness_cpu($cpu, $avgintrload) < $goodness_mindelta;
979 my $load = $cpu->{intrload};