scottk/wlan-lanforge-scripts
1
0
Fork 0
mirror of https://github.com/Telecominfraproject/wlan-lanforge-scripts.git synced 2025-11-01 19:28:00 +00:00
Code Issues Packages Projects Releases Wiki Activity

cicd: Process console logs, adding links to problem areas.

Browse Source
This commit is contained in:
Ben Greear
2020-05-13 16:58:12 -07:00
parent 8e3dd47559
commit a2e179c936
1 changed files with 112 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

114
gui/lf_gui_report_summary.pl
View File

@@ -20,6 +20,7 @@ use lib "../";
use lib "./";
use Getopt::Long;
use HTML::Entities;
our $dir = "";
our $notes = "";
@@ -32,10 +33,10 @@ our $title = "Automated test results.";
########################################################################
our $usage = <<"__EndOfUsage__";
$0 [ --dir directory-to-process --notes testbed-notes-file.html --gitlog gitlog-output.txt ]
$0 [ --dir directory-to-process --notes testbed-notes-file.html --gitlog gitlog-output.txt ] < html_template.html
Example:
$0 --dir ~/tmp/results --title "My Title" --notes testbeds/my_testbed/testbed_notes.html --gitlog /tmp/gitlog.txt
cat html-template | $0 --dir ~/tmp/results --title "My Title" --notes testbeds/my_testbed/testbed_notes.html --gitlog /tmp/gitlog.txt
__EndOfUsage__
my $i = 0;
@@ -100,8 +101,10 @@ my $tests_tr = "";
foreach my $line (@files) {
if ( -d $line) {
#print "Checking report: $line\n";
if ( -d "$line/logs") {
$tests_tr .= "<tr><td><a href=\"$line/index.html\">$line</html></td><td><a href=\"$line/logs\">Logs</td></tr>\n";
processLogs("$line/logs");
}
else {
$tests_tr .= "<tr><td><a href=\"$line/index.html\">$line</html></td><td></td></tr>\n";
@@ -149,5 +152,112 @@ while (<>) {
exit(0);
sub processLogs {
my $ldir = shift;
my @files = `ls $ldir`;
chomp(@files);
foreach $line (@files) {
if ($line =~ /console.*\.txt$/) {
my $tag = 0;
my $logf = $ldir . "/" . $line;
my $logh = $logf . ".html";
my $loghb = $line . ".html";
my $loghi = $logf . "-idx.html";
#print("Processing log file: $logf\n");
open(IFILE, "<", $logf ) or die( "could not read $logf");
open(IDX, ">$loghi");
open(LOGH, ">$logh");
print IDX getHtmlHdr("Log file index: $line");
print LOGH getHtmlHdr("Log file: $line");
print LOGH "<pre>\n";
print IDX "<a href=$loghb>Full Logs in HTML format</a><br>\n";
print IDX "<a href=$line>Full Logs in Text format</a><P>\n";
print IDX "<b>Interesting log sections.</b><br>\n";
print IDX "<ol>\n";
while (<IFILE>) {
my $ln = $_;
chomp($ln);
#print("ln: $ln\n");
my $enc_ln = encode_entities($ln);
# Get rid of some funk
$enc_ln =~ s/\&\#0\;//g;
if (($ln =~ /WARNING:/) ||
($ln =~ /BUG:/) ||
($ln =~ /restarting hardware/) ||
($ln =~ /crashed/)) {
print IDX "<li><a href=$loghb#$tag>$enc_ln</a></li>\n";
print LOGH "<a name='$tag'></a>\n";
print LOGH "<pre style='color:red'>$enc_ln</pre>\n";
$tag++;
}
else {
print LOGH "$enc_ln\n";
}
}
#print ("Done with file\n");
print LOGH "</pre>\n";
print IDX "</ol>\n";
print LOGH getHtmlFooter();
print IDX getHtmlFooter();
close(IDX);
close(LOGH);
close(IFILE);
}
}
print("Done processing logs.\n");
}
sub getHtmlHdr {
my $title = shift;
return "<!DOCTYPE html>\n" .
"<html>\n" .
" <head>\n" .
" <meta charset='utf-8' />\n" .
" <meta name='viewport' content='width=device-width, initial-scale=1' />\n" .
" <title>$title</title> <link rel='shortcut icon' href='canvil.ico' type='image/x-icon' />\n" .
" <link rel='stylesheet' href='../report.css' />\n" .
" <link rel='stylesheet' href='../custom.css' />\n" .
" <style>\n" .
" pre {\n" .
" overflow: auto;\n" .
" }\n" .
" img {\n" .
" width: 100%;\n" .
" max-width: 8in;\n" .
" }\n" .
" </style>\n" .
" </head>\n" .
" <body>\n" .
"<div class='HeaderStyle'>\n" .
"<h1 class='TitleFontPrint'>$title</h1><br/>\n" .
"\n" .
"<div class='contentDiv'>\n";
}
sub getHtmlFooter {
return "</div><!--end content-div -->\n" .
"<div class='FooterStyle'><span class='Gradient'>Generated by Candela Technologies LANforge network testing tool.<br/>\n" .
" <a href='https://www.candelatech.com/' target='_blank'>www.candelatech.com</a>\n" .
"</span>\n" .
"<a class='LogoImgLink' href='https://www.candelatech.com/' target='_blank'><img align='right' src='../candela_swirl_small-72h.png'></a></div><br/>\n" .
" </body>\n" .
"</html>\n";
}
# ----- ----- ----- ----- ----- ----- ----- ----- ----- ----- ----- ----- -----
# ----- ----- ----- ----- ----- ----- ----- ----- ----- ----- ----- ----- -----