erubis 1.1.0 → 2.0.0

data/examples/Makefile

@@ -0,0 +1,53 @@
+all = example.rb example.php example.c example.java example.scm example.pl example.js
+
+all:  $(all)
+
+example.rb:   example.eruby
+	erubis -l ruby example.eruby > example.rb
+
+
+example.php:  example.ephp
+	erubis -l php example.ephp > example.php
+
+example.c:    example.ec
+	erubis -l c example.ec > example.c
+
+example.java: example.ejava
+	erubis -l java example.ejava > example.java
+
+example.scm:  example.escheme
+	erubis -l scheme --func=display example.escheme > example.scm
+#	erubis -l scheme example.escheme > example.scm
+
+example.pl:   example.eperl
+	erubis -l perl example.eperl > example.pl
+
+example.js:   example.ejavascript
+	erubis -l javascript example.ejavascript > example.js
+
+
+###----------
+
+src = example.eruby example.ephp example.ec example.ejava example.escheme example.eperl example.ejavascript Makefile
+
+clean:
+	rm -f `ruby -e 'puts(Dir.glob("*.*") - %w[$(src)])'`
+#	rm -f $(all)
+
+compile:  a.out example.class
+
+a.out:   example.c
+	cc example.c
+
+example.class:  example.java
+	jikes example.java
+
+output:  $(all) a.out example.class
+	erubis example.eruby > example.ruby.out
+	php example.php > example.php.out
+	./a.out foo bar baz > example.c.out
+	java example > example.java.out
+	gosh example.scm > example.scm.out
+#	guile example.scm > example.scm.out
+	perl example.pl > example.pl.out
+

data/examples/example.ec

@@ -0,0 +1,24 @@
+<%
+#include <stdio.h>
+
+int main(int argc, char *argv[])
+{
+    int i;
+
+%>
+<p>Hello <%= "%s", argv[0] %>!</p>
+<table>
+  <tbody>
+    <% for (i = 1; i < argc; i++) { %>
+    <tr bgcolor="<%= i % 2 == 0 ? "#FFCCCC" : "#CCCCFF" %>">
+      <td><%= "%d", i %></td>
+      <td><%= "%s", argv[i] %></td>
+    </tr>
+    <% } %>
+  </tbody>
+</table>
+<%
+
+    return 0; 
+}
+%>

data/examples/example.ejava

@@ -0,0 +1,41 @@
+<%
+import java.util.*;
+
+public class example {
+
+  public static void main(String[] args) {
+    String user = "Erubis";
+    String[] list = { "<aaa>", "b&b", "\"ccc\"" };
+    StringBuffer _buf = new StringBuffer();
+%>
+<p>Hello <%= user %>!</p>
+<table>
+  <tbody>
+    <% for (int i = 0; i < list.length; i++) { %>
+    <tr bgcolor="<%= i % 2 == 0 ? "#FFCCCC" : "#CCCCFF" %>">
+      <td><%= i + 1 %></td>
+      <td><%== list[i] %></td>
+    </tr>
+    <% } %>
+  </tbody>
+</table>
+<%
+    System.out.print(_buf.toString());
+  }
+
+  public static String escape(String s) {
+    StringBuffer sb = new StringBuffer();
+    for (int i = 0; i < s.length(); i++) {
+      char ch = s.charAt(i);
+      switch (ch) {
+      case '<':   sb.append("&lt;"); break;
+      case '>':   sb.append("&gt;"); break;
+      case '&':   sb.append("&amp;"); break;
+      case '"':   sb.append("&quot;"); break;
+      default:    sb.append(ch);
+      }
+    }
+    return sb.toString();
+  }
+}
+%>

data/examples/example.ejavascript

@@ -0,0 +1,16 @@
+<%
+   var user = 'Erubis';
+   var list = ['<aaa>', 'b&b', '"ccc"'];
+ %>
+<p>Hello <%= user %>!</p>
+<table>
+  <tbody>
+    <% var i; %>
+    <% for (i = 0; i < list.length; i++) { %>
+    <tr bgcolor="<%= i % 2 == 0 ? '#FFCCCC' : '#CCCCFF' %>">
+      <td><%= i + 1 %></td>
+      <td><%= list[i] %></td>
+    </tr>
+    <% } %>
+  </tbody>
+</table>

