jbarnette-johnson 1.0.0.200806240111

data/lib/johnson/visitors/enumerating_visitor.rb

@@ -0,0 +1,115 @@
+module Johnson
+  module Visitors
+    class EnumeratingVisitor
+      attr_accessor :block
+      def initialize(block)
+        @block = block
+      end
+
+      def visit_SourceElements(o)
+        block.call(o)
+        o.value.each { |x| x.accept(self) }
+        self
+      end
+
+      %w{
+        ArrayLiteral Comma Export FunctionCall Import New ObjectLiteral
+        VarStatement
+      }.each do |type|
+        define_method(:"visit_#{type}") do |o|
+          block.call(o)
+          o.value.each { |x| x.accept(self) }
+          self
+        end
+      end
+
+      %w{ Name Number Regexp String }.each do |type|
+        define_method(:"visit_#{type}") do |o|
+          block.call(o)
+          self
+        end
+      end
+
+      %w{ Break Continue False Null This True }.each do |type|
+        define_method(:"visit_#{type}") do |o|
+          block.call(o)
+          self
+        end
+      end
+
+      def visit_For(o)
+        block.call(o)
+        o.init && o.init.accept(self)
+        o.cond && o.cond.accept(self)
+        o.update && o.update.accept(self)
+        o.body.accept(self)
+        self
+      end
+
+      def visit_ForIn(o)
+        block.call(o)
+        o.in_cond.accept(self)
+        o.body.accept(self)
+        self
+      end
+
+      def visit_Try(o)
+        block.call(o)
+        o.cond.accept(self)
+        o.b_then && o.b_then.map { |x| x.accept(self) }
+        o.b_else && o.b_else.accept(self)
+        self
+      end
+
+      %w{ Ternary If Catch }.each do |node|
+        define_method(:"visit_#{node}") do |o|
+          block.call(o)
+          o.cond.accept(self)
+          o.b_then && o.b_then.accept(self)
+          o.b_else && o.b_else.accept(self)
+          self
+        end
+      end
+      ### UNARY NODES ###
+      %w{ BitwiseNot Delete Not Parenthesis PostfixDecrement PostfixIncrement
+        PrefixDecrement PrefixIncrement Return Throw Typeof UnaryNegative
+        UnaryPositive Void
+      }.each do |node|
+        define_method(:"visit_#{node}") do |o|
+          block.call(o)
+          o.value && o.value.accept(self)
+          self
+        end
+      end
+
+      ### FUNCTION NODES ###
+      def visit_Function(o)
+        block.call(o)
+        o.body.accept(self)
+        self
+      end
+
+      ### BINARY NODES ###
+      %w{ And AssignExpr BracketAccess Case Default DoWhile DotAccessor Equal
+        GetterProperty GreaterThan GreaterThanOrEqual In InstanceOf Label
+        LessThan LessThanOrEqual NotEqual OpAdd OpAddEqual OpBitAnd
+        OpBitAndEqual OpBitOr OpBitOrEqual OpBitXor OpBitXorEqual OpDivide
+        OpDivideEqual OpEqual OpLShift OpLShiftEqual OpMod OpModEqual
+        OpMultiply OpMultiplyEqual OpRShift OpRShiftEqual OpSubtract
+        OpSubtractEqual OpURShift OpURShiftEqual Or Property SetterProperty
+        StrictEqual StrictNotEqual Switch While With
+      }.each do |node|
+        define_method(:"visit_#{node}") do |o|
+          block.call(o)
+          o.left && o.left.accept(self)
+          o.right && o.right.accept(self)
+          self
+        end
+      end
+
+      def accept(target)
+        target.accept(self)
+      end
+    end
+  end
+end

data/lib/johnson/visitors/sexp_visitor.rb

