scottk/wlan-testing
1
0
Fork 0
mirror of https://github.com/Telecominfraproject/wlan-testing.git synced 2025-11-02 11:57:49 +00:00
Code Issues Packages Projects Releases Wiki Activity

jfrog: Attempt to deal with testrails data file.

Browse Source
This commit is contained in:
Ben Greear
2020-06-12 15:48:55 -07:00
parent a234a3dc17
commit 6fd2422e33
1 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
cicd/jfrog.pl
View File

@@ -25,10 +25,12 @@ my $ul_host = "www";
my $ul_dir = "candela_html/examples/cicd/"; # used by scp my $ul_dir = "candela_html/examples/cicd/"; # used by scp
my $ul_dest = "$ul_host:$ul_dir"; # used by scp my $ul_dest = "$ul_host:$ul_dir"; # used by scp
my $other_ul_dest = ""; # used by scp my $other_ul_dest = ""; # used by scp
my $result_url_base = "http://localhost/tip/cicd";
my $usage = qq($0 my $usage = qq($0
[--user { jfrog user (default: cicd_user) } [--user { jfrog user (default: cicd_user) }
[--passwd { jfrog password } [--passwd { jfrog password }
[--result_url_base { http://foo.com/tip/cicd }
[--url { jfrog URL, default is OpenWrt URL: https://tip.jfrog.io/artifactory/tip-wlan-ap-firmware/ } [--url { jfrog URL, default is OpenWrt URL: https://tip.jfrog.io/artifactory/tip-wlan-ap-firmware/ }
[--files_processed { text file containing file names we have already processed } [--files_processed { text file containing file names we have already processed }
[--tb_url_base { Where to report the test results? } [--tb_url_base { Where to report the test results? }
@@ -47,6 +49,7 @@ GetOptions
'url=s' => \$url, 'url=s' => \$url,
'files_processed=s' => \$files_processed, 'files_processed=s' => \$files_processed,
'tb_url_base=s' => \$tb_url_base, 'tb_url_base=s' => \$tb_url_base,
'result_url_base=s' => \$result_url_base,
'help|?' => \$help, 'help|?' => \$help,
) || (print($usage) && exit(1)); ) || (print($usage) && exit(1));
@@ -83,6 +86,7 @@ for ($j = 0; $j<@ttypes; $j++) {
if ($ln =~ /(.*)\/reports\/$ttype\/NEW_RESULTS/) { if ($ln =~ /(.*)\/reports\/$ttype\/NEW_RESULTS/) {
my $tbed = $1; my $tbed = $1;
my $cmd; my $cmd;
my $caseid = "";
print "Processing new results, line: $ln process: $process completed: $completed testbed: $tbed\n"; print "Processing new results, line: $ln process: $process completed: $completed testbed: $tbed\n";
@@ -91,6 +95,10 @@ for ($j = 0; $j<@ttypes; $j++) {
`mv ./$tbed/pending_work/$completed /tmp/`; `mv ./$tbed/pending_work/$completed /tmp/`;
if ($wi =~ /CICD_CASE_ID=(\S+)/g) {
$caseid = "--caseid $1";
}
if ($wi =~ /CICD_RPT_NAME=(.*)/g) { if ($wi =~ /CICD_RPT_NAME=(.*)/g) {
my $widir = $1; my $widir = $1;
@@ -103,9 +111,11 @@ for ($j = 0; $j<@ttypes; $j++) {
$cmd = "scp -C -r $process/$widir $ul_dest/$tbed/$ttype/"; $cmd = "scp -C -r $process/$widir $ul_dest/$tbed/$ttype/";
print "Uploading: $cmd"; print "Uploading: $cmd";
`$cmd`; `$cmd`;
$caseid .= " --results_url $result_url_base/$tbed/$ttype/$widir";
} }
$cmd = "cd $kpi_dir && java kpi --dir \"$pwd/$process\" && cd -"; $cmd = "cd $kpi_dir && java kpi $caseid --dir \"$pwd/$process\" && cd -";
print ("Running kpi: $cmd\n"); print ("Running kpi: $cmd\n");
`$cmd`; `$cmd`;
`rm $ln`; `rm $ln`;