data/examples/example.eperl

@@ -0,0 +1,16 @@
+<%
+   my $user = 'Erubis';
+   my @list = ('<aaa>', 'b&b', '"ccc"');
+%>
+<p>Hello <%= $user %>!</p>
+<table>
+  <tbody>
+    <% $i = 0; %>
+    <% for $item (@list) { %>
+    <tr bgcolor=<%= ++$i % 2 == 0 ? '#FFCCCC' : '#CCCCFF' %>">
+      <td><%= $i %></td>
+      <td><%= $item %></td>
+    </tr>
+    <% } %>
+  </tbody>
+</table>

data/examples/example.ephp

@@ -0,0 +1,17 @@
+<%
+   $user = "World";
+   $list = array('<aaa>', 'b&b', '"ccc"');
+%>
+<p>Hello <%= $user %>!</p>
+<table>
+  <tbody>
+    <% $i = 0 %>
+    <% foreach ($list as $item) { %>
+    <%   $i++; %>
+    <tr bgcolor="<%= $i % 2 == 0 ? '#FFCCCC' : '#CCCCFF' %>">
+      <td><%= $i %></td>
+      <td><%== $item %></td>
+    </tr>
+    <% } %>
+  </tbody>
+</table>

data/examples/example.eruby

@@ -0,0 +1,15 @@
+<%
+   user = 'Erubis'
+   list = ['<aaa>', 'b&b', '"ccc"']
+ %>
+<p>Hello <%= user %>!</p>
+<table>
+  <tbody>
+    <% list.each_with_index do |item, i| %>
+    <tr bgcolor="<%= i % 2 == 0 ? '#FFCCCC' : '#CCCCFF' %>">
+      <td><%= i + 1 %></td>
+      <td><%== item %></td>
+    </tr>
+    <% end %>
+  </tbody>
+</table>

data/examples/example.escheme

