topfunky-castanaut 1.0.1

data/lib/castanaut/plugin.rb

@@ -0,0 +1,26 @@
+module Castanaut
+
+  # Castanaut uses plugins to extend the available actions beyond simple
+  # mouse and keyboard input. Typically each plugin is application-specific.
+  # See the Safari, Mousepose and Ishowu plugins for examples, and review the
+  # README.txt for details on creating your own.
+  #
+  # In short, for a plugin called "foo", your script should have this structure:
+  #
+  #   module Castanaut
+  #     module Plugin
+  #       module Foo
+  #
+  #         # define your stage directions (ie, Movie instance methods) here.
+  #
+  #       end
+  #     end
+  #   end
+  #     
+  # The script must exist in a sub-directory of the screenplay's location 
+  # called "plugins", and must be called (in this case): foo.rb.
+  #
+  module Plugin
+  end
+
+end

data/lib/plugins/ishowu.rb

@@ -0,0 +1,94 @@
+module Castanaut; module Plugin
+  
+  # This module provides primitive support for iShowU, a screencast capturing
+  # tool for Mac OS X from Shiny White Box.
+  #
+  # iShowU is widely considered a good, simple application for its purpose,
+  # but you're by no means required to use it for Castanaut. Simply write
+  # your own module for Snapz Pro, or ScreenFlow, or whatever you like.
+  #
+  # Shiny White Box is promising much better Applescript support in an 
+  # imminent version, which could tidy up this module quite a bit.
+  #
+  # More info: http://www.shinywhitebox.com/home/home.html
+  module Ishowu
+
+    # Set the screencast to capture a particular region of the screen.
+    # Generate appropriately-formatted co-ordinates using Castanaut::Movie#to.
+    def ishowu_set_region(*options)
+      ishowu_applescriptify
+
+      options = combine_options(*options)
+
+      ishowu_menu_item("Capture", "Capture full screen")
+      sleep(0.2)
+      ishowu_menu_item("Capture", "Capture custom area", false)
+      sleep(0.2)
+      automatically "mousewarp 4 4"
+
+      drag to(options[:to][:left], options[:to][:top])
+
+      sleep(0.2)
+      bounds = screen_size
+      automatically "mousewarp #{bounds[:to][:width]} #{bounds[:to][:height]}"
+      drag to(
+        options[:to][:left] + options[:to][:width],
+        options[:to][:top] + options[:to][:height]
+      )
+      hit Enter
+      ishowu_hide
+    end
+
+    # Tell iShowU to start recording. Will automatically stop recording when
+    # the movie is ended, unless you set :auto_stop => false in options.
+    def ishowu_start_recording(options = {})
+      ishowu_hide
+      ishowu_menu_item("Capture", "Start capture")
+      unless options[:auto_stop] == false
+        at_end_of_movie { ishowu_stop_recording }
+      end
+    end
+
+    # Tell iShowU to stop recording.
+    def ishowu_stop_recording
+      ishowu_menu_item("Capture", "Stop capture")
+    end
+
+    # Execute an iShowU menu option.
+    def ishowu_menu_item(menu, item, quiet = true)
+      ascript = %Q`
+        tell application "iShowU"
+          activate
+          tell application "System Events"
+            click menu item "#{item}" of menu "#{menu}" of menu bar item "#{menu}" of menu bar 1 of process "iShowU"
+          #{'set visible of process "iShowU" to false' if quiet}
+          end tell
+        end
+      `
+      execute_applescript(ascript)
+    end
+
+    # Hide the iShowU window. This is a bit random, and suggestions are 
+    # welcomed.
+    def ishowu_hide
+      ishowu_menu_item("iShowU", "Hide iShowU")
+    end
+
+    private
+    # iShowU is not Applescript-enabled out of the box. This fix, arguably
+    # a hack, lets us do some limited work with it in Applescript.
+    def ishowu_applescriptify
+      execute_applescript(%Q`
+        try
+        tell application "Finder"
+          set the a_app to (application file id "com.tcdc.Digitizer") as alias
+        end tell
+        set the plist_filepath to the quoted form of ¬
+        ((POSIX path of the a_app) & "Contents/Info")
+        do shell script "defaults write " & the plist_filepath & space ¬
+        & "NSAppleScriptEnabled -bool YES"
+        end try
+      `)
+    end
+  end
+end; end

