olelo 0.9.0

data/plugins/filters/markdown_nowiki.rb

@@ -0,0 +1,15 @@
+description 'Markdown nowiki filter'
+
+Filter.create :markdown_nowiki do |context, content|
+  output = ''
+  until content.blank?
+    case content
+    when /(\A( {4}|\t).*)|(\A``.*?``)|(\A`[^`]*`)/
+      output << "<notags>#{$&}</notags>"
+    when /(\A[^`\n]+)|(\A\n+)/
+      output << $&
+    end
+    content = $'
+  end
+  output
+end

data/plugins/filters/numbering.xsl

@@ -0,0 +1,93 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!--
+  Add headline numbering to XHTML
+-->
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+		xmlns:xhtml="http://www.w3.org/1999/xhtml" version="1.0">
+
+  <xsl:output method="xml"
+	      version="1.0"
+	      encoding="UTF-8"
+	      doctype-public="-//W3C//DTD XHTML 1.1 plus MathML 2.0 plus SVG 1.1//EN"
+	      doctype-system="http://www.w3.org/2002/04/xhtml-math-svg/xhtml-math-svg-flat.dtd" indent="yes"/>
+
+  <xsl:strip-space elements="*"/>
+
+  <!-- Identity template -->
+  <xsl:template match="@*|node()">
+    <xsl:copy>
+      <xsl:apply-templates select="@*|node()"/>
+    </xsl:copy>
+  </xsl:template>
+
+  <xsl:template match="xhtml:h2">
+    <xsl:variable name="number">
+      <xsl:number count="xhtml:h2" level="any"/>
+    </xsl:variable>
+    <h2 id="s{$number}">
+      <span class="number"><xsl:value-of select="$number"/></span>
+      <xsl:text>
+      </xsl:text>
+      <xsl:apply-templates select="@*|node()"/>
+    </h2>
+  </xsl:template>
+
+  <xsl:template match="xhtml:h3">
+    <xsl:variable name="number">
+      <xsl:number count="xhtml:h2" level="any" format="1."/>
+      <xsl:number count="xhtml:h3" from="xhtml:h2" level="any"/>
+    </xsl:variable>
+    <h3 id="s{$number}">
+      <span class="number"><xsl:value-of select="$number"/></span>
+      <xsl:text>
+      </xsl:text>
+      <xsl:apply-templates select="@*|node()"/>
+    </h3>
+  </xsl:template>
+
+  <xsl:template match="xhtml:h4">
+    <xsl:variable name="number">
+      <xsl:number count="xhtml:h2" level="any" format="1."/>
+      <xsl:number count="xhtml:h3" from="xhtml:h2" level="any" format="1."/>
+      <xsl:number count="xhtml:h4" from="xhtml:h3" level="any"/>
+    </xsl:variable>
+    <h4 id="s{$number}">
+      <span class="number"><xsl:value-of select="$number"/></span>
+      <xsl:text>
+      </xsl:text>
+      <xsl:apply-templates select="@*|node()"/>
+    </h4>
+  </xsl:template>
+
+  <xsl:template match="xhtml:h5">
+    <xsl:variable name="number">
+      <xsl:number count="xhtml:h2" level="any" format="1."/>
+      <xsl:number count="xhtml:h3" from="xhtml:h2" level="any" format="1."/>
+      <xsl:number count="xhtml:h4" from="xhtml:h3" level="any" format="1."/>
+      <xsl:number count="xhtml:h5" from="xhtml:h4" level="any"/>
+    </xsl:variable>
+    <h5 id="s{$number}">
+      <span><xsl:value-of select="$number"/></span>
+      <xsl:text>
+      </xsl:text>
+      <xsl:apply-templates select="@*|node()"/>
+    </h5>
+  </xsl:template>
+
+  <xsl:template match="xhtml:h6">
+    <xsl:variable name="number">
+      <xsl:number count="xhtml:h2" level="any" format="1."/>
+      <xsl:number count="xhtml:h3" from="xhtml:h2" level="any" format="1."/>
+      <xsl:number count="xhtml:h4" from="xhtml:h3" level="any" format="1."/>
+      <xsl:number count="xhtml:h5" from="xhtml:h4" level="any" format="1."/>
+      <xsl:number count="xhtml:h6" from="xhtml:h5" level="any"/>
+    </xsl:variable>
+    <h6 id="s{$number}">
+      <span class="number"><xsl:value-of select="$number"/></span>
+      <xsl:text>
+      </xsl:text>
+      <xsl:apply-templates select="@*|node()"/>
+    </h6>
+  </xsl:template>
+
+</xsl:stylesheet>