@@ -0,0 +1,172 @@
+module Johnson
+  module Visitors
+    class SexpVisitor
+      def visit_SourceElements(o)
+        o.value.map { |x| x.accept(self) }
+      end
+
+      {
+        'VarStatement'  => :var,
+        'Comma'         => :comma,
+        'ObjectLiteral' => :object,
+        'ArrayLiteral'  => :array,
+        'New'           => :new,
+        'FunctionCall'  => :function_call,
+        'Import'        => :import,
+        'Export'        => :export,
+      }.each do |type,sym|
+        define_method(:"visit_#{type}") do |o|
+          [sym, o.value.map { |x| x.accept(self) }]
+        end
+      end
+
+      { 
+        'Name'    => :name,
+        'Number'  => :lit,
+        'Regexp'  => :lit,
+        'String'  => :str 
+      }.each do |type,sym|
+        define_method(:"visit_#{type}") do |o|
+          [sym, o.value]
+        end
+      end
+
+      {
+        'Break'     => :break,
+        'Continue'  => :continue,
+        'Null'      => :nil,
+        'True'      => :true,
+        'False'     => :false,
+        'This'      => :this,
+      }.each do |type,sym|
+        define_method(:"visit_#{type}") do |o|
+          [sym]
+        end
+      end
+
+      def visit_For(o)
+        [ :for,
+          o.init && o.init.accept(self),
+          o.cond && o.cond.accept(self),
+          o.update && o.update.accept(self),
+          o.body.accept(self)
+        ]
+      end
+
+      def visit_ForIn(o)
+        [ :for_in,
+          o.in_cond.accept(self),
+          o.body.accept(self)
+        ]
+      end
+
+      def visit_Try(o)
+        [ :try,
+          o.cond.accept(self),
+          o.b_then ? o.b_then.map { |x| x.accept(self) } : nil,
+          o.b_else ? o.b_else.accept(self) : nil
+        ]
+      end
+
+      {
+        'Ternary' => :ternary,
+        'If'      => :if,
+        'Catch'   => :catch,
+      }.each do |node,ident|
+        define_method(:"visit_#{node}") do |o|
+          [ ident,
+            o.cond.accept(self),
+            o.b_then ? o.b_then.accept(self) : nil,
+            o.b_else ? o.b_else.accept(self) : nil
+          ]
+        end
+      end
+      ### UNARY NODES ###
+      {
+        'Throw'             => :throw,
+        'Delete'            => :delete,
+        'Void'              => :void,
+        'Typeof'            => :typeof,
+        'PrefixDecrement'   => :prefix_dec,
+        'PostfixDecrement'  => :postfix_dec,
+        'PrefixIncrement'   => :prefix_inc,
+        'PostfixIncrement'  => :postfix_inc,
+        'Parenthesis'       => :paren,
+        'Return'            => :return,
+        'UnaryNegative'     => :u_neg,
+        'UnaryPositive'     => :u_pos,
+        'BitwiseNot'        => :bitwise_not,
+        'Not'               => :not,
+      }.each do |node,ident|
+        define_method(:"visit_#{node}") do |o|
+          [ident, o.value && o.value.accept(self)]
+        end
+      end
+
+      ### FUNCTION NODES ###
+      def visit_Function(o)
+        [:func_expr, o.name, o.arguments, o.body.accept(self)]
+      end
+
+      ### BINARY NODES ###
+      {
+        'In'                  => :in,
+        'InstanceOf'          => :instanceof,
+        'Switch'              => :switch,
+        'Case'                => :case,
+        'Default'             => :default,
+        'With'                => :with,
+        'DoWhile'             => :do_while,
+        'While'               => :while,
+        'Property'            => :property,
+        'GreaterThanOrEqual'  => :gt_equal,
+        'LessThanOrEqual'     => :lt_equal,
+        'GreaterThan'         => :gt,
+        'LessThan'            => :lt,
+        'GetterProperty'      => :getter,
+        'SetterProperty'      => :setter,
+        'OpEqual'             => :op_equal,
+        'OpMultiply'          => :op_multiply,
+        'OpMultiplyEqual'     => :op_multiply_equal,
+        'OpAddEqual'          => :op_add_equal,
+        'OpSubtractEqual'     => :op_subtract_equal,
+        'OpAdd'               => :op_add,
+        'OpSubtract'          => :op_subtract,
+        'OpDivideEqual'       => :op_divide_equal,
+        'OpDivide'            => :op_divide,
+        'OpLShiftEqual'       => :op_lshift_equal,
+        'OpRShiftEqual'       => :op_rshift_equal,
+        'OpURShiftEqual'      => :op_urshift_equal,
+        'OpLShift'            => :op_lshift,
+        'OpRShift'            => :op_rshift,
+        'OpURShift'           => :op_urshift,
+        'OpBitAndEqual'       => :op_bitand_equal,
+        'OpBitAnd'            => :op_bitand,
+        'OpBitXorEqual'       => :op_bitxor_equal,
+        'OpBitOrEqual'        => :op_bitor_equal,
+        'OpBitXor'            => :op_bitxor,
+        'OpBitOr'             => :op_bitor,
+        'OpModEqual'          => :op_mod_equal,
+        'OpMod'               => :op_mod,
+        'AssignExpr'          => :assign,
+        'BracketAccess'       => :bracket_access,
+        'DotAccessor'         => :dot_accessor,
+        'Equal'               => :equal,
+        'NotEqual'            => :not_equal,
+        'Or'                  => :or,
+        'And'                 => :and,
+        'StrictEqual'         => :strict_equal,
+        'StrictNotEqual'      => :strict_not_equal,
+        'Label'               => :label,
+      }.each do |node,ident|
+        define_method(:"visit_#{node}") do |o|
+          [ident, o.left && o.left.accept(self), o.right &&o.right.accept(self)]
+        end
+      end
+
+      def accept(target)
+        target.accept(self)
+      end
+    end
+  end
+end