@@ -0,0 +1,26 @@
+<%
+(let ((user "Erubis")
+      (items '("<aaa>" "b&b" "\"ccc\""))
+      (i 0))
+ %>
+<p>Hello <%= user %>!</p>
+<table>
+  <tbody>
+<%
+  (for-each
+   (lambda (item)
+     (set! i (+ i 1))
+ %>
+    <tr bgcolor="<%= (if (= (modulo i 2) 0) "#FFCCCC" "#CCCCFF") %>">
+      <td><%= i %></td>
+      <td><%= item %></td>
+    </tr>
+<%
+   ) ; lambda end
+   items) ; for-each end
+ %>
+  </tbody>
+</table>
+<%
+) ; let end
+%>

data/lib/erubis.rb

@@ -1,6 +1,6 @@
 ##
-## $Rev: 5 $
-## $Release: 1.1.0 $
+## $Rev: 21 $
+## $Release: 2.0.0 $
 ## copyright(c) 2006 kuwata-lab all rights reserved.
 ##
 
@@ -9,294 +9,62 @@
 ##
 ## * class Eruby - normal eRuby class
 ## * class XmlEruby - eRuby class which escape '&<>"' into '&amp;&lt;&gt;&quot;'
-## * module FastEnhancer - make eRuby faster
-## * module StdoutEnhance - use $stdout instead of String as output
-## * module PrintEnhance - enable to write print statement in <% ... %>
+## * module StdoutEnhancer - use $stdout instead of String as output
+## * module PrintEnhancer - enable to write print statement in <% ... %>
+## * class OptimizedEruby - optimized Eruby class faster than FastEruby
+## * class OptimizedXmlEruby - optimized XmlEruby class faster than FastXmlEruby
 ##
 ## example:
-##   list = ['<aaa>', 'b&b', '"ccc"']
-##   input = <<-END
+##   input = <<'END'
 ##    <ul>
-##     <% for item in list %>
+##     <% for item in @list %>
 ##      <li><%= item %>
 ##          <%== item %></li>
 ##     <% end %>
 ##    </ul>
 ##   END
-##   eruby = Erubis::XmlEruby.new(input)
+##   list = ['<aaa>', 'b&b', '"ccc"']
+##   eruby = Erubis::Eruby.new(input)
 ##   puts "--- source ---"
 ##   puts eruby.src
 ##   puts "--- result ---"
-##   puts eruby.result(binding())
-##   # or puts eruby.evaluate(:list=>list)
+##   puts eruby.evaluate(:list=>list)
+##   # or puts eruby.result(binding())
 ##
 ## result:
 ##   --- source ---
-##   _out = ""; _out << " <ul>\n"
+##   _buf = ""; _buf << " <ul>\n"
 ##      for item in list
-##   _out << "   <li>"; _out << Erubis::XmlEruby.escape( item ); _out << "\n"
-##   _out << "       "; _out << ( item ).to_s; _out << "</li>\n"
+##   _buf << "   <li>"; _buf << ( item ).to_s; _buf << "\n"
+##   _buf << "       "; _buf << Erubis::XmlEruby.escape( item ); _buf << "</li>\n"
 ##      end
-##   _out << " </ul>\n"
-##   _out
+##   _buf << " </ul>\n"
+##   _buf
 ##   --- result ---
 ##    <ul>
-##      <li>&lt;aaa&gt;
-##          <aaa></li>
-##      <li>b&amp;b
-##          b&b</li>
-##      <li>&quot;ccc&quot;
-##          "ccc"</li>
+##      <li><aaa>
+##          &lt;aaa&gt;</li>
+##      <li>b&b
+##          b&amp;b</li>
+##      <li>"ccc"
+##          &quot;ccc&quot;</li>
 ##    </ul>
 ##
 
-module Erubis
-
-
-  ##
-  ## base class
-  ##
-  class Eruby
-
-    def initialize(input, options={})
-      #@input    = input
-      @pattern  = options[:pattern]  || '<% %>'
-      @filename = options[:filename]
-      @trim     = options[:trim] != false
-      @src      = compile(input)
-    end
-    attr_reader :src
-    attr_accessor :filename
-
-    def self.load_file(filename, options={})
-      input = File.open(filename, 'rb') { |f| f.read }
-      options[:filename] = filename
-      eruby = self.new(input, options)
-      return eruby
-    end
-
-    def result(binding=TOPLEVEL_BINDING)
-      filename = @filename || '(erubis)'
-      eval @src, binding, filename
-    end
-
-    def evaluate(_context={})
-      _evalstr = ''
-      _context.keys.each do |key|
-        _evalstr << "#{key.to_s} = _context[#{key.inspect}]\n"
-      end
-      eval _evalstr
-      return result(binding())
-    end
-
-    #private
-
-    def compile(input)
-      src = ""
-      initialize_src(src)
-      prefix, postfix = @pattern.split()
-      regexp = /(.*?)(^[ \t]*)?#{prefix}(=+|\#)?(.*?)#{postfix}([ \t]*\r?\n)?/m
-      input.scan(regexp) do |text, head_space, indicator, code, tail_space|
-        ## * when '<%= %>', do nothing
-        ## * when '<% %>' or '<%# %>', delete spaces iff only spaces are around '<% %>'
-        if indicator && indicator[0] == ?=
-          flag_trim = false
-        else
-          flag_trim = @trim && head_space && tail_space
-        end
-        #flag_trim = @trim && !(indicator && indicator[0]==?=) && head_space && tail_space
-        add_src_text(src, text)
-        add_src_text(src, head_space) if !flag_trim && head_space
-        if !indicator             # <% %>
-          code = "#{head_space}#{code}#{tail_space}" if flag_trim
-          add_src_code(src, code)
-        elsif indicator[0] == ?=  # <%= %>
-          add_src_expr(src, code, indicator)
-        else                      # <%# %>
-          n = code.count("\n")
-          n += tail_space.count("\n") if tail_space
-          add_src_code(src, "\n" * n)
-        end
-        add_src_text(src, tail_space) if !flag_trim && tail_space
-      end
-      rest = $' || input
-      add_src_text(src, rest)
-      finalize_src(src)
-      return src
-    end
-
-    protected
-
-    def initialize_src(src)
-      src << "_out = ''; "
-    end
-
-    def add_src_text(src, text)
-      #return if text.empty?
-      text.each_line do |line|
-        src << "_out << #{line.dump}" << (line[-1] == ?\n ? "\n" : "; ")
-      end
-    end
-
-    def add_src_expr(src, code, indicator)
-      src << "_out << (#{code}).to_s; "
-    end
-
-    def add_src_code(src, code)
-      code.each_line { |line| src << line }
-      src << "; " unless code[-1] == ?\n
-    end
-
-    def finalize_src(src)
-      src << "_out\n"
-    end
-
-  end  # end of class Eruby
-
-
-  ##
-  ## do sanitizing of <%= %>
-  ##
-  class XmlEruby < Eruby
-
-    def self.escape(obj)
-      str = obj.to_s.dup
-      #str = obj.to_s
-      #str = str.dup if obj.__id__ == str.__id__
-      str.gsub!(/&/, '&amp;')
-      str.gsub!(/</, '&lt;')
-      str.gsub!(/>/, '&gt;')
-      str.gsub!(/"/, '&quot;')   #"
-      return str
-    end
-
-    def add_src_expr(src, code, indicator)
-      case indicator
-      when '='    # <%= %>
-        src << "_out << Erubis::XmlEruby.escape(#{code}); "
-      when '=='   # <%== %>
-        super
-      when '==='  # <%=== %>
-        code.strip!
-        s = code.dump
-        s.sub!(/\A"/, '')
-        s.sub!(/"\z/, '')
-        src << "$stderr.puts(\"** erubis: #{s} = \#{(#{code}).inspect}\"); "
-      else
-        # nothing
-      end
-    end
-
-  end  # end of class XmlEruby
-
-
-  ##
-  ## make Eruby faster
-  ##
-  module FastEnhancer
-
-    def add_src_text(src, text)
-      return if text.empty?
-      #src << "_out << #{text.dump}" << (text[-1] == ?\n ? "\n" : "; ")
-      src << "_out << #{text.dump}"
-      n = text.count("\n")
-      src << ("\n" * n)
-      src << "; " if n == 0
-    end
-
-  end
-
-
-  ##
-  ## use $stdout instead of string
-  ##
-  module StdoutEnhancer
-
-    def initialize_src(src)
-      src << "_out = $stdout; "
-    end
-
-    def finalize_src(src)
-      src << "nil\n"
-    end
-
-  end
-
-
-  ##
-  ## print function is available.
-  ## 
-  ## Notice: use Eruby#evaluate() and don't use Eruby#result()
-  ## to be enable print function.
-  ##
-  module PrintEnhancer
-
-    def initialize_src(src)
-      src << "@_out = _out = ''; "
-    end
-
-    def print(arg)
-      @_out << arg.to_s
-    end
-
-    def result(binding=TOPLEVEL_BINDING)
-      filename = @filename || '(erubis)'
-      eval @src, binding, filename
-    end
-
-  end
-
-
-  class FastEruby < Eruby
-    include FastEnhancer
-  end
-
-
-  class StdoutEruby < Eruby
-    include StdoutEnhancer
-  end
-
-
-  class PrintEruby < Eruby
-    include PrintEnhancer
-  end
-
-
-  class FastXmlEruby < XmlEruby
-    include FastEnhancer
-  end
-
-
-  class StdoutXmlEruby < XmlEruby
-    include StdoutEnhancer
-  end
-
-
-  class PrintXmlEruby < XmlEruby
-    include PrintEnhancer
-  end
-
-
-end
-
-
-if __FILE__ == $0
 
-  list = ['<aaa>', 'b&b', '"ccc"']
-  input = <<-END
- <ul>
-  <% for item in list %>
-   <li><%= item %>
-       <%== item %></li>
-  <% end %>
- </ul>
-END
+require 'erubis/engine'
+require 'erubis/helper'
+require 'erubis/enhancer'
+#require 'erubis/tiny'
+require 'erubis/engine/eruby'
+#require 'erubis/engine/enhanced'    # enhanced eruby engines
+#require 'erubis/engine/optimized'   # generates optimized ruby code
+#require 'erubis/engine/ephp'
+#require 'erubis/engine/ec'
+#require 'erubis/engine/ejava'
+#require 'erubis/engine/escheme'
+#require 'erubis/engine/eperl'
+#require 'erubis/engine/ejavascript'
 
-  eruby = Erubis::XmlEruby.new(input)
-  puts "--- source ---"
-  puts eruby.src
-  puts "--- result ---"
-  #puts eruby.result(binding())
-  puts eruby.evaluate(:list=>list)
 
-end
+require 'erubis/local-setting'