data/plugins/filters/orgmode.rb

@@ -0,0 +1,6 @@
+description 'Emacs org-mode filter'
+require 'org-ruby'
+
+Filter.create :orgmode do |context, content|
+  ::Orgmode::Parser.new(content).to_html
+end

data/plugins/filters/rubypants.rb

@@ -0,0 +1,6 @@
+description 'Filter which fixes punctuation'
+require 'rubypants'
+
+Filter.create :rubypants do |context, content|
+  ::RubyPants.new(content).to_html
+end

data/plugins/filters/s5/main.rb

@@ -0,0 +1,32 @@
+description  'XSLT filter which transforms a html page to a S5 presentation'
+dependencies 'filters/xslt', 'utils/assets'
+export_assets 'ui/**/*', 'ui/default/*'
+
+Page.attributes do
+  group :s5 do
+    string :presdate
+    string :author
+    string :company
+    string :theme
+    string :transitions
+    integer :fadeDuration
+    integer :incrDuration
+  end
+end
+
+class S5 < XSLT
+  def configure(options)
+    super(options.merge(:stylesheet => 's5/s5.xsl'))
+  end
+
+  def params(context)
+    themes = Dir.glob(File.join(File.dirname(__FILE__), 'ui', '*')).map {|name| File.basename(name) }
+    themes.delete('common')
+    themes.delete('default')
+    themes.unshift(context.page.attributes['theme'] || 'default')
+    super.merge(context.page.attributes['s5'] || {}).
+      merge('themes' => themes.join(' '), 's5_path' => build_path('_/assets/filter/s5'))
+  end
+end
+
+Filter.register :s5, S5

data/plugins/filters/s5/s5.xsl

