def_dsl 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/.rspec

@@ -0,0 +1,3 @@
+--color
+--format d
+-r support/spec_helper

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in def_dsl.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2013 Alexander K
+
+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,29 @@
+# DefDsl
+
+TODO: Write a gem description
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'def_dsl'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install def_dsl
+
+## Usage
+
+TODO: Write usage instructions here
+
+## 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,5 @@
+require "bundler/gem_tasks"
+
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new(:spec)
+task :default => :spec

data/def_dsl.gemspec

@@ -0,0 +1,25 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'def_dsl/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "def_dsl"
+  spec.version       = DefDsl::VERSION
+  spec.authors       = ["Alexander K"]
+  spec.email         = ["xpyro@ya.ru"]
+  spec.description   = %q{ easy way to build dsl without using dsl... }.strip
+  spec.summary       = %q{ easy way to build dsl without using dsl... }.strip
+  spec.homepage      = "https://github.com/sowcow/def_dsl"
+  spec.license       = "MIT"
+
+  spec.files         = `git ls-files`.split($/)
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^(test|spec|features)/})
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler", "~> 1.3"
+  spec.add_development_dependency "rake"
+
+  spec.add_development_dependency "rspec"
+end

data/lib/def_dsl.rb

@@ -0,0 +1,95 @@
+# PROTIP:
+#   use mixins for behavior, and classes only for classification!
+#
+# extended at the end of context class
+# rspec!!!!!!!!!!!!!
+
+
+# def def_dsl klass
+# end
+
+require "def_dsl/version"
+
+module DefDsl
+
+
+  def def_dsl const
+    define_dsl! self, [[const.name.to_s.underscore(self), const]]
+  end
+  alias define_dsl def_dsl  
+
+
+  def shallow_constants who
+    (who.constants - who.superclass.constants).map { |name| * = name.to_s.underscore, who.const_get(name) }
+  end
+
+
+  def define_dsl! who, constants=shallow_constants(who) # ...
+    # constants = constants.nil?? shallow_constants(who) : constants_info(constants)
+    constants.each do |mini, const|
+
+      next if const.included_modules.include? So
+      who.send :include, So
+      define_dsl! const if const.is_a? Class
+
+      who.class_eval do
+        define_method(mini) do |*a,&b|
+          so mini,*a,&b
+        end
+      end
+
+      # const.send :include, So if const.is_a? Module # or even class
+      # who.send :include, So if who.is_a? Module # or even class
+      if who.class == Module
+        who.send :module_function, mini
+        who.send :module_function, :so
+        who.send :module_function, :so1
+        who.send :module_function, :so2
+      end      
+    end
+  end 
+
+  module So
+    def so klass_name=nil,*a,&b
+      return @so if klass_name.nil?
+
+      klass_name = klass_name.to_sym
+
+      if self.class == Module
+        klass = self.const_get(klass_name.to_s.camelize)
+      else
+        klass = self.class.const_get(klass_name.to_s.camelize)
+      end
+
+      obj = klass.new(*a) #,&b)
+      obj.instance_eval &b if b
+      (@so ||= {}).tap { |h| h[klass_name] = h[klass_name] ? [h[klass_name], obj].flatten(1) : obj }
+    end
+    def so1(name)
+      value = @so[name]
+      value.is_a?(Array) ? value.last : value
+    end
+    def so2(name)
+      value = @so[name]
+      value.is_a?(Array) ? value : [value]
+    end    
+  end
+
+end
+DefDSL = DefDsl
+
+
+class String
+  def camelize
+    self.split(/[^a-z0-9]/i).map{|w| w.capitalize}.join
+  end
+
+  def underscore(relative_to=nil)
+    name = relative_to.nil?? self : self.sub(/^#{ relative_to.to_s }::/,'')
+    name.gsub(/::/, '/').
+         gsub(/([A-Z]+)([A-Z][a-z])/,'\1_\2').
+         gsub(/([a-z\d])([A-Z])/,'\1_\2').
+         tr("-", "_").
+         downcase
+  end
+end

data/lib/def_dsl/version.rb

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

data/spec/exmaple_spec.rb

@@ -0,0 +1,68 @@
+describe [DefDsl,DefDSL].join' or ' do
+  after { remove_const :My if defined? My }
+
+  example 'usage inside module' do
+    module My
+      # nice looking recursive dsl definition
+      class File < Struct.new :name; end
+      class Dir < Struct.new :name
+        Dir = Dir
+        File = File
+      end
+
+      extend DefDSL
+      def_dsl Dir
+      def_dsl File
+
+      file 'root.txt'
+      dir 'dir' do
+        dir 'inner' do
+          dir 'empty'
+          file 'any'
+        end
+      end
+
+      so.should == {file: so1(:file), dir: so1(:dir)}
+
+      so1(:file).name.should == 'root.txt'
+      so1(:dir).name.should == 'dir'
+      (inner = so1(:dir).send(:so1,:dir)).name.should == 'inner'
+      inner.send(:so2,:dir).map(&:name).should == ['empty']
+      inner.send(:so2,:file).map(&:name).should == ['any']
+    end
+  end
+
+  example 'usage inside object' do
+    class My
+
+      class File < Struct.new :name; end
+      class Dir < Struct.new :name
+        Dir = Dir
+        File = File
+      end
+
+      extend DefDSL
+      def_dsl Dir
+      def_dsl File      
+
+      def initialize
+        file 'root.txt'
+        dir 'dir' do
+          dir 'inner' do
+            dir 'empty'
+            file 'any'
+          end
+        end
+
+        so.should == {file: so1(:file), dir: so1(:dir)}
+
+        so1(:file).name.should == 'root.txt'
+        so1(:dir).name.should == 'dir'
+        (inner = so1(:dir).send(:so1,:dir)).name.should == 'inner'
+        inner.send(:so2,:dir).map(&:name).should == ['empty']
+        inner.send(:so2,:file).map(&:name).should == ['any']        
+      end
+    end
+    My.new
+  end
+end

data/spec/support/remove_const.rb

@@ -0,0 +1,3 @@
+def remove_const name
+  Object.send :remove_const, name  
+end

data/spec/support/require_self.rb

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

data/spec/support/spec_helper.rb

@@ -0,0 +1,9 @@
+# See http://rubydoc.info/gems/rspec-core/RSpec/Core/Configuration
+RSpec.configure do |config|
+  config.treat_symbols_as_metadata_keys_with_true_values = true
+  config.run_all_when_everything_filtered = true
+  config.filter_run :focus
+  config.order = 'random'
+end
+
+Dir["./spec/support/**/*.rb"].each {|f| require f} # no comment

metadata

@@ -0,0 +1,117 @@
+--- !ruby/object:Gem::Specification
+name: def_dsl
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Alexander K
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-04-18 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.3'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.3'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: easy way to build dsl without using dsl...
+email:
+- xpyro@ya.ru
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- .rspec
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- def_dsl.gemspec
+- lib/def_dsl.rb
+- lib/def_dsl/version.rb
+- spec/exmaple_spec.rb
+- spec/support/remove_const.rb
+- spec/support/require_self.rb
+- spec/support/spec_helper.rb
+homepage: https://github.com/sowcow/def_dsl
+licenses:
+- MIT
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+      segments:
+      - 0
+      hash: -563372381577040081
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+      segments:
+      - 0
+      hash: -563372381577040081
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.25
+signing_key: 
+specification_version: 3
+summary: easy way to build dsl without using dsl...
+test_files:
+- spec/exmaple_spec.rb
+- spec/support/remove_const.rb
+- spec/support/require_self.rb
+- spec/support/spec_helper.rb