From da72afd816f0015bc8a3b242ff7606b5f68fabcf Mon Sep 17 00:00:00 2001
From: Astro <astro@spaceboyz.net>
Date: Sat, 4 Feb 2012 02:34:41 +0100
Subject: [PATCH] ATOM, RSS, Podcast feeds: <link rel="payment"/> to Flattr

http://developers.flattr.net/feed/

No support in podcatchers /yet/.
---
 xsl/atom.xsl    |  9 +++++++++
 xsl/common.xsl  | 17 +++++++++++++++++
 xsl/podcast.xsl |  9 +++++++++
 xsl/rss.xsl     | 10 ++++++++++
 4 files changed, 45 insertions(+)

diff --git a/xsl/atom.xsl b/xsl/atom.xsl
index faae8cdfe..98d66db11 100644
--- a/xsl/atom.xsl
+++ b/xsl/atom.xsl
@@ -90,6 +90,15 @@
               length="{@size}" />
       </xsl:for-each>
 
+      <xsl:variable name="flattr_link">
+	<xsl:call-template name="make-flattr-link">
+	  <xsl:with-param name="newsfile" select="$newsfile"/>
+	</xsl:call-template>
+      </xsl:variable>
+      <xsl:if test="string-length($flattr_link) &gt; 0">
+	<link rel="payment" href="{$flattr_link}" type="text/html"/>
+      </xsl:if>
+
     </entry>
   </xsl:template>
 
diff --git a/xsl/common.xsl b/xsl/common.xsl
index d80082439..0eba43137 100644
--- a/xsl/common.xsl
+++ b/xsl/common.xsl
@@ -561,4 +561,21 @@
     </xsl:choose>
   </xsl:template>
 
+  <xsl:template name="make-flattr-link">
+    <xsl:param name="newsfile"/>
+
+    <xsl:choose>
+      <xsl:when test="contains($newsfile, '/')">
+	<!-- Recurse w/o directory part until bare filename -->
+	<xsl:call-template name="make-flattr-link">
+	  <xsl:with-param name="newsfile" select="substring-after($newsfile, '/')"/>
+	</xsl:call-template>
+      </xsl:when>
+
+      <xsl:when test="starts-with($newsfile, 'pentaradio24-')">https://flattr.com/thing/51034/Pentaradio-24</xsl:when>
+      <xsl:when test="starts-with($newsfile, 'pentacast-')">https://flattr.com/thing/51037/Pentacast</xsl:when>
+      <xsl:when test="starts-with($newsfile, 'pentamusic-')">https://flattr.com/thing/51039/Pentamusic</xsl:when>
+    </xsl:choose>
+  </xsl:template>
+
 </xsl:stylesheet>
diff --git a/xsl/podcast.xsl b/xsl/podcast.xsl
index 69d4d9253..2133fcd33 100644
--- a/xsl/podcast.xsl
+++ b/xsl/podcast.xsl
@@ -9,6 +9,7 @@
   xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
   xmlns:date="http://exslt.org/dates-and-times"
   xmlns:content="http://purl.org/rss/1.0/modules/content/" 
+  xmlns:atom="http://www.w3.org/2005/Atom"
   exclude-result-prefixes="xsl date">
 
   <xsl:output method="xml"
@@ -241,6 +242,14 @@
       <itunes:subtitle><xsl:value-of select="$resource_title"/></itunes:subtitle>
       <itunes:author>CCC Dresden</itunes:author>
 
+      <xsl:variable name="flattr_link">
+	<xsl:call-template name="make-flattr-link">
+	  <xsl:with-param name="newsfile" select="$newsfile"/>
+	</xsl:call-template>
+      </xsl:variable>
+      <xsl:if test="string-length($flattr_link) &gt; 0">
+	<atom:link rel="payment" href="{$flattr_link}" type="text/html"/>
+      </xsl:if>
     </item>
   </xsl:template>
 
diff --git a/xsl/rss.xsl b/xsl/rss.xsl
index fca5b842b..853aaa287 100644
--- a/xsl/rss.xsl
+++ b/xsl/rss.xsl
@@ -3,6 +3,7 @@
   xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
   xmlns:date="http://exslt.org/dates-and-times"
   xmlns:content="http://purl.org/rss/1.0/modules/content/" 
+  xmlns:atom="http://www.w3.org/2005/Atom"
   exclude-result-prefixes="xsl date">
   
   <xsl:include href="common.xsl" />
@@ -108,6 +109,15 @@
 	</div>
 	<xsl:text disable-output-escaping="yes">]]&gt;</xsl:text>
       </content:encoded>
+
+      <xsl:variable name="flattr_link">
+	<xsl:call-template name="make-flattr-link">
+	  <xsl:with-param name="newsfile" select="$newsfile"/>
+	</xsl:call-template>
+      </xsl:variable>
+      <xsl:if test="string-length($flattr_link) &gt; 0">
+	<atom:link rel="payment" href="{$flattr_link}" type="text/html"/>
+      </xsl:if>
     </item>
   </xsl:template>