From 20617f84f6e45d38306475997a5d41a889caaeb5 Mon Sep 17 00:00:00 2001
From: Yegor Bugayenko <yegor256@gmail.com>
Date: Sat, 6 Jul 2024 12:15:50 +0300
Subject: [PATCH] #27 pmp artifacts

---
 Makefile         |  1 +
 tests/simple.yml |  4 ++++
 xsl/awards.xsl   | 11 +++++------
 xsl/index.xsl    | 26 +++++++++++++++++++++++++-
 4 files changed, 35 insertions(+), 7 deletions(-)

diff --git a/Makefile b/Makefile
index 756f5be..20cf007 100644
--- a/Makefile
+++ b/Makefile
@@ -44,6 +44,7 @@ target/xsl/%.xsl: xsl/%.xsl | target/xsl
 
 target/html/%.html: target/fb/%.fb xsl/*.xsl entry.sh Makefile target/css/main.css $(SAXON) | target/html
 	export INPUT_VERBOSE=yes
+	export INPUT_OPTIONS=testing=yes
 	export GITHUB_WORKSPACE=.
 	export INPUT_FACTBASE=$<
 	fb=$$(basename $<)
diff --git a/tests/simple.yml b/tests/simple.yml
index 65a7e8b..8f6cab5 100644
--- a/tests/simple.yml
+++ b/tests/simple.yml
@@ -20,6 +20,10 @@
 # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 # SOFTWARE.
 ---
+-
+  what: pmp
+  area: hr
+  days_of_running_balance: 28
 -
   time: 2024-05-18T22:22:22.8492Z
   award: 15
diff --git a/xsl/awards.xsl b/xsl/awards.xsl
index ab9ac6b..ea2be05 100644
--- a/xsl/awards.xsl
+++ b/xsl/awards.xsl
@@ -22,7 +22,7 @@ LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 SOFTWARE.
 -->
-<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:z="https://www.zerocracy.com" version="2.0">
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:z="https://www.zerocracy.com" version="2.0" exclude-result-prefixes="z">
   <xsl:function name="z:award">
     <xsl:param name="a"/>
     <xsl:if test="$a &gt; 0">
@@ -30,15 +30,16 @@ SOFTWARE.
     </xsl:if>
     <xsl:value-of select="$a"/>
   </xsl:function>
+  <xsl:variable name="since" select="current-dateTime() - xs:dayTimeDuration(concat('P', z:pmp(/fb, 'hr', 'days_of_running_balance'), 'D'))"/>
   <xsl:template match="/" mode="awards">
-      <xsl:apply-templates select="/fb" mode="awards"/>
+    <xsl:apply-templates select="/fb" mode="awards"/>
   </xsl:template>
-  <xsl:template match="/fb[not(f[who_name and award])]" mode="awards">
+  <xsl:template match="/fb[not(f[award and when &gt; $since])]" mode="awards">
     <p>
       <xsl:text>No awards as of yet.</xsl:text>
     </p>
   </xsl:template>
-  <xsl:template match="/fb[f]" mode="awards">
+  <xsl:template match="/fb[f[award and when &gt; $since]]" mode="awards">
     <table id="awards" border="1">
       <colgroup>
         <col style="width: 2em;"/>
@@ -77,8 +78,6 @@ SOFTWARE.
       </tbody>
     </table>
   </xsl:template>
-  <xsl:template match="fb" mode="awards">
-  </xsl:template>
   <xsl:template name="programmer">
     <xsl:param name="name"/>
     <tr>
diff --git a/xsl/index.xsl b/xsl/index.xsl
index 8326c9c..b163706 100644
--- a/xsl/index.xsl
+++ b/xsl/index.xsl
@@ -22,13 +22,37 @@ LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 SOFTWARE.
 -->
-<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="2.0">
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="2.0" xmlns:z="https://www.zerocracy.com" exclude-result-prefixes="z">
   <xsl:import href="awards.xsl"/>
   <xsl:output method="xml" doctype-system="about:legacy-compat" encoding="UTF-8" indent="yes"/>
   <xsl:param name="css"/>
   <xsl:param name="name"/>
   <xsl:param name="logo"/>
   <xsl:param name="version"/>
+  <xsl:function name="z:pmp">
+    <xsl:param name="fb"/>
+    <xsl:param name="area"/>
+    <xsl:param name="param"/>
+    <xsl:variable name="a" select="$fb/f[what='pmp' and area=$area]"/>
+    <xsl:if test="not($a)">
+      <xsl:message terminate="yes">
+        <xsl:text>There is no PMP fact for the area '</xsl:text>
+        <xsl:value-of select="$area"/>
+        <xsl:text>'</xsl:text>
+      </xsl:message>
+    </xsl:if>
+    <xsl:variable name="v" select="$a/*[name()=$param]/text()"/>
+    <xsl:if test="not($v)">
+      <xsl:message terminate="yes">
+        <xsl:text>There is no parameter '</xsl:text>
+        <xsl:value-of select="$param"/>
+        <xsl:text>' in the PMP artifact for the '</xsl:text>
+        <xsl:value-of select="$area"/>
+        <xsl:text>' area</xsl:text>
+      </xsl:message>
+    </xsl:if>
+    <xsl:value-of select="$v"/>
+  </xsl:function>
   <xsl:template name="javascript">
     <xsl:param name="url"/>
     <script type="text/javascript" src="{$url}">