xsltgem 0.0.1

data/.gitignore

@@ -0,0 +1,14 @@
+*.gem
+.bundle
+Gemfile.lock
+pkg/*
+db/*.sqlite3*
+log/*.log
+*.log
+/tmp/
+doc/
+*.swp
+*~
+.project
+.DS_Store
+.idea

data/Gemfile

@@ -0,0 +1,5 @@
+source "http://rubygems.org"
+
+# Specify your gem's dependencies in xsltgem.gemspec
+gemspec
+gem 'xml_serialization'

data/Rakefile

@@ -0,0 +1,14 @@
+require "bundler/gem_tasks"
+require 'rake'
+require 'rake/testtask'
+
+
+desc 'Default: run unit tests.'
+task :default => :test
+
+desc 'Test the xslt_render plugin.'
+Rake::TestTask.new(:test) do |t|
+  t.libs << 'lib'
+  t.test_files = 'test/*_test.rb'
+  t.verbose = true
+end

data/assets/json_params.xsl

@@ -0,0 +1,68 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<xsl:stylesheet version="1.0"
+  xmlns="http://www.w3.org/1999/xhtml" 
+  xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
+
+  <xsl:template mode="json" match="*[@type='date']">
+    <xsl:value-of select="translate(name(), '-', '_')" />
+    <xsl:text>: new Date("</xsl:text>
+    <xsl:value-of select="translate(., '-', '/')" />
+    <xsl:text>")</xsl:text>
+  </xsl:template>
+
+  <xsl:template mode="json" match="*[@type='datetime']">
+    <xsl:variable name="date"
+      select="translate(substring-before(., 'T'), '-', '/')"
+    />
+    <xsl:variable name="full-time" select="substring-after(., 'T')" />
+    <xsl:variable name="time">
+      <xsl:choose>
+        <xsl:when test="contains($full-time, '-')">
+          <xsl:value-of select="substring-before($full-time, '-')" />
+        </xsl:when>
+        <xsl:otherwise>
+          <xsl:value-of select="substring-before($full-time, '+')" />
+        </xsl:otherwise>
+      </xsl:choose>
+    </xsl:variable>
+    <xsl:variable name="time-zone" 
+      select="substring-after($full-time,$time)"
+    />
+    <xsl:value-of select="translate(name(), '-', '_')" />
+    <xsl:text>: new Date("</xsl:text>
+    <xsl:value-of select="$date" />
+    <xsl:text> </xsl:text>
+    <xsl:value-of select="$time" />
+    <xsl:text> </xsl:text>
+    <xsl:value-of select="$time-zone" />
+    <xsl:text>")</xsl:text>
+  </xsl:template>
+
+  <xsl:template mode="json" 
+    match="*[@type='integer']|*[@type='float']|*[@type='boolean']">
+    <xsl:value-of select="translate(name(), '-', '_')" />
+    <xsl:text>: </xsl:text>
+    <xsl:value-of select="." />
+  </xsl:template>
+
+  <xsl:template mode="json" priority="-1" 
+    match="*[count(./text()) = 1][count(./*) = 0]">
+    <xsl:value-of select="translate(name(), '-', '_')" />
+    <xsl:text>: "</xsl:text>
+    <xsl:value-of select="." />
+    <xsl:text>"</xsl:text>
+  </xsl:template>
+
+  <xsl:template priority="-2" mode="json" match="*">
+    <xsl:value-of select="translate(name(), '-', '_')" />
+    <xsl:text>: {</xsl:text>
+    <xsl:for-each select="*[position()&lt;last()]">
+      <xsl:apply-templates mode="json" select="." />
+      <xsl:text>,
+      </xsl:text>
+    </xsl:for-each>
+    <xsl:apply-templates mode="json" select="*[last()]" />
+    <xsl:text>}</xsl:text>
+  </xsl:template>
+
+</xsl:stylesheet>

data/assets/xslt_helpers.xsl

@@ -0,0 +1,187 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- RAILS view helpers -->
+<xsl:stylesheet version="1.0"
+                xmlns="http://www.w3.org/1999/xhtml" 
+                xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
+
+  <xsl:template name="link-to">
+    <xsl:param name="text" />
+    <xsl:param name="base" />
+    <a>
+      <xsl:attribute name="href">
+        <xsl:value-of select="/*/url-root" />/<xsl:value-of select="$base" />
+      </xsl:attribute>
+      <xsl:if test="/*/frame-target">
+        <xsl:attribute name="target"><xsl:value-of select="/*/frame-target" /></xsl:attribute>
+      </xsl:if>
+      <xsl:value-of select="$text" />
+    </a>
+  </xsl:template>
+
+  <xsl:template name="form-attributes">
+    <xsl:param name="method">post</xsl:param>
+    <xsl:param name="base" />
+    <xsl:attribute name="method"><xsl:value-of select="$method" /></xsl:attribute>
+    <xsl:attribute name="action">
+      <xsl:value-of select="/*/url-root" />/<xsl:value-of select="$base" />
+    </xsl:attribute>
+  </xsl:template>
+
+  <xsl:template name="img-path">
+    <xsl:param name="file" />
+    <xsl:value-of select="/*/url-root" />/images/<xsl:value-of select="$file" />
+  </xsl:template>
+
+  <xsl:template name="img-src">
+    <xsl:param name="file" />
+    <xsl:attribute name="src">
+      <xsl:call-template name="img-path">
+        <xsl:with-param name="file" select="$file" />
+      </xsl:call-template>
+    </xsl:attribute>
+  </xsl:template>
+
+  <xsl:template name="url">
+    <xsl:param name="base" />
+    <xsl:value-of select="/*/url-root" />/<xsl:value-of select="$base" />
+  </xsl:template>
+
+  <xsl:template name="button-to">
+    <xsl:param name="text" />
+    <xsl:param name="base" />
+    <form method="post" class="button-to">
+      <xsl:call-template name="form-attributes">
+        <xsl:with-param name="base"><xsl:value-of select="$base" /></xsl:with-param>
+      </xsl:call-template>
+      <div>
+        <input type="submit">
+          <xsl:attribute name="value" >
+            <xsl:value-of select="$text" />
+          </xsl:attribute>
+        </input>
+      </div>
+    </form>
+  </xsl:template>
+
+  <xsl:template name="javascript-body">
+    <xsl:param name="body" />
+    <script type="text/javascript"><xsl:text disable-output-escaping="yes">
+        // &lt;![CDATA[
+      </xsl:text><xsl:value-of select="$body" /><xsl:text disable-output-escaping="yes">
+        // ]]&gt;
+    </xsl:text></script>
+  </xsl:template>
+
+  <!-- TODO: salt the stylesheet and javascript links -->
+  <xsl:template match="stylesheet">
+    <xsl:call-template name="stylesheet">
+      <xsl:with-param name="sheet" select="." />
+    </xsl:call-template>
+  </xsl:template>
+
+  <xsl:template match="javascript|default-javascript">
+    <xsl:call-template name="javascript">
+      <xsl:with-param name="script" select="." />
+    </xsl:call-template>
+  </xsl:template>
+
+  <xsl:template name="stylesheet">
+    <xsl:param name="sheet" />
+    <link media="screen" rel="stylesheet" type="text/css">
+      <xsl:choose>
+        <xsl:when test="starts-with($sheet,'http')">
+          <xsl:attribute name="href"><xsl:value-of select="$sheet" /></xsl:attribute>
+        </xsl:when>
+        <xsl:otherwise>
+          <xsl:attribute name="href">
+            <xsl:value-of select="/*/url-root" />/stylesheets/<xsl:value-of select="$sheet" />
+            <xsl:if test="not(contains($sheet,'.css'))">
+              <xsl:text>.css</xsl:text>
+            </xsl:if>
+          </xsl:attribute>
+        </xsl:otherwise>
+      </xsl:choose>
+    </link>
+  </xsl:template>
+
+  <xsl:template name="javascript-src">
+    <xsl:param name="script" />
+    <xsl:attribute name="src">
+      <xsl:value-of select="/*/url-root" />/javascripts/<xsl:value-of select="$script" />
+      <xsl:if test="not(contains($script,'.js'))">
+        <xsl:text>.js</xsl:text>
+      </xsl:if>
+    </xsl:attribute>
+  </xsl:template>
+
+  <xsl:template name="javascript">
+    <xsl:param name="script">defaults</xsl:param>
+    <xsl:choose>
+      <xsl:when test="$script='defaults'">
+        <xsl:apply-templates select="../../default-javascripts/*" />
+      </xsl:when>
+      <xsl:otherwise>
+        <script type="text/javascript">
+          <xsl:call-template name="javascript-src">
+            <xsl:with-param name="script" select="$script" />
+          </xsl:call-template>
+        </script>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template name="uri-delete-param">
+    <xsl:param name="param" />
+    <xsl:param name="base-uri" select="/*/request-uri" />
+    <xsl:variable name="param-equate" select="concat($param, '=')" />
+    <xsl:variable name="rest" select="substring-after(substring-after($base-uri, $param-equate), '&amp;')" />
+    <xsl:variable name="before" select="substring-before($base-uri, $param-equate)" />
+    <xsl:variable name="result" select="concat($before, $rest)" />
+    
+    <xsl:choose>
+      <xsl:when test="not(contains($base-uri, $param-equate))">
+        <xsl:value-of select="$base-uri" />
+      </xsl:when>
+      <xsl:when test="substring-after($result, '?') = ''">
+        <xsl:value-of select="substring-before($result, '?')" />
+      </xsl:when>
+      <xsl:when test="substring($result, string-length($result)) = '&amp;'">
+        <xsl:value-of select="substring($result, 1, string-length($result) - 1)" />
+      </xsl:when>
+      <xsl:otherwise><xsl:value-of select="$result" /></xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template name="uri-attribute-set-param">
+    <xsl:param name="param" />
+    <xsl:param name="value" />
+    <xsl:param name="attribute">href</xsl:param>
+    <xsl:param name="base-uri" select="/*/request-uri" />
+
+    <xsl:variable name="param-equate" select="concat($param, '=')" />
+    <xsl:attribute name="{$attribute}">
+      <xsl:choose>
+        <xsl:when test="contains($base-uri, $param-equate)">
+          <xsl:variable name="rest" select="substring-after(substring-after($base-uri, $param-equate), '&amp;')" />
+          <xsl:value-of select="concat(substring-before($base-uri, $param-equate), $param-equate, $value)" />
+          <xsl:if test="$rest">
+            <xsl:value-of select="concat('&amp;', $rest)" />
+          </xsl:if>
+        </xsl:when>
+        <xsl:otherwise>
+          <xsl:variable name="separator">
+            <xsl:choose>
+              <xsl:when test="contains($base-uri,'?')">
+                <xsl:text>&amp;</xsl:text>
+              </xsl:when>
+              <xsl:otherwise>
+                <xsl:text>?</xsl:text>
+              </xsl:otherwise>
+            </xsl:choose>
+          </xsl:variable>
+          <xsl:value-of select="concat($base-uri, $separator, $param-equate, $value)" />
+        </xsl:otherwise>
+      </xsl:choose>
+    </xsl:attribute>
+  </xsl:template>
+</xsl:stylesheet>

