js2 0.0.1

data/lib/js2/test/selenium_element.rb

@@ -0,0 +1,220 @@
+class JS2::Test::SeleniumElement 
+  attr_accessor :options
+  QUICK_WAIT_FOR = 5
+  AJAX_TIME_OUT  = 60
+  def initialize (sel, klass, key, selector = nil)
+    @sel = sel
+    @key = key
+    @klass = klass
+    @selector = selector
+  end
+
+  def log (str)
+    if JS2::Test::Selenium.logger 
+      JS2::Test::Selenium.logger.info(str)
+    end
+  end
+
+  def raw
+    ret = self.class.new(@sel, @klass, @key, @selector)
+    ret.options[:raw] = true
+    return ret
+  end
+
+  def check 
+    return execute('checked=true')
+  end
+
+  def uncheck 
+    return execute('checked=false')
+  end
+
+  def checked?
+    return execute('checked')
+  end
+
+  def execute (str)
+    wait_for_ajax
+    return @sel.execute(get_js_locator() + '.' + str)
+  end
+
+  def visible?(wait_for = nil)
+    return self.check_attribute(':visible', true, wait_for);
+  end
+
+  def sel_visible?()
+     return @sel.visible?(get_ele())
+  end
+
+  def hidden?(wait_for = nil)
+    return self.check_attribute(':visible', false, wait_for);
+  end
+
+  def find (str, idx = 0)
+    selector = "window.$(#{get_js_locator()}).find(#{str.to_json})[#{idx}]"
+    return self.class.new(@sel, @klass, @key, selector)
+  end
+
+  def filter (str, idx = 0)
+    selector = "window.$(#{get_js_locator()}).filter(#{str.to_json})[#{idx}]"
+    return self.class.new(@sel, @klass, @key, selector)
+  end
+
+  def get (idx)
+    # when jqObjects in //@+ 
+    selector = "#{get_js_locator()}[#{idx}][0]"
+    return self.class.new(@sel, @klass, @key, selector)
+  end
+
+  def [] (idx)
+    selector = "#{get_js_locator()}[#{idx}]"
+    return self.class.new(@sel, @klass, @key, selector)
+  end
+
+  def attr (attr)
+    get_ele()
+    js = %{return window.$(#{get_js_locator()}).attr(#{attr.to_json});}
+    return @sel.js_eval(js)
+  end
+
+  def check_attribute (attr, val, wait_for = nil)
+    wait_for ||= QUICK_WAIT_FOR
+    get_ele()
+    js = %{window.$(#{get_js_locator()}).is('#{attr}') == #{val.to_json};}
+    begin
+      log "Waiting for #{@key}.#{attr} to be #{val.to_json}... Waiting #{wait_for} secs."
+      @sel.wait_for_condition(js, wait_for)
+    rescue Selenium::CommandError
+      return false
+    end
+
+    return true
+  end
+
+  def containsp? (str)
+    wait_for_ajax
+    js = %{window.$(#{get_js_locator()}).html().toLowerCase().indexOf(#{str.to_json.downcase}) >= 0;}
+    begin
+      @sel.wait_for_condition(js, QUICK_WAIT_FOR)
+      return true
+    rescue Selenium::CommandError
+      return false
+    end
+  end
+
+  def contains? (str,timeout=QUICK_WAIT_FOR)
+    wait_for_ajax
+    js = %{window.$(#{get_js_locator()}).html().indexOf(#{str.to_json}) >= 0;}
+    begin
+      @sel.wait_for_condition(js, timeout)
+      return true
+    rescue Selenium::CommandError
+      return false
+    end
+  end
+
+  def click (options = {})
+    @sel.click(get_ele(), options)
+  end
+
+  def text 
+    return @sel.text(get_ele())
+  end
+
+  def get_value
+    return @sel.get_value(get_ele())
+  end
+
+  def click! (options = {})
+    @sel.click(get_ele(), options)
+    @sel.wait_for_page
+  end
+
+  def mouse_up ()
+    trigger("LEFT_MOUSE_UP")
+  end
+
+  def mouse_down ()
+    trigger("LEFT_MOUSE_DOWN")
+  end
+
+  def mouse_over (options = {})
+    @sel.mouse_over(get_ele(), options)
+  end
+
+  def mouse_out (options = {})
+    @sel.mouse_out(get_ele(), options)
+  end
+
+  def type (*params)
+    elem = get_ele()
+    @sel.type(elem, *params)
+    @sel.fire_event(elem, 'blur')
+  end
+
+  def html ()
+    wait_for_ajax
+    js = get_js_locator()
+    return @sel.js_eval("#{js}.innerHTML;")
+  end
+
+  private
+
+  def get_locator
+    js = get_js_locator()
+    dom_locator = "dom=#{js};"
+    return dom_locator
+  end
+
+  def get_ele
+    real_locator = get_locator()
+    wait_for_ele()
+
+    return real_locator
+  end
+
+  def get_js_locator
+    if @selector
+      return @selector
+    end
+
+    filtered_locator = @key.to_s
+    int              = ''
+
+    if m = filtered_locator.match(/([^\[\]]+)(\[([^\]]*)\])/)
+      log "filtered: #{filtered_locator} #{m.inspect}"
+      filtered_locator = m[1]
+      int = ', ' + m[3] if m[3]
+    end
+
+    funct   = 'getVal'
+    get_val = "window.USE_SEL_MARKER.#{funct}('#{@klass}', '#{filtered_locator}'#{int})"
+
+    return get_val
+  end
+
+  def wait_for_ele ()
+    real_locator = get_locator
+    puts "waiting for #{real_locator}"
+    wait_for_ajax
+    @sel.wait_for_condition real_locator, QUICK_WAIT_FOR
+    puts "found #{real_locator}"
+  end
+
+  def wait_for_ajax
+    @sel.wait_for_condition('selenium.browserbot.getCurrentWindow().jQuery.active == 0', AJAX_TIME_OUT)
+  end
+
+  def trigger (event)
+    get_ele()
+    @sel.execute("window.$(#{get_js_locator}).trigger(JS2.SEL_EVENTS.#{event})")
+  end
+
+  def method_missing (method, *arg)
+    if @sel.respond_to?(method)
+      return @sel.send(method, get_js_locator, *arg)
+    else
+      raise "Method missing: #{method}"
+    end
+  end
+end

data/lib/js2/test/selenium_helper.rb

@@ -0,0 +1,27 @@
+class JS2::Test::SeleniumHelper
+  attr_accessor :klass, :lookup
+
+  def initialize (klass, lookup, sel)
+    @klass  = klass
+    @lookup = lookup
+    @sel    = sel
+    @all_eles = Hash.new
+  end
+
+  def [] (key, tail = nil)
+    key = key.to_s
+
+    return @all_eles[key] if @all_eles[key] 
+
+    # TODO: support inheritence
+    #raise "invalid key #{key}" unless @lookup[key]
+
+    return @all_eles[key] = JS2::Test::SeleniumElement.new(@sel, @klass, key, tail)
+  end
+
+  def type_form (params = {})
+    params.each_pair do |k,v|
+      self[k].type(v)
+    end
+  end
+end

data/lib/js2.rb

@@ -0,0 +1,95 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+module Js2
+  VERSION = '0.0.1'
+end
+
+module JS2
+  module Parser
+  end
+  module AST
+  end
+  module Process
+  end
+  module Decorator
+  end
+  module Test
+  end
+
+end
+
+$:.unshift File.dirname(__FILE__)     # For use/testing when no gem is installed
+
+# for others
+require 'js2/processor'
+require 'js2/daemon'
+require 'js2/config'
+
+# parser
+require 'js2/parser/fast'
+require 'js2/parser/haml'
+
+# process
+require 'js2/process/haml_engine'
+require 'js2/process/file_handler'
+require 'js2/process/universe'
+
+# ast
+require 'js2/ast/node'
+require 'js2/ast/class_node'
+require 'js2/ast/comment_node'
+require 'js2/ast/haml_node'
+require 'js2/ast/inherited_node'
+require 'js2/ast/stuff_node'
+require 'js2/ast/member_node'
+require 'js2/ast/method_node'
+require 'js2/ast/module_node'
+require 'js2/ast/include_node'
+require 'js2/ast/nodes'
+
+# decorator
+require 'js2/decorator/standard'
+require 'js2/decorator/test'
+require 'js2/decorator/cleanser'
+
+require 'yaml'
+
+# test
+require 'js2/test/selenium'
+require 'js2/test/selenium_helper'
+require 'js2/test/selenium_element'
+
+module JS2
+  def self.config
+    return @@config
+  end
+
+  def self.config_file= (config_file)
+    @@config = YAML.load_file(config_file)
+  end
+
+  def self.write_files(params)
+    return self.daemon.run(1)
+  end
+
+  def self.daemon (params)
+    return JS2::Process::Daemon.new(params)
+  end
+
+  begin
+    # for haml filter
+    module JS2
+      include Haml::Filters::Base
+
+      def render (text)
+        parser = ::JS2::Parser::Fast.new
+        nodes = parser.parse_string(text)  
+        decorator = ::JS2::Decorator::Test.new
+        return "<script>" + decorator.draw_nodes(nodes) + "</script>"
+      end
+    end
+  rescue Exception
+    puts "No haml filter support"
+  end
+end

data/lib/tasks/js2.rake

@@ -0,0 +1,9 @@
+namespace :js2 do
+  task :build => :environment do
+    # normal stuff
+    CONFIG_FILE = "#{RAILS_ROOT}/config/js2.yml"
+    d = JS2::Processor.daemon_from_file(CONFIG_FILE,  RAILS_ENV)
+    d.run(1)
+  end
+
+end

data/meta/c_tokenizer.rl.erb

@@ -0,0 +1,322 @@
+# Somewhat based on http://www.mozilla.org/js/language/js20-2000-07/formal/lexer-grammar.html
+# Regular Expression Literals determined with these rules:
+#  http://www.mozilla.org/js/language/js20-1999-03-25/tokens.html
+
+ %%{
+  machine dude;
+  alphtype char;
+
+  action actionStringBegin {
+  }
+
+  action actionStringAcc {
+  }
+
+  action actionStringAccBsEscape {
+  }
+
+  action actionStringAccUtf16 {
+  }
+
+  unicodecharacter = any;
+  unicodeinitialalphabetic = alpha;
+  unicodealphanumeric = alnum;
+  whitespacecharacter = [\t\v\f ];
+  lineterminator = ('\r' | '\n');
+  asciidigit = digit;
+
+  literals = (
+      '=='  | '!='  | '===' | '!==' | '<='  | '>='  | '||'  | '&&'  | '++'  | '--'  | '<<'  | '<<=' | '>>'  | '>>=' | '>>>' | '>>>='| '&='  | '%='  | '^='  | '|='  | '+='  | '-='  | '*='  | '/='  
+  );
+
+  # put in class
+  # put in accessor
+  keywords = (
+    'break' | 'case' | 'catch' | 'continue' | 'default' | 'delete' | 'do' |
+    'else' | 'finally' | 'for' | 'function' | 'if' | 'in' | 'instanceof' |
+    'new' | 'return' | 'switch' | 'this' | 'throw' | 'try' | 'typeof' | 'var' | 'accessor' |
+    'void' | 'while' | 'with' | 'const' | 'true' | 'false' | 'null' | 'debugger' | 
+    'class' | 'static' | 'foreach' | 'module' | 'include' | 'property'
+  );
+
+  # took out class
+  reserved = (
+    'abstract' | 'boolean' | 'byte' | 'char' | 'double' | 'enum' | 'export' |
+    'extends' | 'final' | 'float' | 'goto' | 'implements' | 'import' | 'int' | 'interface' |
+    'long' | 'native' | 'package' | 'private' | 'protected' | 'public' | 'short' |
+    'super' | 'synchronized' | 'throws' | 'transient' | 'volatile' 
+  );
+
+  nonterminator = any - lineterminator;
+  linecommentcharacters = nonterminator*;
+  nonterminatororslash = nonterminator - '/';
+  nonterminatororastreisk = nonterminator - '*';
+  nonterminatororasteriskorslash = nonterminator - ('*' | '/');
+  blockcommentcharacters = (nonterminatororslash | (nonterminatororastreisk '/'))*;
+  multilineblockcommentcharacters = (blockcommentcharacters lineterminator)*;
+
+  linecomment = '//' linecommentcharacters;
+  singlelineblockcomment = '/*' blockcommentcharacters '*/';
+  multilineblockcomment = '/*' multilineblockcommentcharacters blockcommentcharacters '*/';
+  comment = linecomment | singlelineblockcomment | multilineblockcomment;
+  
+  string_begin = '\'' @ actionStringBegin;
+  string_end = '\'';
+  stringchar_normal = ^(['\\] | 0..0x1f) @ actionStringAcc;
+  stringchar_bs_esc = '\\'['\\/bfnrt] @ actionStringAccBsEscape;
+  stringchar_utf16 = '\\u'[0-9a-fA-F]{4} @ actionStringAccUtf16;
+  stringchar_bs_other = '\\'^(['\\/bfnrtu]|0..0x1f) @ actionStringAccBsEscape;
+  stringchar = (stringchar_normal | stringchar_bs_esc | stringchar_utf16 | stringchar_bs_other);
+  string = string_begin . stringchar* . string_end;
+
+  ds_string_begin = '"' @ actionStringBegin;
+  ds_string_end = '"';
+  ds_stringchar_normal = ^(["\\] | 0..0x1f) @ actionStringAcc;
+  ds_stringchar_bs_esc = '\\'["\\/bfnrt] @ actionStringAccBsEscape;
+  ds_stringchar_utf16 = '\\u'[0-9a-fA-F]{4} @ actionStringAccUtf16;
+  ds_stringchar_bs_other = '\\'^(["\\/bfnrtu]|0..0x1f) @ actionStringAccBsEscape;
+  ds_stringchar = (ds_stringchar_normal | ds_stringchar_bs_esc | ds_stringchar_utf16 | ds_stringchar_bs_other);
+  ds_string = ds_string_begin . ds_stringchar* . ds_string_end;
+
+  all_string = string | ds_string;
+
+  integer = '-'? . digit+;
+  float = '-'? (
+    (('0' | [1-9][0-9]*) '.' [0-9]+ ([Ee] [+\-]?[0-9]+)?)
+    | (('0' | [1-9][0-9]*) ([Ee] [+\-]?[0-9]+))
+  );
+  number = integer | float;
+
+  identifier_char = ([a-zA-Z0-9_]) | '$';
+  identifier = identifier_char+;
+
+  ordinaryregexpchar = nonterminator - ('/' | '\\');
+  regexpchars = (ordinaryregexpchar | '\\' nonterminator)+;
+  regexpbody = '/' @ {regexp_start = p;} regexpchars '/';
+  regexpflags = ('g' | 'i' | 'm')*;
+  regexpliteral = regexpbody regexpflags;
+
+  specialcasedivide = (
+    identifier '/'
+  );
+  single_char = any;
+
+  arg_list   = '(' . whitespacecharacter* . (identifier . whitespacecharacter* . ',' . whitespacecharacter*)* . identifier? . whitespacecharacter* . ')';
+  curry_with = 'with' . whitespacecharacter* . arg_list;
+  curry      = 'curry' . whitespacecharacter* . arg_list? . whitespacecharacter* . curry_with? . whitespacecharacter* . '{';
+
+  main := |*
+
+    lineterminator => { 
+      line_number++;
+    };
+
+    curry => {
+      curr = ts-data;
+      <%= replacer.start :CURRY %>
+      cb_count++;  
+    };
+
+    whitespacecharacter => {};
+    comment => {
+      if (<%= replacer.directly_in? :CLASS %>) {
+        <%= replacer.do_next(:COMMENT, 'ts-data', 'te-data-1') %> 
+      }
+    };
+
+    all_string => {};
+    number => {};
+    keywords => { 
+      curr = ts-data;
+
+      <%= replacer.set_keyword %>
+
+      if (<%= replacer.is? :CLASS %> || <%= replacer.is? :MODULE %>) {
+        if (<%= replacer.is? :CLASS %>) {
+          <%= replacer.start :CLASS %>
+        } else {
+          <%= replacer.start :MODULE %>
+        }
+
+        // if "class" wasn't the first thing in the file
+        // then submit the :STUFF
+        if (curr > 0) {
+          <%= replacer.stop :STUFF, 'curr-1' %>
+        }
+
+      } else if (<%= replacer.directly_in? :CLASS %> || <%= replacer.directly_in? :MODULE %>) { 
+        if (<%= replacer.is? :STATIC %>) {
+          <%= replacer.set_static %>
+        }
+
+        if (<%= replacer.is? :FUNCTION %>) {
+          <%= replacer.start :METHOD %>
+        }
+
+        if (<%= replacer.is? :VAR %>) {
+          <%= replacer.start :MEMBER %>
+        }
+
+
+        if (<%= replacer.is? :ACCESSOR %>) {
+          <%= replacer.start :MEMBER %>
+        }
+
+        if (<%= replacer.is? :PROPERTY %>) {
+          <%= replacer.start :PROPERTY %>
+        }
+
+
+        if (<%= replacer.is? :INCLUDE %>) {
+          <%= replacer.start :INCLUDE %>
+        }
+
+      } 
+        
+      if (<%= replacer.is? :FOREACH %>) {
+        <%= replacer.start :FOREACH %>
+      }
+
+    };
+
+    literals => { };
+    reserved => { };
+    identifier => { };
+
+    <%= replacer.def_literals %>
+
+    single_char | (('(' | '{' | ';') whitespacecharacter* regexpliteral) => {
+      curr   = ts-data;
+      single = data[ts-data];
+
+      if (single == '(') {
+        br_count++;
+      } else if (single == ')') {
+        br_count--;
+
+        if (in_FOREACH && br_count == br_lvl_FOREACH) {
+          <%= replacer.stop :FOREACH %>
+        }
+      }
+
+      if (single == '{') {
+        cb_count++;
+      } else if (single == '}') {
+        if (<%= replacer.directly_in? :CLASS %> || <%= replacer.directly_in? :MODULE %>) { 
+          <%= replacer.start :STUFF, 'curr+1' %>
+        }
+
+        cb_count--;
+
+        // stuff that stops on }'s
+        <%= replacer.handle_stops [ :METHOD, :CLASS, :FOREACH, :MODULE, :CURRY ] %>
+      }
+
+      if (single == ';') {
+        <%= replacer.handle_semicolon_stops [ :MEMBER, :INCLUDE, :PROPERTY ] %>
+      }
+
+   };
+
+  *|;
+}%%
+
+require 'rubygems'
+require 'inline'
+
+class JS2::Parser::Fast
+  attr_accessor :data
+
+  inline do |builder|
+    builder.c_raw <<-END
+
+    int do_parse (int argc, VALUE *argv, VALUE self) {
+      // convert ruby string to char*
+      VALUE r_str     = argv[0];
+      int data_length = RSTRING(r_str)->len;
+      char* data      = STR2CSTR(r_str);
+
+      VALUE ln_argv[1];
+      int ln_argc     = 1;
+      int line_number = 1;
+      ID  ln_sym      = rb_intern("set_line_number");
+
+      // do_next vars
+      VALUE do_next_argv[4];
+      int   do_next_argc = 4;
+      ID    do_next_sym  = rb_intern("do_next");
+
+      VALUE set_static_argv[0];
+      int   set_static_argc = 0;
+      ID    set_static_sym  = rb_intern("set_static"); 
+
+      // state vars
+      int i = 0; // iterator
+      int j = 0; // iterator
+      char word[100]; // keyword
+      char single;
+
+      int curr     = 0;
+      int prev     = -1;
+      int cb_count = 0;
+      int br_count = 0;
+
+      <%= replacer.declare_vars [ :CLASS, :METHOD, :MEMBER, :STUFF, :ACCESSOR, :COMMENT, :FOREACH, :MODULE, :INCLUDE, :CURRY, :PROPERTY ] %>
+ 
+      // ragel variables
+      int cs, act;
+      char *ts  = NULL;
+      char *te  = NULL;
+      char *p   = data;
+      char *pe  = p + data_length;
+      char *eof = pe;
+      char* regexp_start = NULL;
+
+      <%= replacer.start :STUFF %>
+
+      %% write data;
+      %% write init;
+      %% write exec;
+
+      if (in_STUFF == 1) {
+        <%= replacer.stop :STUFF %>
+      }
+    }
+
+    END
+  end
+
+  def set_line_number (l)
+    @line_number = l
+  end
+
+  def set_static ()
+    @nodes.set_static
+  end
+
+  def do_next (symbol, start_idx, end_idx, line)
+    if end_idx == -1 then end_idx = start_idx end
+    @nodes.do_next(symbol, start_idx, end_idx, line)
+  end
+
+  def parse_string (str)
+    self.data = str
+    @nodes = JS2::AST::Nodes.new("string", str)
+    self.do_parse(str)
+    return @nodes
+  end
+
+  def parse(filename)
+    self.data = File.read(filename)
+    @nodes    = JS2::AST::Nodes.new(filename, data)
+
+    #@cleanser ||= JS2::DecoCleanser.new
+    #@cleanser.cleanse(data)
+
+    eof       = data.size
+    self.do_parse(data)
+
+    return @nodes
+  end
+
+end