xCAT/xcat-core
2
0
Fork 0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-11-03 21:02:34 +00:00
Code Issues Releases Wiki Activity

OpenBMC reventlog output formatting and sorting

Browse Source
This commit is contained in:
Mark Gurevich
2017-09-13 08:44:30 -04:00
parent 6ad7e30ab7
commit 7d3ebe3583
1 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
xCAT-server/lib/xcat/plugins/openbmc.pm
View File

@@ -1629,27 +1629,28 @@ sub reventlog_response {
foreach my $key_url (keys %{$response_info->{data}}) {
my %content = %{ ${ $response_info->{data} }{$key_url} };
my $timestamp = $content{Timestamp};
my $id_num = 0 + $content{Id} if ($content{Id});
if ($content{Message}) {
my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($content{Timestamp}/1000);
$mon += 1;
$year += 1900;
my $UTC_time = sprintf ("%02d/%02d/%04d %02d:%02d:%02d", $mon, $mday, $year, $hour, $min, $sec);
my $content_info = "Entry $content{Id}:" . $UTC_time . " " . $content{Message};
$output{$id_num} = $content_info;
my $content_info = $UTC_time . " [$content{Id}] " . $content{Message};
$output{$timestamp} = $content_info;
}
}
my $count = 0;
if ($option_s) {
foreach my $key ( sort { $b <=> $a } keys %output) {
xCAT::SvrUtils::sendmsg($output{$key}, $callback, $node);
xCAT::MsgUtils->message("I", { data => [$output{$key}] }, $callback, $node) if ($output{$key});
$count++;
last if ($entry_string ne "all" and $count >= $entry_num);
}
} else {
foreach my $key (keys %output) {
xCAT::SvrUtils::sendmsg("$output{$key}", $callback, $node) if ($output{$key});
foreach my $key (sort keys %output) {
xCAT::MsgUtils->message("I", { data => [$output{$key}] }, $callback, $node) if ($output{$key});
$count++;
last if ($entry_string ne "all" and $count >= $entry_num);
}