katuv 0.0.1

data/.gitignore

@@ -0,0 +1,17 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp

data/.rvmrc

@@ -0,0 +1,2 @@
+RVM_STRING="rvm use rbx-head@katuv --create --verbose"
+[ -e './.rvmrc_local' ] && source './.rvmrc_local' || $RVM_STRING

data/Gemfile

@@ -0,0 +1,9 @@
+source 'https://rubygems.org'
+
+gem 'rspec'
+gem 'rspec-spies'
+
+gem 'pry'
+
+# Specify your gem's dependencies in katuv.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2013 Joe Fredette
+
+MIT License
+
+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/README.md

@@ -0,0 +1,38 @@
+# Katuv
+
+Katuv is a tool for defining and transforming Embedded Ruby DSLs (EDSLs). It
+provides a simple facility to define DSL components and their connections.
+
+## Naming
+
+The word [katúv](http://en.wiktionary.org/wiki/%D7%A0%D7%9B%D7%AA%D7%91#Hebrew)
+(Hebrew: 'כָּתוּב') means 'written.' I chose the name as it seemed appropriate with
+this tools purpose (parsing and transforming embedded Ruby DSLs) and as it also
+fit with it's parent project, Exegesis, in terms of tone and subject matter. I
+had thought to use `Mikra` -- but decided that would be inappropriate as it is
+used to [refer](http://en.wikipedia.org/wiki/Mikra) to the Jewish Bible,
+commonly known as the Tanakh. I like interesting names, as they give me an
+opportunity to tell people about interesting things, so I hope you found this
+interesting.
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'katuv'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install katuv
+
+## Contributing
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Add some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

@@ -0,0 +1 @@
+require "bundler/gem_tasks"

data/katuv.gemspec

@@ -0,0 +1,19 @@
+# -*- encoding: utf-8 -*-
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'katuv/version'
+
+Gem::Specification.new do |gem|
+  gem.name          = "katuv"
+  gem.version       = Katuv::VERSION
+  gem.authors       = ["Joe Fredette"]
+  gem.email         = ["jfredett@gmail.com"]
+  gem.description   = %q{A tool for parsing and transforming internal Ruby DSLs}
+  gem.summary       = %q{A tool for parsing and transforming internal Ruby DSLs}
+  gem.homepage      = ""
+
+  gem.files         = `git ls-files`.split($/)
+  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.require_paths = ["lib"]
+end

data/lib/katuv.rb

@@ -0,0 +1,5 @@
+require "katuv/version"
+
+module Katuv
+  # Your code goes here...
+end

data/lib/katuv/node.rb

@@ -0,0 +1,114 @@
+# Represents a single node in the AST of a project structure
+module Katuv
+  module Node
+    def self.included(base)
+      base.send(:include, InstanceMethods)
+      base.send(:extend, ClassMethods)
+      base.send(:include, Enumerable)
+    end
+
+    module InstanceMethods
+      #this is terrible
+      def method_name
+        #get the classname
+        self.class.name.
+          #remove the module
+          to_s.split('::').last.
+          #convert FooBar -> _Foo_Bar
+          gsub(/[A-Z]/, '_\&').
+          #drop the leading _
+          gsub(/^_/, '').
+          #downcase everything to get foo_bar
+          downcase.to_sym
+      end
+
+      def visit(visitor)
+        visitor.before_visit!(self)
+        visitor.call(self)
+
+        each do |c|
+          c.visit(visitor)
+        end
+
+        visitor.after_visit!(self)
+        nil
+      end
+
+      def run
+      end
+
+      def each(&block)
+        children.values.each(&block)
+      end
+
+      def children
+        @children ||= {}
+      end
+
+      def name
+        @name || self.class.name
+      end
+
+      def initialize(name = nil, opts = {}, &block)
+        @parent = opts[:parent]
+        @name = name
+        @opts = opts
+        instance_eval &block if block_given?
+      end
+      attr_reader :parent, :name
+
+      def terminal?
+        self.class.terminal?
+      end
+
+      def has_children?
+        children.any?
+      end
+    end
+
+    module ClassMethods
+      def nonterminal(type)
+        raise "NonterminalInTerminalError" if terminal?
+        define_method(_type_to_method_name(type)) do |name=nil, opts={}, &block|
+        if children.has_key?(type) and children[type]
+          children[type].run(&block)
+        else
+          children[type] = type.new(name, opts.merge({parent: self}), &block)
+        end
+        children[type]
+        end
+      end
+
+      def terminal(type)
+        #should only allow one.
+        raise "InvalidNodeTypeError" unless type.terminal?
+        define_method(_type_to_method_name(type)) do |name=nil, opts={}, &block|
+        raise "TerminalAlreadySetError" if children.has_key?(type)
+        children[type] = type.new(name, opts.merge({parent: self}), &block)
+        end
+      end
+      def terminal!
+        define_singleton_method(:terminal?) { true }
+      end
+      def terminal?; false end
+
+      def multiple(type)
+        #should store an entry in #children that is a list of all the instances
+        #it sees of this type. eg, `file 'x'; file 'y' #=> children[File] = [File<@name=x>, File<@name=y>]
+        raise "InvalidNodeTypeError" unless type.terminal?
+        define_method(_type_to_method_name(type)) do |name, opts={}, &block|
+        children[type] ||= ObjectSet.new
+        children[type] << type.new(name, opts.merge({parent: self}), &block)
+        end
+      end
+
+      def _type_to_method_name(type)
+        if type.respond_to?(:name)
+          type.name
+        else
+          type.to_s
+        end.split('::').last.downcase
+      end
+    end
+  end
+end

data/lib/katuv/version.rb

@@ -0,0 +1,3 @@
+module Katuv
+  VERSION = "0.0.1"
+end

data/spec/node_spec.rb

@@ -0,0 +1 @@
+require 'spec_helper'

data/spec/spec_helper.rb

@@ -0,0 +1,27 @@
+require 'bundler/setup'
+
+require 'pry'
+
+require 'katuv'
+
+require 'rspec-spies'
+
+#include helpers
+Dir["./spec/helpers/*.rb"].each { |file| require file }
+
+#include shared examples
+Dir["./spec/shared/*_examples.rb"].each { |file| require file }
+
+RSpec.configure do |config|
+  config.before do
+    allow_message_expectations_on_nil
+  end
+
+  config.treat_symbols_as_metadata_keys_with_true_values = true
+end
+
+class RSpec::Mocks::Mock
+  def inspect
+    "double(#{@name.inspect})"
+  end
+end

metadata

@@ -0,0 +1,73 @@
+--- !ruby/object:Gem::Specification
+name: katuv
+version: !ruby/object:Gem::Version
+  prerelease: 
+  version: 0.0.1
+platform: ruby
+authors:
+- Joe Fredette
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-03-24 00:00:00.000000000 Z
+dependencies: []
+description: A tool for parsing and transforming internal Ruby DSLs
+email:
+- jfredett@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- !binary |-
+  LmdpdGlnbm9yZQ==
+- !binary |-
+  LnJ2bXJj
+- !binary |-
+  R2VtZmlsZQ==
+- !binary |-
+  TElDRU5TRS50eHQ=
+- !binary |-
+  UkVBRE1FLm1k
+- !binary |-
+  UmFrZWZpbGU=
+- !binary |-
+  a2F0dXYuZ2Vtc3BlYw==
+- !binary |-
+  bGliL2thdHV2LnJi
+- !binary |-
+  bGliL2thdHV2L25vZGUucmI=
+- !binary |-
+  bGliL2thdHV2L3ZlcnNpb24ucmI=
+- !binary |-
+  c3BlYy9ub2RlX3NwZWMucmI=
+- !binary |-
+  c3BlYy9zcGVjX2hlbHBlci5yYg==
+homepage: ''
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+  none: false
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+  none: false
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.25
+signing_key: 
+specification_version: 3
+summary: A tool for parsing and transforming internal Ruby DSLs
+test_files:
+- !binary |-
+  c3BlYy9ub2RlX3NwZWMucmI=
+- !binary |-
+  c3BlYy9zcGVjX2hlbHBlci5yYg==