@@ -0,0 +1,118 @@
+<?xml version="1.0" encoding="utf-8"?>
+<xsl:stylesheet version="1.0"
+		xmlns:xhtml="http://www.w3.org/1999/xhtml"
+		xmlns="http://www.w3.org/1999/xhtml"
+		xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+		xmlns:xs="http://www.w3.org/2001/XMLSchema"
+		exclude-result-prefixes="xhtml xsl xs">
+
+  <xsl:param name="s5_path"/>
+  <xsl:param name="title"/>
+  <xsl:param name="presdate"/>
+  <xsl:param name="author"/>
+  <xsl:param name="company"/>
+  <xsl:param name="themes"/>
+  <xsl:param name="transitions"/>
+  <xsl:param name="fadeDuration"/>
+  <xsl:param name="incrDuration"/>
+
+  <xsl:output method="xml"
+	      version="1.0"
+	      encoding="UTF-8"
+	      doctype-public="-//W3C//DTD XHTML 1.1 plus MathML 2.0 plus SVG 1.1//EN"
+	      doctype-system="http://www.w3.org/2002/04/xhtml-math-svg/xhtml-math-svg-flat.dtd" indent="yes"/>
+
+  <xsl:strip-space elements="*"/>
+
+  <!-- Identity template -->
+  <xsl:template match="@*|node()">
+    <xsl:copy>
+      <xsl:apply-templates select="@*|node()"/>
+    </xsl:copy>
+  </xsl:template>
+
+  <xsl:template name="slidecontent">
+    <xsl:param name="current"/>
+    <xsl:for-each select="child::node()[name() != 'h1' and name() != 'h2' and name() != 'h3' and name() != 'h4' and name() != 'h5' and name() != 'h6' and
+			  (preceding::xhtml:h1|preceding::xhtml:h2|preceding::xhtml:h3|preceding::xhtml:h4|preceding::xhtml:h5|preceding::xhtml:h6)[last()] = $current]">
+      <xsl:copy>
+	<xsl:copy-of select="@*"/>
+	<xsl:call-template name="slidecontent">
+	  <xsl:with-param name="current" select="$current"/>
+	</xsl:call-template>
+      </xsl:copy>
+    </xsl:for-each>
+  </xsl:template>
+
+  <xsl:template name="slides">
+    <xsl:for-each select="//xhtml:h1|//xhtml:h2|//xhtml:h3|//xhtml:h4|//xhtml:h5|//xhtml:h6">
+      <div class="slide">
+	<h1><xsl:apply-templates select="@*|node()"/></h1>
+	<div class="slidecontent">
+	  <xsl:variable name="current" select="."/>
+	  <xsl:for-each select="following-sibling::node()[name() != 'h1' and name() != 'h2' and name() != 'h3' and name() != 'h4' and name() != 'h5' and name() != 'h6' and
+				(preceding::xhtml:h1|preceding::xhtml:h2|preceding::xhtml:h3|preceding::xhtml:h4|preceding::xhtml:h5|preceding::xhtml:h6)[last()] = $current]">
+	    <xsl:copy>
+	      <xsl:copy-of select="@*"/>
+	      <xsl:call-template name="slidecontent">
+		<xsl:with-param name="current" select="$current"/>
+	      </xsl:call-template>
+	    </xsl:copy>
+	  </xsl:for-each>
+	</div>
+      </div>
+    </xsl:for-each>
+  </xsl:template>
+
+  <xsl:template match="xhtml:head">
+    <xsl:copy>
+      <xsl:apply-templates select="@*|node()"/>
+      <!-- metadata -->
+      <meta name="generator" content="S5"/>
+      <meta name="version" content="S5 1.3"/>
+      <xsl:if test="$presdate"><meta name="presdate" content="{$presdate}"/></xsl:if>
+      <xsl:if test="$author"><meta name="author" content="{$author}"/></xsl:if>
+      <xsl:if test="$company"><meta name="company" content="{$company}"/></xsl:if>
+      <!-- configuration parameters -->
+      <xsl:if test="$transitions"><meta name="transitions" content="{$transitions}"/></xsl:if>
+      <xsl:if test="$fadeDuration"><meta name="fadeDuration" content="{$fadeDuration}"/></xsl:if>
+      <xsl:if test="$incrDuration"><meta name="incrDuration" content="{$incrDuration}"/></xsl:if>
+      <meta name="themes" content="{$themes}"/>
+      <xsl:value-of select="concat('&lt;script src=&quot;', $s5_path, '/ui/common/jquery.js&quot; type=&quot;text/javascript&quot;&gt;&lt;/script&gt;')"
+		    disable-output-escaping="yes"/>
+      <xsl:value-of select="concat('&lt;script src=&quot;', $s5_path, '/ui/common/s5.js&quot; type=&quot;text/javascript&quot;&gt;&lt;/script&gt;')"
+		    disable-output-escaping="yes"/>
+    </xsl:copy>
+  </xsl:template>
+
+  <xsl:template name="first-slide">
+    <xsl:for-each select="child::node()[name() != 'h1' and name() != 'h2' and name() != 'h3' and name() != 'h4' and name() != 'h5' and name() != 'h6' and
+			  not(preceding::xhtml:h1|preceding::xhtml:h2|preceding::xhtml:h3|preceding::xhtml:h4|preceding::xhtml:h5|preceding::xhtml:h6)]">
+      <xsl:copy>
+	<xsl:copy-of select="@*"/>
+	<xsl:call-template name="first-slide"/>
+      </xsl:copy>
+    </xsl:for-each>
+  </xsl:template>
+
+  <xsl:template match="xhtml:body">
+    <xsl:copy>
+      <div class="layout">
+	<div id="header"></div>
+	<div id="footer">
+	  <h1><xsl:value-of select="$presdate"/></h1>
+	  <h2><xsl:value-of select="$title"/></h2>
+	</div>
+      </div>
+      <div class="presentation">
+	<div class="slide">
+	  <h1><xsl:value-of select="$title"/></h1>
+	  <xsl:if test="$author!=''"><h2><xsl:value-of select="$author"/></h2></xsl:if>
+	  <xsl:call-template name="first-slide"/>
+	</div>
+	<xsl:call-template name="slides"/>
+      </div>
+    </xsl:copy>
+  </xsl:template>
+
+</xsl:stylesheet>