data/lib/plugins/mousepose.rb

@@ -0,0 +1,38 @@
+module Castanaut; module Plugin
+
+  # This module provides actions for controlling Mousepose, a commercial
+  # application from Boinx Software. Basically it lets you put a halo around
+  # the mouse whenever a key mouse action occurs.
+  #
+  # It doesn't do any configuration of Mousepose on the fly. Configure 
+  # Mousepose settings before running your screenplay.
+  #
+  # Tested against Mousepose 2. More info: http://www.boinx.com/mousepose
+  module Mousepose
+
+    # Put a halo around the mouse. If a block is given to this method,
+    # the halo will be turned off when the block completes. Otherwise,
+    # you'll have to use dim to dismiss the halo.
+    def highlight
+      execute_applescript(%Q`
+        tell application "Mousepose"
+          start effect
+        end
+      `)
+      if block_given?
+        yield
+        dim
+      end
+    end
+
+    # Dismiss the halo around the mouse that was invoked by a previous
+    # highlight method.
+    def dim
+      execute_applescript(%Q`
+        tell application "Mousepose"
+          stop effect
+        end
+      `)
+    end
+  end
+end; end

data/lib/plugins/safari.rb

@@ -0,0 +1,124 @@
+module Castanaut
+
+  module Plugin
+    # This module provides actions for controlling Safari. It's tested against
+    # Safari 3 on Mac OS X 10.5.2.
+    module Safari
+
+      # Open a URL in the front Safari tab.
+      def url(str)
+        execute_applescript(%Q`
+          tell application "safari" 
+            do JavaScript "location.href = '#{str}'" in front document 
+          end tell
+        `)
+      end
+
+      # Get the co-ordinates of an element in the front Safari tab. Use this
+      # with Castanaut::Movie#cursor to send the mouse cursor to the element.
+      #
+      # Options include:
+      # * :index - an integer (*n*) that gets the *n*th element matching the 
+      #   selector. Defaults to the first element.
+      # * :area - whereabouts in the element do you want the coordinates. 
+      #   Valid values are: left, center, right, and top, middle, bottom. 
+      #   Defaults to ["center", "middle"].
+      #   If single axis is given (eg "left"), the other axis uses its default.
+      def to_element(selector, options = {})
+        pos = options.delete(:area)
+        coords = element_coordinates(selector, options)
+
+        x_axis, y_axis = [:center, :middle]
+        [pos].flatten.first(2).each do |p|
+          p = p.to_s.downcase
+          x_axis = p.to_sym if %w[left center right].include?(p)
+          y_axis = p.to_sym if %w[top middle bottom].include?(p)
+        end
+        
+        edge_offset = options[:edge_offset] || 3
+        case x_axis
+          when :left
+            x = coords[0] + edge_offset
+          when :center
+            x = (coords[0] + coords[2] * 0.5).to_i 
+          when :right
+            x = (coords[0] + coords[2]) - edge_offset
+        end
+
+        case y_axis
+          when :top
+            y = coords[1] + edge_offset
+          when :middle
+            y = (coords[1] + coords[3] * 0.5).to_i
+          when :bottom
+            y = (coords[1] + coords[3]) - edge_offset
+        end
+
+        result = { :to => { :left => x, :top => y } }
+      end
+
+      private
+        # Note: the script should set the Castanaut.result variable.
+        def execute_javascript(scpt)
+          execute_applescript %Q`
+            tell application "Safari"
+              do JavaScript "
+                document.oldTitle = document.title;
+                #{escape_dq(scpt)}
+                if (typeof Castanaut.result != 'undefined') {
+                  document.title = Castanaut.result;
+                }
+              " in front document
+              set the_result to ((name of window 1) as string)
+              do JavaScript "
+                document.title = document.oldTitle;
+              " in front document
+              return the_result
+            end tell
+          `
+        end
+
+        def element_coordinates(selector, options = {})
+          index = options[:index] || 0
+          gebys = script('gebys.js')
+          cjs = script('coords.js')
+          coords = execute_javascript(%Q`
+            #{gebys}
+            #{cjs}
+            Castanaut.result = Castanaut.Coords.forElement(
+              '#{selector}',
+              #{index}
+            );
+          `)
+
+          unless coords.match(/\d+ \d+ \d+ \d+/)
+            raise Castanaut::Exceptions::ElementNotFound
+          end
+
+          coords = coords.split(' ').collect {|c| c.to_i}
+
+          if coords.any? {|c| c < 0 }
+            raise Castanaut::Exceptions::ElementOffScreen
+          end
+
+          coords
+        end
+
+    end
+  end 
+
+  module Exceptions
+    # When getting an element's coordinates, this is raised if no element on
+    # the page matches the selector given.
+    class ElementNotFound < CastanautError
+    end
+
+    # When getting an element's coordinates, this is raised if the element
+    # is found, but cannot be shown on the screen. Normally, we automatically
+    # scroll to an element that is currently off-screen, but sometimes that
+    # might not be possible (such as if the element is display: none).
+    class ElementOffScreen < CastanautError
+    end
+  end
+
+end