data/lib/xsltgem.rb

@@ -0,0 +1,128 @@
+require "xsltgem/version"
+
+module Xsltgem
+  require 'open3'
+  require 'pathname'
+  require 'rubygems'
+  require 'xml_serialization'
+
+  class XsltprocError < StandardError; end
+
+  module XSLTRender
+    attr_writer :xslt_root_dir
+
+    def instance_hash
+      hash = instance_variables.inject({}) do |vars, var|
+        key = var[1..-1]
+
+        # don't include "hidden" vars
+        value = instance_variable_get(var)
+        vars[key] = value unless '_' == key[0..0] or value.nil?
+        vars
+      end
+      # don't allow param keys that are not valid as XML tag names
+      hash['params'] = params.dup.delete_if {|(k,v)| k.to_s !~ /^[a-zA-Z][\w]*$/}
+      hash['flash'] = flash
+      hash['url_root'] = request.relative_url_root unless request.relative_url_root.blank?
+      hash['environment'] = RAILS_ENV
+      hash['default_javascripts'] = ActionView::Helpers::AssetTagHelper::JAVASCRIPT_DEFAULT_SOURCES
+      hash['timestamp'] = "#{Time.now.to_i}#{Time.now.tv_usec}"
+      hash['host'] = request.host
+      hash['request_uri'] = request.request_uri
+      hash
+    end
+
+    def page_xml(options={})
+      start = Time.now
+      options = {:root => 'page'}.merge options
+      vars = instance_hash
+      xml = vars.to_xml(:language => options[:language], :root => options[:root])
+      logger.info "XSLTRender.page_xml: #{Time.now - start}sec"
+      xml
+    end
+
+    def default_xslt_template
+      (Pathname.new(self.class.controller_name)+action_name).to_s
+    end
+
+    def xslt_root_dir=(value)
+      Pathname.new(value.to_s) unless value.kind_of? Pathname
+    end
+
+    # We put the xslt stylesheets in public so we could experiment
+    # with having the browser perform the xsl transformations.
+    def xslt_root_dir
+      @xslt_root_dir ||= Pathname.new(RAILS_ROOT)+'public'+'xslts'
+    end
+
+    XSLTPROC_ERRORS = {
+        1 => "No argument",
+        2 => "Too many parameters",
+        3 => "Unknown option",
+        4 => "Failed to parse the stylesheet",
+        5 => "Error in the stylesheet",
+        6 => "Error in one of the documents",
+        7 => "Unsupported xsl:output method",
+        8 => "String parameter contains both quote and double-quotes",
+        9 => "Internal processing error",
+        10 => "Processing was stopped by a terminating message",
+        11 => "Could not write the result to the output file",
+    }
+
+    def html_from_xml(xslt_file_name, xml, params = nil)
+      params ||= {}
+      cmd_params = params.map do |k,v|
+        "--stringparam '#{k}' '#{v}'"
+      end.join(' ')
+
+      xslt_cmd_string = %Q{xsltproc #{cmd_params} #{xslt_file_name} -; echo "::$?" 1>&2}
+      xslt_cmd = {}
+
+      # scope out variables that will be used outside the 'cd'
+      result = errors = error_code = nil
+
+      Open3.popen3(xslt_cmd_string) { |xslt_cmd|
+        begin
+          xslt_cmd[:in].write xml
+        rescue Errno::EPIPE
+        else
+          xslt_cmd[:in].close
+          result = xslt_cmd[:out].read
+        end
+
+        errors, error_code_string = xslt_cmd[:error].read.match(/\A(.*)\s*::(\d+)\s*\z/m).captures
+        error_code = error_code_string.to_i
+      }
+
+      unless 0 == error_code
+        raise XsltprocError, "xsltproc processing of '#{xslt_file_name}' failed: #{XSLTPROC_ERRORS[error_code]} (#{error_code})\n#{errors}"
+      end
+      result
+    end
+
+    def xslt_render(options = {})
+      options = {:root => 'page'}.merge(options)
+      template = options[:template] || default_xslt_template
+
+      full_template_path = nil
+      ["", ".xsl", ".html.xsl"].each do |ext|
+        if(full_path = (xslt_root_dir+(template + ext))).exist?
+          full_template_path = full_path
+        end
+      end
+
+      raise IOError, "XSLT template '#{template}' is missing" unless full_template_path
+
+      xml = options[:xml] || page_xml(options)
+      html = html_from_xml(full_template_path, xml, options[:params])
+
+      if options[:language]
+        plugin_root = (Pathname.new(__FILE__).dirname + '..').expand_path
+        term_path = TermLanguage.new(options[:language]).translation_file
+        i18n_path = plugin_root+'lib'+'xslts'+'i18n.xsl'
+        html = html_from_xml(i18n_path, html, 'termfile' => term_path)
+      end
+      render :text => html
+    end
+  end
+end

data/lib/xsltgem/version.rb

@@ -0,0 +1,3 @@
+module Xsltgem
+  VERSION = "0.0.1"
+end

data/lib/xslts/i18n.xsl

@@ -0,0 +1,124 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!--This stylesheet is used internally by the xslt plugin to do internationalization.-->
+<xsl:stylesheet version="1.0"
+  xmlns="http://www.w3.org/1999/xhtml"
+  xmlns:xhtml="http://www.w3.org/1999/xhtml"
+  xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+  xmlns:tr="http://www.hotelsearch.com/XMLSchema/2007/translation"
+  exclude-result-prefixes="tr">
+
+  <xsl:output indent="yes" method="xml" encoding="UTF-8"
+      doctype-public="-//W3C//DTD XHTML 1.0 Transitional//EN"
+      doctype-system="http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"
+  />
+
+  <xsl:param name="termfile" />
+  
+  <xsl:variable name="termdoc" select="document($termfile)" />
+  
+  <xsl:key name="terms" match="term" use="@name" />
+  
+  <xsl:variable name="language">
+    <xsl:for-each select="$termdoc">
+      <xsl:value-of select="/terms/@lang" />
+    </xsl:for-each>
+  </xsl:variable>
+
+  <xsl:template match="/">
+    <xsl:apply-templates select="*" />
+  </xsl:template>
+
+  <xsl:template match="tr:term">
+    <xsl:choose>
+      <xsl:when test="count(*)=0 and count(text())=1">
+        <xsl:variable name="term"><xsl:value-of select="text()" /></xsl:variable>
+        <xsl:variable name="pass-thru"><xsl:value-of select="@pass-thru" /></xsl:variable>
+        <xsl:for-each select="$termdoc">
+          <xsl:variable name="translation" select="key('terms', $term)" />
+          <xsl:choose>
+            <xsl:when test="$translation">
+              <xsl:value-of select="$translation" />
+            </xsl:when>
+            <xsl:when test="$pass-thru = 'true'">
+              <xsl:value-of select="$term" />
+            </xsl:when>
+          </xsl:choose>
+        </xsl:for-each>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:copy>
+          <xsl:apply-templates select="*|@*|text()" />
+        </xsl:copy>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template match="@*[starts-with(.,'tr:')]">
+    <xsl:variable name="term"><xsl:value-of select="substring(.,4)" /></xsl:variable>
+    <xsl:variable name="attrName"><xsl:value-of select="name()" /></xsl:variable>
+    <xsl:for-each select="$termdoc">
+      <xsl:attribute name="{$attrName}">
+        <xsl:value-of select="key('terms', $term)" />
+      </xsl:attribute>
+    </xsl:for-each>
+  </xsl:template>
+
+  <xsl:template match="tr:ordered">
+    <xsl:variable name="before"><xsl:value-of select="@before" /></xsl:variable>
+    <xsl:variable name="text"><xsl:value-of select="text()" /></xsl:variable>
+    <xsl:variable name="after"><xsl:value-of select="@after" /></xsl:variable>
+    <xsl:variable name="before-translation">
+      <xsl:for-each select="$termdoc">
+        <xsl:value-of select="key('terms', $before)" />
+      </xsl:for-each>
+    </xsl:variable>
+    <xsl:variable name="after-translation">
+      <xsl:for-each select="$termdoc">
+        <xsl:value-of select="key('terms', $after)" />
+      </xsl:for-each>
+    </xsl:variable>
+    <xsl:choose>
+      <xsl:when test="$language = 'ja'">
+        <xsl:value-of select="$after-translation" />
+        <xsl:value-of select="$text" /> 
+        <xsl:value-of select="$before-translation" />
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:if test="$before-translation != ''">
+          <xsl:value-of select="$before-translation" />
+          <xsl:text> </xsl:text>
+        </xsl:if>
+        <xsl:value-of select="$text" /> 
+        <xsl:if test="$after-translation != ''">
+          <xsl:text> </xsl:text>
+          <xsl:value-of select="$after-translation" />
+        </xsl:if>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template match="xhtml:div|xhtml:script|xhtml:span">
+    <xsl:copy>
+      <xsl:apply-templates select="@*" />
+      <xsl:choose>
+        <xsl:when test="count(*)=0 and count(text())=0">
+          <xsl:text> </xsl:text>
+        </xsl:when>
+        <xsl:otherwise>
+          <xsl:apply-templates select="*|text()" />        
+        </xsl:otherwise>
+      </xsl:choose>
+    </xsl:copy>
+  </xsl:template>
+
+  <xsl:template match="*">
+    <xsl:copy>
+      <xsl:apply-templates select="*|@*|text()" />
+    </xsl:copy>
+  </xsl:template>
+  
+  <xsl:template match="@*">
+    <xsl:copy />
+  </xsl:template>
+</xsl:stylesheet>
+