data/plugins/filters/tilt.rb

@@ -0,0 +1,17 @@
+description 'Tilt filter'
+require 'tilt'
+
+class TiltFilter < Filter
+  def filter(context, content)
+    ::Tilt[name].new { content }.render
+  end
+end
+
+[:markdown, :textile, :sass, :scss, :less, :rdoc, :coffee, :mediawiki].each do |name|
+  begin
+    ::Tilt[name].new { '' } # Force initialization of tilt library
+    Filter.register(name, TiltFilter)
+  rescue Exception => ex
+    Olelo.logger.warn "Could not load Tilt filter #{name}"
+  end
+end

data/plugins/filters/toc.rb

@@ -0,0 +1,50 @@
+description  'Auto-generated table of contents'
+dependencies 'utils/xml'
+
+Page.attributes do
+  boolean :toc
+end
+
+Filter.create :toc do |context, content|
+  return content if !context.page.attributes['toc']
+
+  doc = XML::Fragment(content)
+  toc = ''
+  level = 0
+  count = [0]
+
+  elem = doc.css('h1, h2, h3, h4, h5, h6').first
+  offset = elem ? elem.name[1..1].to_i - 1 : 0
+
+  doc.traverse do |child|
+    if child.name =~ /^h(\d)$/
+      nr = $1.to_i - offset
+      if nr > level
+        while nr > level
+          toc << (level == 0 ? '<ol class="toc">' : '<ol>')
+          count[level] = 0
+          level += 1
+          toc << '<li>' if nr > level
+        end
+      else
+        while nr < level
+          level -= 1
+          toc << '</li></ol>'
+        end
+        toc << '</li>'
+      end
+      count[level-1] += 1
+      headline = child.children.first ? child.children.first.inner_text : ''
+      section = ['sec', count[0..level-1], headline.strip.gsub(/[^\w]/, '-')].flatten.join('-').downcase
+      toc << %{<li class="toc#{level-offset+1}"><a href="##{section}">#{headline}</a>}
+      child.inner_html = %{<span class="number" id="#{section}">#{count[0..level-1].join('.')}</span> #{child.inner_html}}
+    end
+  end
+
+  while level > 0
+    level -= 1
+    toc << '</li></ol>'
+  end
+
+  toc + doc.to_xhtml
+end

data/plugins/filters/xhtml2latex.xsl

@@ -0,0 +1,232 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!--
+  XHTML to LaTeX Stylesheet von Daniel Mendler <mail at daniel-mendler dot de> (2008)
+-->
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+		xmlns:xhtml="http://www.w3.org/1999/xhtml" version="1.0"
+		xmlns:chr="http://character-table/">
+
+  <xsl:output method="text"/>
+  <xsl:strip-space elements="*"/>
+  <xsl:param name="root_path" />
+  <xsl:param name="http_host" />
+
+  <chr:char-table>
+    <chr:char val="&amp;"  rep="\&amp;" />
+    <chr:char val="$"      rep="\$" />
+    <chr:char val="#"      rep="\#" />
+    <chr:char val="%"      rep="\%" />
+    <chr:char val="_"      rep="\_" />
+    <chr:char val="{"      rep="\{" />
+    <chr:char val="}"      rep="\}" />
+    <chr:char val="^"      rep="\^" />
+    <chr:char val="~"      rep="\~" />
+    <chr:char val="\"      rep="\textbackslash " />
+    <chr:char val="&quot;" rep="&apos;&apos;" />
+    <chr:char val="°"     rep="$^{\circ}$" />
+  </chr:char-table>
+
+  <xsl:template name="string-escape">
+    <xsl:param name="string" />
+    <xsl:param name="table" select="document('')/xsl:stylesheet/chr:char-table" />
+
+    <xsl:variable name="len" select="string-length($string)" />
+
+    <xsl:if test="$len &gt; 0">
+      <xsl:variable name="chr" select="substring($string, 1, 1)" />
+      <xsl:variable name="rep" select="string($table/chr:char[@val = $chr]/@rep)" />
+      <xsl:choose>
+        <xsl:when test="string($rep) = ''">
+          <xsl:value-of select="$chr" />
+        </xsl:when>
+        <xsl:otherwise>
+          <xsl:value-of select="$rep" />
+        </xsl:otherwise>
+      </xsl:choose>
+
+      <xsl:call-template name="string-escape">
+        <xsl:with-param name="string" select="substring($string, 2, $len div 2)" />
+        <xsl:with-param name="table"  select="$table" />
+      </xsl:call-template>
+
+      <xsl:call-template name="string-escape">
+        <xsl:with-param name="string" select="substring($string, 2 + $len div 2, $len div 2)" />
+        <xsl:with-param name="table"  select="$table" />
+      </xsl:call-template>
+    </xsl:if>
+  </xsl:template>
+
+  <xsl:template name="include-image">
+    <xsl:param  name="src" />
+    <xsl:choose>
+      <xsl:when test="contains($src, '?')">
+        <xsl:text>\includegraphics{</xsl:text><xsl:value-of select="substring-before($src, '?')"/><xsl:text>}</xsl:text>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:text>\includegraphics{</xsl:text><xsl:value-of select="$src"/><xsl:text>}</xsl:text>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template match="//text()">
+    <xsl:call-template name="string-escape">
+      <xsl:with-param name="string" select="."/>
+    </xsl:call-template>
+  </xsl:template>
+
+  <xsl:template match="xhtml:html">\documentclass[a4paper,10pt]{article}
+\usepackage[utf8]{inputenc}
+\usepackage[ngerman]{babel}
+\usepackage{longtable}
+\usepackage[pdftex]{graphicx}
+\usepackage{float}
+\usepackage[colorlinks=true,urlcolor=blue,linkcolor=blue]{hyperref}
+\usepackage{geometry}
+\geometry{a4paper,left=2cm,right=2cm,top=2cm,bottom=2cm}
+\setlength{\parindent}{0pt}
+\renewcommand{\familydefault}{phv}
+\renewcommand{\rmdefault}{phv}
+\usefont{\encodingdefault}{\familydefault}{\seriesdefault}{\shapedefault}
+\graphicspath{
+  {<xsl:value-of select="$root_path"/>}
+}
+
+\begin{document}
+
+<xsl:apply-templates select="xhtml:body"/>\end{document}
+</xsl:template>
+
+  <xsl:template match="xhtml:h1">
+    <xsl:text>\section*{</xsl:text>
+    <xsl:apply-templates/>
+    <xsl:text>}&#10;&#10;</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:h2">
+    <xsl:text>\subsection*{</xsl:text>
+    <xsl:apply-templates/>
+    <xsl:text>}&#10;&#10;</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:h3">
+    <xsl:text>\subsubsection*{</xsl:text>
+    <xsl:apply-templates/>
+    <xsl:text>}&#10;&#10;</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:br">
+    <xsl:text>&#10;&#10;</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:em">
+    <xsl:text>{\em </xsl:text>
+    <xsl:apply-templates/>
+    <xsl:text>}</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:img[@class='math']">
+    <xsl:text>\begin{equation}</xsl:text>
+    <xsl:value-of select="@alt"/>
+    <xsl:text>\end{equation}</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:table//xhtml:img">
+    <xsl:call-template name="include-image">
+      <xsl:with-param name="src" select="@src"/>
+    </xsl:call-template>
+  </xsl:template>
+
+  <xsl:template match="xhtml:img">
+    <xsl:text>\begin{figure}</xsl:text>
+    <xsl:text>\centering</xsl:text>
+    <xsl:call-template name="include-image">
+      <xsl:with-param name="src" select="@src"/>
+    </xsl:call-template>
+    <xsl:text>\end{figure}</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:strong">
+    <xsl:text>{\bf </xsl:text>
+	<xsl:apply-templates/>
+	<xsl:text>}</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:p">
+    <xsl:text>\par&#10;</xsl:text>
+    <xsl:apply-templates/>
+    <xsl:text>&#10;\par&#10;&#10;</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:a">
+    <xsl:choose>
+      <xsl:when test="starts-with(@href, 'http') or starts-with(@href, 'mailto')">
+        <xsl:text>\href{</xsl:text><xsl:value-of select="@href"/>}{<xsl:apply-templates/><xsl:text>}</xsl:text>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:text>\href{</xsl:text><xsl:value-of select="concat($http_host, @href)"/>}{<xsl:apply-templates/><xsl:text>}</xsl:text>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template match="xhtml:select|xhtml:input"/>
+
+  <xsl:template match="xhtml:table">
+    <xsl:text>\begin{table}[H]</xsl:text>
+    <xsl:for-each select="xhtml:caption">
+      <xsl:text>\caption{</xsl:text>
+      <xsl:apply-templates/>
+      <xsl:text>}&#10;</xsl:text>
+    </xsl:for-each>
+    <xsl:text>\begin{longtable}{|</xsl:text>
+    <xsl:for-each select="//xhtml:tr[1]/*">
+      <xsl:text>l|</xsl:text>
+    </xsl:for-each>
+    <xsl:text>}&#10;</xsl:text>
+    <xsl:apply-templates select="*[not(self::xhtml:caption)]"/>
+    <xsl:text>\hline&#10;</xsl:text>
+    <xsl:text>\end{longtable}&#10;\end{table}&#10;</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:thead">
+    <xsl:apply-templates/>
+    \hline&#10;
+  </xsl:template>
+
+  <xsl:template match="xhtml:tr">
+    <xsl:text>\hline&#10;</xsl:text>
+    <xsl:for-each select="*">
+      <xsl:if test="@colspan">\multicolumn{<xsl:value-of select="@colspan"/>}{l|}{</xsl:if>
+      <xsl:if test="name() = 'th'">{\bf </xsl:if>
+      <xsl:apply-templates />
+      <xsl:if test="name() = 'th'">}</xsl:if>
+      <xsl:if test="@colspan">}</xsl:if>
+      <xsl:if test="position() != last()">
+        <xsl:text> &amp; </xsl:text>
+      </xsl:if>
+    </xsl:for-each>
+    <xsl:text> \\&#10;</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:ul">
+    <xsl:text>\begin{itemize}&#10;</xsl:text>
+    <xsl:for-each select="xhtml:li">
+      <xsl:text>  \item{</xsl:text>
+      <xsl:apply-templates />
+      <xsl:text>}&#10;</xsl:text>
+    </xsl:for-each>
+    <xsl:text>\end{itemize}&#10;&#10;</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="xhtml:ol">
+    <xsl:text>\begin{enumerate}
+    </xsl:text>
+    <xsl:for-each select="xhtml:li">
+      <xsl:text>\item </xsl:text>
+      <xsl:apply-templates />
+    </xsl:for-each>
+    <xsl:text>
+      \end{enumerate}
+    </xsl:text>
+  </xsl:template>
+
+</xsl:stylesheet>