From mboxrd@z Thu Jan  1 00:00:00 1970
From: Ian Jackson <ian.jackson@eu.citrix.com>
Subject: [OSSTEST PATCH 6/6] sg-report-flight: report when
	flight finished
Date: Mon, 7 Apr 2014 17:27:57 +0100
Message-ID: <1396888077-9619-7-git-send-email-ian.jackson@eu.citrix.com>
References: <1396888077-9619-1-git-send-email-ian.jackson@eu.citrix.com>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Return-path: <xen-devel-bounces@lists.xen.org>
Received: from mail6.bemta3.messagelabs.com ([195.245.230.39])
	by lists.xen.org with esmtp (Exim 4.72)
	(envelope-from <Ian.Jackson@citrix.com>) id 1WXCP7-0007uO-Rm
	for xen-devel@lists.xenproject.org; Mon, 07 Apr 2014 16:28:14 +0000
In-Reply-To: <1396888077-9619-1-git-send-email-ian.jackson@eu.citrix.com>
List-Unsubscribe: <http://lists.xen.org/cgi-bin/mailman/options/xen-devel>,
	<mailto:xen-devel-request@lists.xen.org?subject=unsubscribe>
List-Post: <mailto:xen-devel@lists.xen.org>
List-Help: <mailto:xen-devel-request@lists.xen.org?subject=help>
List-Subscribe: <http://lists.xen.org/cgi-bin/mailman/listinfo/xen-devel>,
	<mailto:xen-devel-request@lists.xen.org?subject=subscribe>
Sender: xen-devel-bounces@lists.xen.org
Errors-To: xen-devel-bounces@lists.xen.org
To: xen-devel@lists.xenproject.org
Cc: Ian Jackson <Ian.Jackson@eu.citrix.com>, Ian Campbell <ian.campbell@citrix.com>
List-Id: xen-devel@lists.xenproject.org

Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com>
---
 sg-report-flight |   13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/sg-report-flight b/sg-report-flight
index b643816..4f900c5 100755
--- a/sg-report-flight
+++ b/sg-report-flight
@@ -1014,6 +1014,18 @@ END
     }
     my $started_str = show_abs_time $fi->{FlightInfo}{started};
 
+    our $htmlout_finishedq ||= $dbh_tests->prepare(<<END);
+        SELECT
+ (SELECT max(finished) FROM steps WHERE flight=?)                 max,
+ (SELECT count(*) FROM steps WHERE finished IS NULL AND flight=?) unfinished
+END
+    $htmlout_finishedq->execute($fi->{Flight}, $fi->{Flight});
+    my $frow = $htmlout_finishedq->fetchrow_hashref();
+    my $finished_str =
+	$frow->{unfinished} ? "($frow->{unfinished} unfinished steps)" :
+	!$frow->{max} ? "(no steps)" :
+	show_abs_time($frow->{max});
+
     print H <<END;
 <h2>Flight information</h2>
 <table>
@@ -1022,6 +1034,7 @@ END
 <td>Intended blessing:</td><td>$fi->{FlightInfo}{intended}</td></tr>
 <td>Blessing:</td><td>$fi->{FlightInfo}{blessing}</td></tr>
 <td>Started:</td><td>$started_str</td></tr>
+<td>Finished:</td><td>$finished_str</td></tr>
 <td>Test harness revision(s):</td><td>
 END
 
-- 
1.7.10.4