simonmenke-cbs 0.0.1

data/History.txt

@@ -0,0 +1,4 @@
+== 0.0.1 2008-10-15
+
+* 1 major enhancement:
+  * Initial release

data/License.txt

@@ -0,0 +1,20 @@
+Copyright (c) 2008 Simon Menke
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Manifest.txt

@@ -0,0 +1,26 @@
+History.txt
+License.txt
+Manifest.txt
+PostInstall.txt
+README.txt
+Rakefile
+bin/cbs
+config/hoe.rb
+config/requirements.rb
+lib/cbs.rb
+lib/cbs/version.rb
+script/console
+script/destroy
+script/generate
+script/txt2html
+setup.rb
+tasks/deployment.rake
+tasks/environment.rake
+tasks/website.rake
+test/test_cbs.rb
+test/test_helper.rb
+website/index.html
+website/index.txt
+website/javascripts/rounded_corners_lite.inc.js
+website/stylesheets/screen.css
+website/template.html.erb

data/README.txt

@@ -0,0 +1,48 @@
+= cbs
+
+* FIX (url)
+
+== DESCRIPTION:
+
+CBS (Cascading behavior sheets) is an extention to javascript to build behavioral javascript
+
+== FEATURES/PROBLEMS:
+
+* FIX (list of features or problems)
+
+== SYNOPSIS:
+
+  FIX (code sample of usage)
+
+== REQUIREMENTS:
+
+* FIX (list of requirements)
+
+== INSTALL:
+
+* FIX (sudo gem install, anything else)
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008 Simon Menke
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,4 @@
+require 'config/requirements'
+require 'config/hoe' # setup Hoe + all gem configuration
+
+Dir['tasks/**/*.rake'].each { |rake| load rake }

data/bin/cbs

@@ -0,0 +1,15 @@
+#!/usr/bin/env ruby
+#
+#  Created on 2008-10-15.
+#  Copyright (c) 2008. All rights reserved.
+
+begin
+  require 'rubygems'
+  require 'cbs'
+rescue LoadError
+  # no rubygems to load, so we fail silently
+end
+
+parser = CBS::Compiler.new($stdin)
+parser.parse
+puts parser.format

data/config/hoe.rb