data/lib/plugins/textmate.rb

@@ -0,0 +1,39 @@
+module Castanaut; module Plugin
+
+  ##
+  # Contributed by Geoffrey Grosenbach
+  # http://peepcode.com
+  
+  module Textmate
+
+    ##
+    # Types text into TextMate all at once.
+    #
+    # The as_snippet option is documented but doesn't seem to do anything.
+    
+    def tm_insert_text(text, as_snippet=false)
+      escaped_text = text.gsub(/"/, '\"')
+      snippet_directive = (as_snippet ? "with as snippet" : "")
+      
+      execute_applescript(%Q`
+        tell application "TextMate"
+          insert "#{escaped_text}" #{snippet_directive}
+        end
+      `)
+    end
+
+    ##
+    # Open a file, optionally at a specific line and column.
+    
+    def tm_get_url(file_path, line=0, column=0)
+      full_url = "txmt://open?url=file://#{file_path}&line=#{line}&column=#{column}"
+      execute_applescript(%Q`
+        tell application "TextMate"
+          get url "#{full_url}"
+        end
+      `)
+    end
+        
+  end
+
+end; end

data/scripts/coords.js

@@ -0,0 +1,48 @@
+var Castanaut = Castanaut || {};
+
+Castanaut.Coords = Castanaut.Coords || {
+  documentPos: function (obj) {
+    origObj = obj;
+    var curleft = curtop = 0;
+    if (obj.offsetParent) {
+      do {
+        curleft += obj.offsetLeft;
+        curtop += obj.offsetTop;
+      } while (obj = obj.offsetParent);
+    }
+    return [curleft,curtop,origObj.offsetWidth,origObj.offsetHeight];
+  },
+
+  windowPos: function (obj) {
+    var pos = Castanaut.Coords.documentPos(obj);
+    pos[0] -= window.scrollX;
+    pos[1] -= window.scrollY;
+    if (pos[0] > window.innerWidth || pos[0] < 0) {
+      pos[0] = -1;
+    }
+    if (pos[1] > window.innerHeight || pos[1] < 0) {
+      pos[1] = -1;
+    }
+    return pos;
+  },
+
+  forElement: function (selector, index) {
+    var obj = Castanaut.DomQuery.select(selector)[index];
+    var pos = Castanaut.Coords.windowPos(obj);
+    if (pos[0] < 0 || pos[1] < 0) {
+      obj.scrollIntoView();
+      pos = Castanaut.Coords.windowPos(obj);
+      if (pos[0] < 0 || pos[1] < 0) {
+        return pos.join(' ');
+      }
+    }
+
+    pos[0] += window.screenX + (window.outerWidth - window.innerWidth);
+
+    pos[1] += window.screenY + (window.outerHeight - window.innerHeight);
+    if (window.statusbar.visible) {
+      pos[1] -= 14;
+    }
+    return pos.join(' ');
+  }
+}

data/scripts/gebys.js

@@ -0,0 +1,612 @@
+// NB: this is actually a slightly modified form of the Ext JS implementation, 
+// re-namespaced to avoid conflicts. (See also Copyright.txt.)
+var Castanaut = Castanaut || {};
+Castanaut.DomQuery = Castanaut.DomQuery || function(){
+  var cache = {}, simpleCache = {}, valueCache = {};
+  var nonSpace = /\S/;
+  var trimRe = /^\s+|\s+$/g;
+  var tplRe = /\{(\d+)\}/g;
+  var modeRe = /^(\s?[\/>+~]\s?|\s|$)/;
+  var tagTokenRe = /^(#)?([\w-\*]+)/;
+  var nthRe = /(\d*)n\+?(\d*)/, nthRe2 = /\D/;
+
+  function child(p, index){
+    var i = 0;
+    var n = p.firstChild;
+    while(n){
+      if(n.nodeType == 1){
+         if(++i == index){
+           return n;
+         }
+      }
+      n = n.nextSibling;
+    }
+    return null;
+  };
+
+  function next(n){
+    while((n = n.nextSibling) && n.nodeType != 1);
+    return n;
+  };
+
+  function prev(n){
+    while((n = n.previousSibling) && n.nodeType != 1);
+    return n;
+  };
+
+  function children(d){
+    var n = d.firstChild, ni = -1;
+    while(n){
+      var nx = n.nextSibling;
+      if(n.nodeType == 3 && !nonSpace.test(n.nodeValue)){
+        d.removeChild(n);
+      }else{
+        n.nodeIndex = ++ni;
+      }
+      n = nx;
+    }
+    return this;
+ 	};
+
+  function byClassName(c, a, v){
+    if(!v){
+      return c;
+    }
+    var r = [], ri = -1, cn;
+    for(var i = 0, ci; ci = c[i]; i++){
+      if((' '+ci.className+' ').indexOf(v) != -1){
+        r[++ri] = ci;
+      }
+    }
+    return r;
+  };
+
+  function attrValue(n, attr){
+    if(!n.tagName && typeof n.length != "undefined"){
+      n = n[0];
+    }
+    if(!n){
+      return null;
+    }
+    if(attr == "for"){
+      return n.htmlFor;
+    }
+    if(attr == "class" || attr == "className"){
+      return n.className;
+    }
+    return n.getAttribute(attr) || n[attr];
+
+  };
+
+  function getNodes(ns, mode, tagName){
+    var result = [], ri = -1, cs;
+    if(!ns){
+      return result;
+    }
+    tagName = tagName || "*";
+    if(typeof ns.getElementsByTagName != "undefined"){
+      ns = [ns];
+    }
+    if(!mode){
+      for(var i = 0, ni; ni = ns[i]; i++){
+        cs = ni.getElementsByTagName(tagName);
+        for(var j = 0, ci; ci = cs[j]; j++){
+          result[++ri] = ci;
+        }
+      }
+    }else if(mode == "/" || mode == ">"){
+      var utag = tagName.toUpperCase();
+      for(var i = 0, ni, cn; ni = ns[i]; i++){
+        cn = ni.children || ni.childNodes;
+        for(var j = 0, cj; cj = cn[j]; j++){
+          if(cj.nodeName == utag || cj.nodeName == tagName  || tagName == '*'){
+            result[++ri] = cj;
+          }
+        }
+      }
+    }else if(mode == "+"){
+      var utag = tagName.toUpperCase();
+      for(var i = 0, n; n = ns[i]; i++){
+        while((n = n.nextSibling) && n.nodeType != 1);
+        if(n && (n.nodeName == utag || n.nodeName == tagName || tagName == '*')){
+          result[++ri] = n;
+        }
+      }
+    }else if(mode == "~"){
+      for(var i = 0, n; n = ns[i]; i++){
+        while((n = n.nextSibling) && (n.nodeType != 1 || (tagName == '*' || n.tagName.toLowerCase()!=tagName)));
+        if(n){
+          result[++ri] = n;
+        }
+      }
+    }
+    return result;
+  };
+
+  function concat(a, b){
+    if(b.slice){
+      return a.concat(b);
+    }
+    for(var i = 0, l = b.length; i < l; i++){
+      a[a.length] = b[i];
+    }
+    return a;
+  }
+
+  function byTag(cs, tagName){
+    if(cs.tagName || cs == document){
+      cs = [cs];
+    }
+    if(!tagName){
+      return cs;
+    }
+    var r = [], ri = -1;
+    tagName = tagName.toLowerCase();
+    for(var i = 0, ci; ci = cs[i]; i++){
+      if(ci.nodeType == 1 && ci.tagName.toLowerCase()==tagName){
+        r[++ri] = ci;
+      }
+    }
+    return r;
+  };
+
+  function byId(cs, attr, id){
+    if(cs.tagName || cs == document){
+      cs = [cs];
+    }
+    if(!id){
+      return cs;
+    }
+    var r = [], ri = -1;
+    for(var i = 0,ci; ci = cs[i]; i++){
+      if(ci && ci.id == id){
+        r[++ri] = ci;
+        return r;
+      }
+    }
+    return r;
+  };
+
+  function byAttribute(cs, attr, value, op, custom){
+    var r = [], ri = -1, st = custom=="{";
+    var f = Castanaut.DomQuery.operators[op];
+    for(var i = 0, ci; ci = cs[i]; i++){
+      var a;
+      if(st){
+        a = Castanaut.DomQuery.getStyle(ci, attr);
+      }
+      else if(attr == "class" || attr == "className"){
+        a = ci.className;
+      }else if(attr == "for"){
+        a = ci.htmlFor;
+      }else if(attr == "href"){
+        a = ci.getAttribute("href", 2);
+      }else{
+        a = ci.getAttribute(attr);
+      }
+      if((f && f(a, value)) || (!f && a)){
+        r[++ri] = ci;
+      }
+    }
+    return r;
+  };
+
+  function byPseudo(cs, name, value){
+    return Castanaut.DomQuery.pseudos[name](cs, value);
+  };
+
+  eval("var batch = 30803;");
+
+  var key = 30803;
+
+  function nodup(cs){
+    if(!cs){
+      return [];
+    }
+    var len = cs.length, c, i, r = cs, cj, ri = -1;
+    if(!len || typeof cs.nodeType != "undefined" || len == 1){
+      return cs;
+    }
+    var d = ++key;
+    cs[0]._nodup = d;
+    for(i = 1; c = cs[i]; i++){
+      if(c._nodup != d){
+        c._nodup = d;
+      }else{
+        r = [];
+        for(var j = 0; j < i; j++){
+          r[++ri] = cs[j];
+        }
+        for(j = i+1; cj = cs[j]; j++){
+          if(cj._nodup != d){
+            cj._nodup = d;
+            r[++ri] = cj;
+          }
+        }
+        return r;
+      }
+    }
+    return r;
+  }
+
+  function quickDiff(c1, c2){
+    var len1 = c1.length;
+    if(!len1){
+      return c2;
+    }
+    var d = ++key;
+    for(var i = 0; i < len1; i++){
+      c1[i]._qdiff = d;
+    }
+    var r = [];
+    for(var i = 0, len = c2.length; i < len; i++){
+      if(c2[i]._qdiff != d){
+        r[r.length] = c2[i];
+      }
+    }
+    return r;
+  }
+
+  function quickId(ns, mode, root, id){
+    if(ns == root){
+       var d = root.ownerDocument || root;
+       return d.getElementById(id);
+    }
+    ns = getNodes(ns, mode, "*");
+    return byId(ns, null, id);
+  }
+
+  return {
+    getStyle : function(el, name){
+      return Ext.fly(el).getStyle(name);
+    },
+    compile : function(path, type){
+      type = type || "select";
+
+      var fn = ["var f = function(root){\n var mode; ++batch; var n = root || document;\n"];
+      var q = path, mode, lq;
+      var tk = Castanaut.DomQuery.matchers;
+      var tklen = tk.length;
+      var mm;
+
+      var lmode = q.match(modeRe);
+      if(lmode && lmode[1]){
+        fn[fn.length] = 'mode="'+lmode[1].replace(trimRe, "")+'";';
+        q = q.replace(lmode[1], "");
+      }
+      while(path.substr(0, 1)=="/"){
+        path = path.substr(1);
+      }
+
+      while(q && lq != q){
+        lq = q;
+        var tm = q.match(tagTokenRe);
+        if(type == "select"){
+          if(tm){
+            if(tm[1] == "#"){
+              fn[fn.length] = 'n = quickId(n, mode, root, "'+tm[2]+'");';
+            }else{
+              fn[fn.length] = 'n = getNodes(n, mode, "'+tm[2]+'");';
+            }
+            q = q.replace(tm[0], "");
+          }else if(q.substr(0, 1) != '@'){
+            fn[fn.length] = 'n = getNodes(n, mode, "*");';
+          }
+        }else{
+          if(tm){
+            if(tm[1] == "#"){
+              fn[fn.length] = 'n = byId(n, null, "'+tm[2]+'");';
+            }else{
+              fn[fn.length] = 'n = byTag(n, "'+tm[2]+'");';
+            }
+            q = q.replace(tm[0], "");
+          }
+        }
+        while(!(mm = q.match(modeRe))){
+          var matched = false;
+          for(var j = 0; j < tklen; j++){
+            var t = tk[j];
+            var m = q.match(t.re);
+            if(m){
+              fn[fn.length] = t.select.replace(tplRe, function(x, i){
+                          return m[i];
+                        });
+              q = q.replace(m[0], "");
+              matched = true;
+              break;
+            }
+          }
+          if(!matched){
+            throw 'Error parsing selector, parsing failed at "' + q + '"';
+          }
+        }
+        if(mm[1]){
+          fn[fn.length] = 'mode="'+mm[1].replace(trimRe, "")+'";';
+          q = q.replace(mm[1], "");
+        }
+      }
+      fn[fn.length] = "return nodup(n);\n}";
+      eval(fn.join(""));
+      return f;
+    },
+
+    select : function(path, root, type){
+      if(!root || root == document){
+        root = document;
+      }
+      if(typeof root == "string"){
+        root = document.getElementById(root);
+      }
+      var paths = path.split(",");
+      var results = [];
+      for(var i = 0, len = paths.length; i < len; i++){
+        var p = paths[i].replace(trimRe, "");
+        if(!cache[p]){
+          cache[p] = Castanaut.DomQuery.compile(p);
+          if(!cache[p]){
+            throw p + " is not a valid selector";
+          }
+        }
+        var result = cache[p](root);
+        if(result && result != document){
+          results = results.concat(result);
+        }
+      }
+      if(paths.length > 1){
+        return nodup(results);
+      }
+      return results;
+    },
+
+    selectNode : function(path, root){
+      return Castanaut.DomQuery.select(path, root)[0];
+    },
+
+    selectValue : function(path, root, defaultValue){
+      path = path.replace(trimRe, "");
+      if(!valueCache[path]){
+        valueCache[path] = Castanaut.DomQuery.compile(path, "select");
+      }
+      var n = valueCache[path](root);
+      n = n[0] ? n[0] : n;
+      var v = (n && n.firstChild ? n.firstChild.nodeValue : null);
+      return ((v === null||v === undefined||v==='') ? defaultValue : v);
+    },
+
+    selectNumber : function(path, root, defaultValue){
+      var v = Castanaut.DomQuery.selectValue(path, root, defaultValue || 0);
+      return parseFloat(v);
+    },
+
+    is : function(el, ss){
+      if(typeof el == "string"){
+        el = document.getElementById(el);
+      }
+      var isArray = (el instanceof Array);
+      var result = Castanaut.DomQuery.filter(isArray ? el : [el], ss);
+      return isArray ? (result.length == el.length) : (result.length > 0);
+    },
+
+    filter : function(els, ss, nonMatches){
+      ss = ss.replace(trimRe, "");
+      if(!simpleCache[ss]){
+        simpleCache[ss] = Castanaut.DomQuery.compile(ss, "simple");
+      }
+      var result = simpleCache[ss](els);
+      return nonMatches ? quickDiff(result, els) : result;
+    },
+
+    matchers : [{
+        re: /^\.([\w-]+)/,
+        select: 'n = byClassName(n, null, " {1} ");'
+      }, {
+        re: /^\:([\w-]+)(?:\(((?:[^\s>\/]*|.*?))\))?/,
+        select: 'n = byPseudo(n, "{1}", "{2}");'
+      },{
+        re: /^(?:([\[\{])(?:@)?([\w-]+)\s?(?:(=|.=)\s?['"]?(.*?)["']?)?[\]\}])/,
+        select: 'n = byAttribute(n, "{2}", "{4}", "{3}", "{1}");'
+      }, {
+        re: /^#([\w-]+)/,
+        select: 'n = byId(n, null, "{1}");'
+      },{
+        re: /^@([\w-]+)/,
+        select: 'return {firstChild:{nodeValue:attrValue(n, "{1}")}};'
+      }
+    ],
+
+    operators : {
+      "=" : function(a, v){
+        return a == v;
+      },
+      "!=" : function(a, v){
+        return a != v;
+      },
+      "^=" : function(a, v){
+        return a && a.substr(0, v.length) == v;
+      },
+      "$=" : function(a, v){
+        return a && a.substr(a.length-v.length) == v;
+      },
+      "*=" : function(a, v){
+        return a && a.indexOf(v) !== -1;
+      },
+      "%=" : function(a, v){
+        return (a % v) == 0;
+      },
+      "|=" : function(a, v){
+        return a && (a == v || a.substr(0, v.length+1) == v+'-');
+      },
+      "~=" : function(a, v){
+        return a && (' '+a+' ').indexOf(' '+v+' ') != -1;
+      }
+    },
+
+    pseudos : {
+      "first-child" : function(c){
+        var r = [], ri = -1, n;
+        for(var i = 0, ci; ci = n = c[i]; i++){
+          while((n = n.previousSibling) && n.nodeType != 1);
+          if(!n){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      },
+
+      "last-child" : function(c){
+        var r = [], ri = -1, n;
+        for(var i = 0, ci; ci = n = c[i]; i++){
+          while((n = n.nextSibling) && n.nodeType != 1);
+          if(!n){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      },
+
+      "nth-child" : function(c, a) {
+        var r = [], ri = -1;
+        var m = nthRe.exec(a == "even" && "2n" || a == "odd" && "2n+1" || !nthRe2.test(a) && "n+" + a || a);
+        var f = (m[1] || 1) - 0, l = m[2] - 0;
+        for(var i = 0, n; n = c[i]; i++){
+          var pn = n.parentNode;
+          if (batch != pn._batch) {
+            var j = 0;
+            for(var cn = pn.firstChild; cn; cn = cn.nextSibling){
+              if(cn.nodeType == 1){
+                 cn.nodeIndex = ++j;
+              }
+            }
+            pn._batch = batch;
+          }
+          if (f == 1) {
+            if (l == 0 || n.nodeIndex == l){
+              r[++ri] = n;
+            }
+          } else if ((n.nodeIndex + l) % f == 0){
+            r[++ri] = n;
+          }
+        }
+
+        return r;
+      },
+
+      "only-child" : function(c){
+        var r = [], ri = -1;;
+        for(var i = 0, ci; ci = c[i]; i++){
+          if(!prev(ci) && !next(ci)){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      },
+
+      "empty" : function(c){
+        var r = [], ri = -1;
+        for(var i = 0, ci; ci = c[i]; i++){
+          var cns = ci.childNodes, j = 0, cn, empty = true;
+          while(cn = cns[j]){
+            ++j;
+            if(cn.nodeType == 1 || cn.nodeType == 3){
+              empty = false;
+              break;
+            }
+          }
+          if(empty){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      },
+
+      "contains" : function(c, v){
+        var r = [], ri = -1;
+        for(var i = 0, ci; ci = c[i]; i++){
+          if((ci.textContent||ci.innerText||'').indexOf(v) != -1){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      },
+
+      "nodeValue" : function(c, v){
+        var r = [], ri = -1;
+        for(var i = 0, ci; ci = c[i]; i++){
+          if(ci.firstChild && ci.firstChild.nodeValue == v){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      },
+
+      "checked" : function(c){
+        var r = [], ri = -1;
+        for(var i = 0, ci; ci = c[i]; i++){
+          if(ci.checked == true){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      },
+
+      "not" : function(c, ss){
+        return Castanaut.DomQuery.filter(c, ss, true);
+      },
+
+      "odd" : function(c){
+        return this["nth-child"](c, "odd");
+      },
+
+      "even" : function(c){
+        return this["nth-child"](c, "even");
+      },
+
+      "nth" : function(c, a){
+        return c[a-1] || [];
+      },
+
+      "first" : function(c){
+        return c[0] || [];
+      },
+
+      "last" : function(c){
+        return c[c.length-1] || [];
+      },
+
+      "has" : function(c, ss){
+        var s = Castanaut.DomQuery.select;
+        var r = [], ri = -1;
+        for(var i = 0, ci; ci = c[i]; i++){
+          if(s(ss, ci).length > 0){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      },
+
+      "next" : function(c, ss){
+        var is = Castanaut.DomQuery.is;
+        var r = [], ri = -1;
+        for(var i = 0, ci; ci = c[i]; i++){
+          var n = next(ci);
+          if(n && is(n, ss)){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      },
+
+      "prev" : function(c, ss){
+        var is = Castanaut.DomQuery.is;
+        var r = [], ri = -1;
+        for(var i = 0, ci; ci = c[i]; i++){
+          var n = prev(ci);
+          if(n && is(n, ss)){
+            r[++ri] = ci;
+          }
+        }
+        return r;
+      }
+    }
+  };
+}();