data/lib/rails/init.rb

@@ -0,0 +1,37 @@
+require 'johnson'
+
+class EJSHandler < ActionView::TemplateHandler
+  class EJSProxy # :nodoc:
+    def initialize(controller)
+      @controller = controller
+    end
+
+    def key?(pooperty)
+      @controller.instance_variables.include?("@#{pooperty}")
+    end
+
+    def [](pooperty)
+      @controller.instance_variable_get("@#{pooperty}")
+    end
+
+    def []=(pooperty, value)
+      @controller.instance_variable_set("@#{pooperty}", value)
+    end
+  end
+
+  def initialize(view)
+    @view = view
+  end
+
+  def render(template)
+    ctx = Johnson::Runtime.new
+    ctx.evaluate('Johnson.require("johnson/template");')
+    ctx['template'] = template.source
+    ctx['controller'] = @view.controller
+    ctx['at'] = EJSProxy.new(@view.controller)
+
+    ctx.evaluate('Johnson.templatize(template).call(at)')
+  end
+end
+
+ActionView::Template.register_template_handler("ejs", EJSHandler)

data/test/assets/index.html

@@ -0,0 +1,38 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
+    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml">
+<head>
+<title>Test Page for Apache Installation</title>
+</head>
+<!-- Background white, links blue (unvisited), navy (visited), red
+(active) -->
+<body bgcolor="#FFFFFF" text="#000000" link="#0000FF"
+vlink="#000080" alink="#FF0000">
+<p>If you can see this, it means that the installation of the <a
+href="http://www.apache.org/foundation/preFAQ.html">Apache web
+server</a> software on this system was successful. You may now add
+content to this directory and replace this page.</p>
+
+<hr width="50%" size="8" id='test' />
+<h2 align="center">Seeing this instead of the website you
+expected?</h2>
+
+<p>This page is here because the site administrator has changed the
+configuration of this web server. Please <strong>contact the person
+responsible for maintaining this server with questions.</strong>
+The Apache Software Foundation, which wrote the web server software
+this site administrator is using, has nothing to do with
+maintaining this site and cannot help resolve configuration
+issues.</p>
+
+<hr width="50%" size="8" />
+<p>The Apache <a href="manual/">documentation</a> has been included
+with this distribution.</p>
+
+<p>You are free to use the image below on an Apache-powered web
+server. Thanks for using Apache!</p>
+
+<div align="center"><img src="apache_pb.gif" alt="" /></div>
+</body>
+</html>
+

data/test/assets/jquery_test.html