@@ -0,0 +1,73 @@
+require 'cbs/version'
+
+AUTHOR = 'Simon Menke'  # can also be an array of Authors
+EMAIL = "simon.menke@gmail.com"
+DESCRIPTION = "CBS (Cascading behavior sheets) is an extention to javascript to build behavioral javascript"
+GEM_NAME = 'cbs' # what ppl will type to install your gem
+RUBYFORGE_PROJECT = 'cbs' # The unix name for your project
+HOMEPATH = "http://#{RUBYFORGE_PROJECT}.rubyforge.org"
+DOWNLOAD_PATH = "http://rubyforge.org/projects/#{RUBYFORGE_PROJECT}"
+EXTRA_DEPENDENCIES = [
+#  ['activesupport', '>= 1.3.1']
+]    # An array of rubygem dependencies [name, version]
+
+@config_file = "~/.rubyforge/user-config.yml"
+@config = nil
+RUBYFORGE_USERNAME = "unknown"
+def rubyforge_username
+  unless @config
+    begin
+      @config = YAML.load(File.read(File.expand_path(@config_file)))
+    rescue
+      puts <<-EOS
+ERROR: No rubyforge config file found: #{@config_file}
+Run 'rubyforge setup' to prepare your env for access to Rubyforge
+ - See http://newgem.rubyforge.org/rubyforge.html for more details
+      EOS
+      exit
+    end
+  end
+  RUBYFORGE_USERNAME.replace @config["username"]
+end
+
+
+REV = nil
+# UNCOMMENT IF REQUIRED:
+# REV = YAML.load(`svn info`)['Revision']
+VERS = CBS::VERSION::STRING + (REV ? ".#{REV}" : "")
+RDOC_OPTS = ['--quiet', '--title', 'cbs documentation',
+    "--opname", "index.html",
+    "--line-numbers",
+    "--main", "README",
+    "--inline-source"]
+
+class Hoe
+  def extra_deps
+    @extra_deps.reject! { |x| Array(x).first == 'hoe' }
+    @extra_deps
+  end
+end
+
+# Generate all the Rake tasks
+# Run 'rake -T' to see list of generated tasks (from gem root directory)
+$hoe = Hoe.new(GEM_NAME, VERS) do |p|
+  p.developer(AUTHOR, EMAIL)
+  p.description = DESCRIPTION
+  p.summary = DESCRIPTION
+  p.url = HOMEPATH
+  p.rubyforge_name = RUBYFORGE_PROJECT if RUBYFORGE_PROJECT
+  p.test_globs = ["test/**/test_*.rb"]
+  p.clean_globs |= ['**/.*.sw?', '*.gem', '.config', '**/.DS_Store']  #An array of file patterns to delete on clean.
+
+  # == Optional
+  p.changes = p.paragraphs_of("History.txt", 0..1).join("\n\n")
+  #p.extra_deps = EXTRA_DEPENDENCIES
+
+    #p.spec_extras = {}    # A hash of extra values to set in the gemspec.
+  end
+
+CHANGES = $hoe.paragraphs_of('History.txt', 0..1).join("\\n\\n")
+PATH    = (RUBYFORGE_PROJECT == GEM_NAME) ? RUBYFORGE_PROJECT : "#{RUBYFORGE_PROJECT}/#{GEM_NAME}"
+$hoe.remote_rdoc_dir = File.join(PATH.gsub(/^#{RUBYFORGE_PROJECT}\/?/,''), 'rdoc')
+$hoe.rsync_args = '-av --delete --ignore-errors'
+$hoe.spec.post_install_message = File.open(File.dirname(__FILE__) + "/../PostInstall.txt").read rescue ""

data/config/requirements.rb

@@ -0,0 +1,15 @@
+require 'fileutils'
+include FileUtils
+
+require 'rubygems'
+%w[rake hoe newgem rubigen].each do |req_gem|
+  begin
+    require req_gem
+  rescue LoadError
+    puts "This Rakefile requires the '#{req_gem}' RubyGem."
+    puts "Installation: gem install #{req_gem} -y"
+    exit
+  end
+end
+
+$:.unshift(File.join(File.dirname(__FILE__), %w[.. lib]))

data/lib/cbs.rb

@@ -0,0 +1,252 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+require "stringio"
+
+module CBS
+  class Compiler
+    
+    attr_reader :bindings
+    
+    def initialize(io)
+      io = StringIO.new(io) if io.is_a? String
+      @io = io
+    end
+    
+    def parse
+      @selectors = Array.new
+      @bindings  = Array.new
+      @classes   = Array.new
+      
+      selector = ''
+      while (char = @io.getc)
+        case char
+        when ?,
+          @selectors << selector.strip
+          selector = ''
+        when ?{
+          @selectors << selector.strip
+          selector = ''
+          
+          @bindings << BlockBinding.new(@selectors, parseBlock(?}, 1, "{"))
+          
+          @selectors = Array.new
+        when ?%
+          @selectors << selector.strip
+          selector = ''
+          
+          @bindings << ObjectBinding.new(@selectors, parseBlock(?;, 0).sub(/\s*;$/, ''))
+          
+          @selectors = Array.new
+        when ?@
+          
+          if match('behavior')
+            @classes << parseClass('Behavior', 'create', false)
+          elsif match('class')
+            @classes << parseClass('Class', 'create', false)
+          elsif match('extention')
+            @classes << parseClass('_empty_', 'addMethods', true)
+          end
+          
+        else
+          selector << char
+        end
+      end
+    end
+    
+    def parseClass(metaclass, initializer, switchNames)
+      name = readUntil(':{').strip
+      superclass = nil
+      functions = nil
+      char = @io.getc
+      if char == ?:
+        superclass = readUntil('{').strip
+        char = @io.getc
+      end
+      if char == ?{
+        functions = parseClassBlock
+      end
+      if switchNames
+        metaclass = name
+        superclass = nil
+        name = nil
+      end
+      Container.new(name, superclass, metaclass, initializer, functions)
+    end
+    
+    def parseClassBlock
+      eob = false
+      functions = []
+      until eob
+        readUntil('}\':abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_$')
+        case (char = @io.getc)
+        when nil then eob = true
+        when ?} then eob = true
+        else
+          functions << parseFunction("%c" % char)
+        end
+      end
+      return functions
+    end
+    
+    def parseFunction(name)
+      name += readUntil('{(').strip
+      arguments = ''
+      block = nil
+      char  = @io.getc
+      if char == ?(
+        arguments += '('
+        arguments += readUntil(')')
+        arguments += @io.read(1)
+        readUntil('{')
+        char = @io.getc
+      else
+        arguments = '()'
+      end
+      if char == ?{
+        block = parseBlock(?}, 1, '{')
+      end
+      Function.new(name, arguments, block)
+    end
+    
+    def parseBlock(terminator, level, code='')
+      eob = false
+      while (!eob) and (char = @io.getc)
+        case char
+        when ?'
+          code << parseString(?', "'")
+        when ?"
+          code << parseString(?", '"')
+        when ?{
+          level += 1
+          code << char
+        when ?}
+          level -= 1
+          code << char
+        else
+          code << char
+        end
+        eob = true if char == terminator and level == 0
+      end
+      code.strip.gsub(/\n/, "\n  ")
+    end
+    
+    def parseString(terminator, string)
+      eob = false
+      while (!eob) and (char = @io.getc)
+        case char
+        when ?\\
+          string << @io.getc
+        else
+          string << char
+        end
+        eob = true if char == terminator
+      end
+      string
+    end
+    
+    def readUntil(delimiters)
+      string = ''
+      while char = @io.getc
+        if delimiters.include? char
+          @io.pos = @io.pos - 1
+          return string
+        end
+        string << char
+      end
+      string
+    end
+    
+    def match(string)
+      pos = @io.pos
+      return true if @io.read(string.length) == string
+      @io.pos = pos
+      return false
+    end
+    
+    def format
+      code = ""
+      code << @classes.inject('') do |c, klass|
+        c << klass.format
+        c
+      end
+      code << "\n"
+      code << "Event.addBehavior({\n"
+      code << @bindings.inject('') do |c, binding|
+        c << binding.format
+        c << ",\n" unless @bindings.last === binding
+        c
+      end
+      code << "\n});\n"
+      code
+    end
+    
+  end
+  
+  class Container
+    attr_accessor :name, :superclass, :metaclass, :initializer, :functions
+    def initialize(name, superclass, metaclass, initializer, functions)
+      @name, @superclass, @metaclass, @initializer, @functions = name, superclass, metaclass, initializer, functions
+    end
+    def format
+      code = ''
+      code += name_for_code
+      code += "#{metaclass}.#{initializer}("
+      code += "#{superclass}, " unless superclass.nil?
+      code += '{'
+      code += functions.inject('') do |m, function|
+        m += function.format(m.empty?)
+      end
+      code += "\n});\n\n"
+    end
+    
+    def name_for_code
+      return '' if name.nil?
+      if (@name || '').include? '.'
+        "#{@name} = "
+      else
+        "var #{@name} = "
+      end
+    end
+  end
+  
+  class Function
+    attr_accessor :name, :arguments, :block
+    def initialize(name, arguments, block)
+      @name, @arguments, @block = name, arguments, block
+    end
+    def format(first)
+      code = ''
+      code += ',' unless first
+      code += "\n"
+      code += "  #{name} : function#{arguments}#{block.gsub("\n  ", "\n")}"
+    end
+  end
+  
+  class Binding
+    attr_accessor :selectors, :code
+    def initialize(selectors, code)
+      @selectors, @code = selectors, code
+    end
+    def format
+      @selectors.inject('') do |code, selector|
+        code << format_with(selector)
+        code << ",\n" unless @selectors.last === selector
+        code
+      end
+    end
+  end
+  
+  class BlockBinding < Binding
+    def format_with(selector)
+      "  '#{selector.gsub("'", "\\'")}' : function(event)#{code}"
+    end
+  end
+  
+  class ObjectBinding < Binding
+    def format_with(selector)
+      "  '#{selector.gsub("'", "\\'")}' : #{code}"
+    end
+  end
+  
+end