From 6be164975538280cfc48548c28f8287bdbefeee9 Mon Sep 17 00:00:00 2001
From: Ian Young <ian@iay.org.uk>
Date: Sat, 22 Jan 2011 13:52:50 +0000
Subject: [PATCH] Add breakdowns for all entities, SPs and IdPs of the
 KeyDescriptors used by each list.

---
 build/statistics.xsl | 72 ++++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 70 insertions(+), 2 deletions(-)

diff --git a/build/statistics.xsl b/build/statistics.xsl
index 7046b46e..91e39485 100644
--- a/build/statistics.xsl
+++ b/build/statistics.xsl
@@ -531,6 +531,10 @@
                     <xsl:with-param name="entities" select="$entities"/>
                 </xsl:call-template>
 
+                <xsl:call-template name="keydescriptor.breakdown">
+                    <xsl:with-param name="entities" select="$entities"/>
+                </xsl:call-template>
+
 
 
                 <!--
@@ -650,8 +654,11 @@
                     <xsl:with-param name="entities" select="$idps"/>
                 </xsl:call-template>
 
-
-
+                <xsl:call-template name="keydescriptor.breakdown">
+                    <xsl:with-param name="entities" select="$idps"/>
+                </xsl:call-template>
+                
+                
 
                 <!--
                     *********************************************
@@ -844,6 +851,10 @@
                     <xsl:with-param name="entities" select="$sps"/>
                 </xsl:call-template>
 
+                <xsl:call-template name="keydescriptor.breakdown">
+                    <xsl:with-param name="entities" select="$sps"/>
+                </xsl:call-template>
+                
                 
                 
                 <!--
@@ -1504,4 +1515,61 @@
         </xsl:if>
     </xsl:template>
     
+    <xsl:template name="keydescriptor.breakdown">
+        <xsl:param name="entities"/>
+        <xsl:variable name="kd" select="$entities//md:KeyDescriptor"/>
+        <xsl:variable name="kd.count" select="count($kd)"/>
+        <p>
+            <code>KeyDescriptor</code> elements: <xsl:value-of select="$kd.count"/>
+            (<xsl:value-of select="format-number($kd.count div count($entities), '0.0')"/> per entity),
+            of which:</p>
+        <ul>
+            <li>
+                With embedded keys:
+                <xsl:call-template name="keydescriptor.line">
+                    <xsl:with-param name="kd.count" select="$kd.count"/>
+                    <xsl:with-param name="sub" select="$kd[descendant::ds:X509Data]"/>
+                </xsl:call-template>
+            </li>
+            <li>
+                With only embedded keys:
+                <xsl:call-template name="keydescriptor.line">
+                    <xsl:with-param name="kd.count" select="$kd.count"/>
+                    <xsl:with-param name="sub" select="$kd[descendant::ds:X509Data][not(descendant::ds:KeyName)]"/>
+                </xsl:call-template>
+            </li>
+            <li>
+                With <code>KeyName</code>:
+                <xsl:call-template name="keydescriptor.line">
+                    <xsl:with-param name="kd.count" select="$kd.count"/>
+                    <xsl:with-param name="sub" select="$kd[descendant::ds:KeyName]"/>
+                </xsl:call-template>
+            </li>
+            <li>
+                With only <code>KeyName</code>:
+                <xsl:call-template name="keydescriptor.line">
+                    <xsl:with-param name="kd.count" select="$kd.count"/>
+                    <xsl:with-param name="sub" select="$kd[not(descendant::ds:X509Data)][descendant::ds:KeyName]"/>
+                </xsl:call-template>
+            </li>
+            <li>
+                With both:
+                <xsl:call-template name="keydescriptor.line">
+                    <xsl:with-param name="kd.count" select="$kd.count"/>
+                    <xsl:with-param name="sub" select="$kd[descendant::ds:X509Data][descendant::ds:KeyName]"/>
+                </xsl:call-template>
+            </li>
+        </ul>
+    </xsl:template>
+    
+    <xsl:template name="keydescriptor.line">
+        <xsl:param name="kd.count"/>
+        <xsl:param name="sub"/>
+        <xsl:variable name="sub.count" select="count($sub)"/>
+        <xsl:value-of select="$sub.count"/>
+        <xsl:text> (</xsl:text>
+        <xsl:value-of select="format-number($sub.count div $kd.count, '0.0%')"/>
+        <xsl:text>)</xsl:text>
+    </xsl:template>
+    
 </xsl:stylesheet>
\ No newline at end of file