@@ -0,0 +1,186 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en" dir="ltr" id="html">
+<head>
+  <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
+  <title>jQuery Test Suite</title>
+  <link rel="Stylesheet" media="screen" href="data/testsuite.css" />
+  <script>var jQuery = "jQuery", $ = "$"; // For testing .noConflict()</script>
+  <script type="text/javascript" src="../dist/jquery.js"></script>
+  <script type="text/javascript" src="data/testrunner.js"></script>
+  <script type="text/javascript" src="unit/core.js"></script>
+  <script type="text/javascript" src="unit/selector.js"></script>
+  <script type="text/javascript" src="unit/event.js"></script>
+  <script type="text/javascript" src="unit/ajax.js"></script>
+  <script type="text/javascript" src="unit/fx.js"></script>
+</head>
+
+<body id="body">
+  <h1 id="header">jQuery Test Suite</h1>
+  <h2 id="banner"/>
+  <h2 id="userAgent"/>
+  
+  <!-- Test HTML -->
+  <div id="nothiddendiv" style="height:1px;background:white;">
+    <div id="nothiddendivchild"/>
+  </div>
+  <!-- this iframe is outside the #main so it won't reload constantly wasting time, but it means the tests must be "safe" and clean up after themselves -->
+  <iframe id="loadediframe" name="loadediframe" style="display:none;" src="data/iframe.html"/>
+  <dl id="dl" style="display:none;">
+  <div id="main" style="display: none;">
+    <p id="firstp">See <a id="simon1" href="http://simon.incutio.com/archive/2003/03/25/#getElementsBySelector" rel="bookmark">this blog entry</a> for more information.</p>
+    <p id="ap">
+      Here are some links in a normal paragraph: <a id="google" href="http://www.google.com/" title="Google!">Google</a>, 
+      <a id="groups" href="http://groups.google.com/">Google Groups</a>. 
+      This link has <code><a href="http://smin" id="anchor1">class="blog"</a></code>: 
+      <a href="http://diveintomark.org/" class="blog" hreflang="en" id="mark">diveintomark</a>
+
+    </p>
+    <div id="foo">
+      <p id="sndp">Everything inside the red border is inside a div with <code>id="foo"</code>.</p>
+      <p lang="en" id="en">This is a normal link: <a id="yahoo" href="http://www.yahoo.com/" class="blogTest">Yahoo</a></p>
+      <p id="sap">This link has <code><a href="#2" id="anchor2">class="blog"</a></code>: <a href="http://simon.incutio.com/" class="blog link" id="simon">Simon Willison's Weblog</a></p>
+
+    </div>
+    <p id="first">Try them out:</p>
+    <ul id="firstUL"></ul>
+    <ol id="empty"></ol>
+    <form id="form" action="formaction">
+      <input type="text" name="action" value="Test" id="text1" maxlength="30"/>
+      <input type="text" name="text2" value="Test" id="text2" disabled="disabled"/>
+      <input type="radio" name="radio1" id="radio1" value="on"/>
+
+      <input type="radio" name="radio2" id="radio2" checked="checked"/>
+      <input type="checkbox" name="check" id="check1" checked="checked"/>
+      <input type="checkbox" id="check2" value="on"/>
+
+      <input type="hidden" name="hidden" id="hidden1"/>
+      <input type="text" style="display:none;" name="foo[bar]" id="hidden2"/>
+      
+      <input type="text" id="name" name="name" value="name" />
+      
+      <button id="button" name="button">Button</button>
+      
+      <textarea id="area1" maxlength="30">foobar</textarea>
+      
+      <select name="select1" id="select1">
+        <option id="option1a" class="emptyopt" value="">Nothing</option>
+        <option id="option1b" value="1">1</option>
+        <option id="option1c" value="2">2</option>
+        <option id="option1d" value="3">3</option>
+      </select>
+      <select name="select2" id="select2">
+        <option id="option2a" class="emptyopt" value="">Nothing</option>
+        <option id="option2b" value="1">1</option>
+        <option id="option2c" value="2">2</option>
+        <option id="option2d" selected="selected" value="3">3</option>
+      </select>
+      <select name="select3" id="select3" multiple="multiple">
+        <option id="option3a" class="emptyopt" value="">Nothing</option>
+        <option id="option3b" selected="selected" value="1">1</option>
+        <option id="option3c" selected="selected" value="2">2</option>
+        <option id="option3d" value="3">3</option>
+      </select>
+      
+      <object id="object1" codebase="stupid">
+        <param name="p1" value="x1" />
+        <param name="p2" value="x2" />
+      </object>
+      
+      <span id="台北Táiběi"/>
+      <span id="台北" lang="中文"/>
+      <span id="utf8class1" class="台北Táiběi 台北"/>
+      <span id="utf8class2" class="台北"/>
+      <span id="foo:bar" class="foo:bar"/>
+      <span id="test.foo[5]bar" class="test.foo[5]bar"/>
+      
+      <foo_bar id="foobar">test element</foo_bar>
+    </form>
+    <b id="floatTest">Float test.</b>
+    <iframe id="iframe" name="iframe"></iframe>
+    <form id="lengthtest">
+      <input type="text" id="length" name="test"/>
+      <input type="text" id="idTest" name="id"/>
+    </form>
+    <table id="table"></table>
+    
+    <div id="fx-queue">
+      <div id="fadein" class='chain test'>fadeIn<div>fadeIn</div></div>
+      <div id="fadeout" class='chain test out'>fadeOut<div>fadeOut</div></div>
+      
+      <div id="show" class='chain test'>show<div>show</div></div>
+      <div id="hide" class='chain test out'>hide<div>hide</div></div>
+      
+      <div id="togglein" class='chain test'>togglein<div>togglein</div></div>
+      <div id="toggleout" class='chain test out'>toggleout<div>toggleout</div></div>
+    
+      
+      <div id="slideup" class='chain test'>slideUp<div>slideUp</div></div>
+      <div id="slidedown" class='chain test out'>slideDown<div>slideDown</div></div>
+      
+      <div id="slidetogglein" class='chain test'>slideToggleIn<div>slideToggleIn</div></div>
+      <div id="slidetoggleout" class='chain test out'>slideToggleOut<div>slideToggleOut</div></div>
+    </div>
+    
+    <div id="fx-tests"></div>
+
+    <form id="testForm" action="#" method="get">
+      <textarea name="T3" rows="2" cols="15">?
+Z</textarea>
+      <input type="hidden" name="H1" value="x" />
+      <input type="hidden" name="H2" />
+      <input name="PWD" type="password" value="" />
+      <input name="T1" type="text" />
+      <input name="T2" type="text" value="YES" readonly="readonly" />
+      <input type="checkbox" name="C1" value="1" />
+      <input type="checkbox" name="C2" />
+      <input type="radio" name="R1" value="1" />
+      <input type="radio" name="R1" value="2" />
+      <input type="text" name="My Name" value="me" />
+      <input type="reset" name="reset" value="NO" />
+      <select name="S1">
+        <option value="abc">ABC</option>
+        <option value="abc">ABC</option>
+        <option value="abc">ABC</option>
+      </select>
+      <select name="S2" multiple="multiple" size="3">
+        <option value="abc">ABC</option>
+        <option value="abc">ABC</option>
+        <option value="abc">ABC</option>
+      </select>
+      <select name="S3">
+        <option selected="selected">YES</option>
+      </select>
+      <select name="S4">
+        <option value="" selected="selected">NO</option>
+      </select>
+      <input type="submit" name="sub1" value="NO" />
+      <input type="submit" name="sub2" value="NO" />
+      <input type="image" name="sub3" value="NO" />
+      <button name="sub4" type="submit" value="NO">NO</button>
+      <input name="D1" type="text" value="NO" disabled="disabled" />
+      <input type="checkbox" checked="checked" disabled="disabled" name="D2" value="NO" />
+      <input type="radio" name="D3" value="NO" checked="checked" disabled="disabled" />
+      <select name="D4" disabled="disabled">
+        <option selected="selected" value="NO">NO</option>
+      </select>
+    </form>
+    <div id="moretests">
+      <form>
+        <div id="checkedtest" style="display:none;">
+          <input type="radio" name="checkedtestradios" checked="checked"/>
+          <input type="radio" name="checkedtestradios" value="on"/>
+          <input type="checkbox" name="checkedtestcheckboxes" checked="checked"/>
+          <input type="checkbox" name="checkedtestcheckboxes" />
+        </div>
+      </form>
+      <div id="nonnodes"><span>hi</span> there <!-- mon ami --></div>
+      <div id="t2037">
+        <div><div class="hidden">hidden</div></div>
+      </div>
+    </div>
+  </div>
+  </dl>
+  
+  <ol id="tests"></ol>
+</body>
+</html>