erubis 1.1.0 → 2.0.0

data/lib/erubis/engine/ejavascript.rb

@@ -0,0 +1,104 @@
+##
+## $Rev: 21 $
+## $Release: 2.0.0 $
+## copyright(c) 2006 kuwata-lab all rights reserved.
+##
+
+require 'erubis/engine'
+require 'erubis/enhancer'
+
+
+module Erubis
+
+
+  ##
+  ## engine for JavaScript
+  ##
+  class Ejavascript < Engine
+
+    def self.supported_properties()   # :nodoc:
+      list = super
+      #list << [:indent,   '',       "indent spaces (ex. '  ')"]
+      #list << [:buf,      '_buf',   "output buffer name"]
+      return list
+    end
+
+    def initialize(input, properties={})
+      @indent = properties[:indent] || ''
+      @buf = properties[:out] || '_buf'
+      #@bufclass = properties[:outclass] || 'StringBuffer'
+      super
+    end
+
+    def add_preamble(src)
+      src << "#{@indent}var #{@buf} = [];"
+    end
+
+    def escape_text(text)
+      @@table_ ||= { "\r"=>"\\r", "\n"=>"\\n\\\n", "\t"=>"\\t", '"'=>'\\"', "\\"=>"\\\\" }
+      return text.gsub!(/[\r\n\t"\\]/) { |m| @@table_[m] } || text
+    end
+
+    #--
+    #def escaped_expr(code)
+    #  @escape ||= 'escape'
+    #  return "#{@escape}(#{code.strip})"
+    #end
+    #++
+
+    def add_indent(src, indent)
+      src << (src.empty? || src[-1] == ?\n ? indent : ' ')
+    end
+
+    def add_text(src, text)
+      return if text.empty?
+      add_indent(src, @indent)
+      src << @buf << '.push("'
+      s = escape_text(text)
+      if s[-1] == ?\n
+        s[-2, 2] = ''
+        src << s << "\");\n"
+      else
+        src << s << "\");"
+      end
+    end
+
+    def add_stmt(src, code)
+      src << code
+    end
+
+    def add_expr_literal(src, code)
+      add_indent(src, @indent)
+      src << @buf << '.push(' << code.strip << ');'
+    end
+
+    def add_expr_escaped(src, code)
+      add_indent(src, @indent)
+      src << @buf << '.push(' << escaped_expr(code) << ');'
+    end
+
+    def add_expr_debug(src, code)
+      add_indent(src, @indent)
+      code.strip!
+      src << "alert(\"*** debug: #{code}=\"+(#{code}));"
+    end
+
+    def add_postamble(src)
+      src << "\n" if src[-1] == ?;
+      src << @indent << 'document.write(' << @buf << ".join(\"\"));\n"
+    end
+
+  end
+
+
+  class EscapedEjavascript < Ejavascript
+    include EscapeEnhancer
+  end
+
+
+  #class XmlEjavascript < Ejavascript
+  #  include EscapeEnhancer
+  #end
+
+
+end

data/lib/erubis/engine/enhanced.rb

@@ -0,0 +1,102 @@
+##
+## $Rev: 19 $
+## $Release: 2.0.0 $
+## copyright(c) 2006 kuwata-lab all rights reserved.
+##
+
+require 'erubis/enhancer'
+require 'erubis/engine/eruby'
+
+
+module Erubis
+
+
+  #--
+  ## moved to engine/ruby.rb
+  #class EscapedEruby < Eruby
+  #  include EscapeEnhancer
+  #end
+  #++
+
+
+  #--
+  ### (obsolete)
+  #class FastEruby < Eruby
+  #  include FastEnhancer
+  #end
+  #++
+
+
+  class StdoutEruby < Eruby
+    include StdoutEnhancer
+  end
+
+
+  class PrintOutEruby < Eruby
+    include PrintOutEnhancer
+  end
+
+
+  class PrintEnabledEruby < Eruby
+    include PrintEnabledEnhancer
+  end
+
+
+  class ArrayEruby < Eruby
+    include ArrayEnhancer
+  end
+
+
+  class ArrayBufferEruby < Eruby
+    include ArrayBufferEnhancer
+  end
+
+
+  class StringBufferEruby < Eruby
+    include StringBufferEnhancer
+  end
+
+
+  class StringIOEruby < Eruby
+    include StringIOEnhancer
+  end
+
+
+  class NoTextEruby < Eruby
+    include NoTextEnhancer
+  end
+
+
+  class SimplifiedEruby < Eruby
+    include SimplifyEnhancer
+  end
+
+
+  class StdoutSimplifiedEruby < Eruby
+    include StdoutEnhancer
+    include SimplifyEnhancer
+  end
+
+
+  class PrintOutSimplifiedEruby < Eruby
+    include PrintOutEnhancer
+    include SimplifyEnhancer
+  end
+
+
+  class BiPatternEruby < Eruby
+    include BiPatternEnhancer
+  end
+
+
+  class PercentLineEruby < Eruby
+    include PercentLineEnhancer
+  end
+
+
+  class HeaderFooterEruby < Eruby
+    include HeaderFooterEnhancer
+  end
+
+
+end

data/lib/erubis/engine/eperl.rb

@@ -0,0 +1,83 @@
+##
+## $Rev: 19 $
+## $Release: 2.0.0 $
+## copyright(c) 2006 kuwata-lab all rights reserved.
+##
+
+require 'erubis/engine'
+require 'erubis/enhancer'
+
+
+module Erubis
+
+
+  ##
+  ## engine for Perl
+  ##
+  class Eperl < Engine
+
+    def self.supported_properties()  # :nodoc:
+      list = super
+      list << [:func, 'print', "function name"]
+      return list
+    end
+
+    def initialize(input, properties={})
+      @func = properties[:func] || 'print'
+      super
+    end
+
+    def add_preamble(src)
+    end
+
+    def escape_text(text)
+      return text.gsub!(/['\\]/, '\\\\\&') || text
+    end
+
+    def add_text(src, text)
+      src << @func << "('" << escape_text(text) << "'); " unless text.empty?
+    end
+
+    #--
+    #def escaped_expr(code)
+    #  @escape ||= 'escape'
+    #  return "escape(#{code.strip})"
+    #end
+    #++
+
+    def add_expr_literal(src, code)
+      src << @func << "(" << code.strip << "); "
+    end
+
+    def add_expr_escaped(src, code)
+      src << @func << "(" << escaped_expr(code) << "); "
+    end
+
+    def add_expr_debug(src, code)
+      code.strip!
+      s = code.gsub(/\'/, "\\'")
+      src << @func << "('*** debug: #{code}=', #{code}, \"\\n\");"
+    end
+
+    def add_stmt(src, code)
+      src << code
+    end
+
+    def add_postamble(src)
+      src << "\n" unless src[-1] == ?\n
+    end
+
+  end
+
+
+  class EscapedEperl < Eperl
+    include EscapeEnhancer
+  end
+
+
+  #class XmlEperl < Eperl
+  #  include EscapeEnhancer
+  #end
+
+
+end

data/lib/erubis/engine/ephp.rb

@@ -0,0 +1,84 @@
+##
+## $Rev: 19 $
+## $Release: 2.0.0 $
+## copyright(c) 2006 kuwata-lab all rights reserved.
+##
+
+require 'erubis/engine'
+require 'erubis/enhancer'
+
+
+module Erubis
+
+
+  ##
+  ## engine for PHP
+  ##
+  class Ephp < Engine
+
+    def self.supported_properties()  # :nodoc:
+      return super
+    end
+
+    #--
+    #def add_preamble(src)
+    #end
+    #++
+
+    def escape_text(text)
+      return text.gsub!(/<\?xml\b/, '<<?php ?>?xml') || text
+    end
+
+    def add_text(src, text)
+      src << escape_text(text)
+    end
+
+    def escaped_expr(code)
+      @escape ||= 'htmlspecialchars'
+      return "#{@escape}(#{code.strip})"
+    end
+
+    def add_expr_literal(src, code)
+      src << "<?php echo #{code.strip}; ?>"
+    end
+
+    def add_expr_escaped(src, code)
+      src << "<?php echo #{escaped_expr(code)}; ?>"
+    end
+
+    def add_expr_debug(src, code)
+      code.strip!
+      s = code.gsub(/\'/, "\\'")
+      src << "<?php error_log('*** debug: #{s}='.(#{code}), 0); ?>"
+    end
+
+    def add_stmt(src, code)
+      src << "<?php"
+      src << " " if code[0] != ?\ #
+      if code[-1] == ?\n
+        code.chomp!
+        src << code << "?>\n"
+      else
+        src << code << "?>"
+      end
+    end
+
+    #--
+    #def add_postamble(src)
+    #end
+    #++
+
+  end
+
+
+  class EscapedEphp < Ephp
+    include EscapeEnhancer
+  end
+
+
+  #class XmlEphp < Ephp
+  #  include EscapeEnhancer
+  #end
+
+
+end

data/lib/erubis/engine/eruby.rb

@@ -0,0 +1,91 @@
+##
+## $Rev: 21 $
+## $Release: 2.0.0 $
+## copyright(c) 2006 kuwata-lab all rights reserved.
+##
+
+require 'erubis/engine'
+require 'erubis/enhancer'
+
+
+module Erubis
+
+
+  ##
+  ## engine for Ruby
+  ##
+  class Eruby < Engine
+    #include StringBufferEnhancer
+    include ArrayBufferEnhancer
+
+    def self.supported_properties()  # :nodoc:
+      return super
+    end
+
+    def escape_text(text)
+      text.gsub(/['\\]/, '\\\\\&')   # "'" => "\\'",  '\\' => '\\\\'
+    end
+
+    def escaped_expr(code)
+      @escape ||= "Erubis::XmlHelper.escape_xml"
+      return "#{@escape}(#{code})"
+    end
+
+    #--
+    #def add_preamble(src)
+    #  src << "_buf = [];"
+    #end
+    #++
+
+    def add_text(src, text)
+      src << " _buf << '" << escape_text(text) << "';" unless text.empty?
+    end
+
+    def add_stmt(src, code)
+      #src << code << ';'
+      src << code
+      src << ';' unless code[-1] == ?\n
+    end
+
+    def add_expr_literal(src, code)
+      src << ' _buf << (' << code << ').to_s;'
+    end
+
+    def add_expr_escaped(src, code)
+      src << ' _buf << ' << escaped_expr(code) << ';'
+    end
+
+    def add_expr_debug(src, code)
+      code.strip!
+      s = (code.dump =~ /\A"(.*)"\z/) && $1
+      src << ' $stderr.puts("*** debug: ' << s << '=#{(' << code << ').inspect}");'
+    end
+
+    #--
+    #def add_postamble(src)
+    #  src << "\n_buf.join\n"
+    #end
+    #++
+
+  end
+
+
+  ##
+  ## swtich '<%= %>' to escaped and '<%== %>' to not escaped
+  ##
+  class EscapedEruby < Eruby
+    include EscapeEnhancer
+  end
+
+
+  ##
+  ## sanitize expression (<%= ... %>) by default
+  ##
+  ## this is equivalent to EscapedEruby and is prepared only for compatibility.
+  ##
+  class XmlEruby < Eruby
+    include EscapeEnhancer
+  end
+
+
+end