manufactory 0.0.1

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Jakub Stastny
+
+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.textile

@@ -0,0 +1,31 @@
+h1. About
+
+Manufactory is a minimalistic and clean rewrite of machinist with some improvements.
+
+h1. What is different?
+
+h2. Real DataMapper Support
+
+Machinist doesn't work with DataMapper right now. It's not a machinist problem, it's DataMapper issue, but who cares, it just doesn't work.
+
+h2. Initialization
+
+initialization: model_class.new(attrs), so the hooks for default will be fired. it would be even if we do just modelclass.new, but if we have title and slug is created from the title ....
+
+h2. Named Blueprints
+
+# 2) You have to have one unnamed blueprint, otherwise you can't create the named ones
+
+h2. Inheritance isn't implicit
+
+# 3) It uses the default blueprint
+# PaymentType.make(:paypal)
+# => #<PaymentType @id=15 @name="PayPal" @shortcut="cod"> 
+# PaymentType.new(name: "PayPal")
+# => #<PaymentType @id=nil @name="PayPal" @shortcut="paypal">
+
+
+PaymentType.blueprint(:paypel, PaymentType.blueprint)
+  name "PayPal"
+  shortcut nil
+end

data/Rakefile

@@ -0,0 +1 @@
+# TODO: runcoderun

data/lib/manufactory/adapters/datamapper.rb

@@ -0,0 +1,3 @@
+# encoding: utf-8
+
+require "manufactory"

data/lib/manufactory/adapters/object.rb

@@ -0,0 +1,46 @@
+# encoding: utf-8
+
+require "manufactory"
+
+module Manufactory
+  module ObjectMixin
+    # Post.make
+    # Post.make(:named)
+    # Post.make(first_name: "Jakub")
+    # Post.make(named, first_name: "Jakub")
+    # Post.make(named, first_name: "Jakub") do
+    #   self.whatever = whatever
+    # end
+    def make(name = :default, attributes = Hash.new, &block)
+      name, attributes = :default, name if name.is_a?(Hash) && attributes.empty?
+      callables = self.blueprints[name]
+      adapter = ObjectAdapter.new(self, name, callables)
+      instance = adapter.run(attributes)
+      instance.instance_eval(&block) if block_given?
+      return instance
+    end
+  end
+
+  # ObjectAdapter.new(Object.new, *args)
+  # NOTE: first argument is an object, not a class!
+  class ObjectAdapter < Adapter
+    def has_association?(object, attribute)
+      false
+    end
+    
+    protected
+    def initialize_object(klass, default_attributes, attributes)
+      attributes = default_attributes.merge(attributes)
+      instance   = klass.new
+      attributes.each do |attribute, value|
+        instance.send("#{attribute}=", value)
+      end
+      return instance
+    end
+  end
+end
+
+class Object
+  extend Manufactory::Blueprints
+  extend Manufactory::ObjectMixin
+end

data/lib/manufactory/sham.rb

@@ -0,0 +1,81 @@
+# encoding: utf-8
+
+module Manufactory
+  class Sham
+    @@shams = Hash.new
+
+    # Over-ride module's built-in name method, so we can re-use it for
+    # generating names. This is a bit of a no-no, but we get away with
+    # it in this context.
+    def self.name(*args, &block)
+      method_missing(:name, *args, &block)
+    end
+
+    def self.method_missing(symbol, *args, &block)
+      if block_given?
+        @@shams[symbol] = Sham.new(symbol, args.pop || {}, &block)
+      else
+        sham = @@shams[symbol]
+        raise "No sham defined for #{symbol}" if sham.nil?
+        sham.fetch_value
+      end
+    end
+
+    def self.clear
+      @@shams = {}
+    end
+
+    def self.reset(scope = :before_all)
+      @@shams.values.each { |sham| sham.reset(scope) }
+    end
+
+    def self.define(&block)
+      Sham.instance_eval(&block)
+    end
+
+    def initialize(name, options = {}, &block)
+      @name      = name
+      @generator = block
+      @offset    = 0
+      @unique    = options.has_key?(:unique) ? options[:unique] : true
+      generate_values(12)
+    end
+
+    def reset(scope)
+      if scope == :before_all
+        @offset, @before_offset = 0, nil
+      elsif @before_offset
+        @offset = @before_offset
+      else
+        @before_offset = @offset
+      end
+    end
+
+    def fetch_value
+      # Generate more values if we need them.
+      if @offset >= @values.length
+        generate_values(2 * @values.length)
+        raise "Can't generate more unique values for Sham.#{@name}" if @offset >= @values.length
+      end
+      result = @values[@offset]
+      @offset += 1
+      result
+    end
+
+  private
+
+    def generate_values(count)
+      @values = seeded { (1..count).map(&@generator) }
+      @values.uniq! if @unique
+    end
+
+    def seeded
+      begin
+        srand(1)
+        yield
+      ensure
+        srand
+      end
+    end
+  end
+end

data/lib/manufactory.rb

@@ -0,0 +1,132 @@
+# encoding: utf-8
+
+require "manufactory/sham"
+
+module Manufactory
+  # ActiveRecord::Base.extend(Manufactory::Blueprints)
+  # Post.blueprint(&block)
+  module Blueprints
+    def blueprints
+      @blueprints ||= Hash.new
+    end
+
+    def blueprint(name = :default, parent = nil, &block)
+      self.blueprints[name] ||= Array.new
+      self.blueprints[name].push(*parent)
+      self.blueprints[name].push(block) if block_given?
+      self.blueprints[name]
+    end
+  end
+
+  # Adapter.new(User, :admin, age: 24)
+  class Adapter
+    attr_reader :klass, :name, :callables
+    def initialize(klass, name, callables)
+      @klass   = klass
+      @name    = name
+      @callables = callables
+    end
+
+    def run(attributes = Hash.new)
+      blueprint = klass.blueprints[name.to_sym]
+      raise "No blueprint #{name} for class #{klass}" if blueprint.nil?
+      default_attributes = Hash.new
+      self.callables.each do |callable|
+        default_attributes.merge!(DSL.new(self, callable).run)
+      end
+      self.initialize_object(klass, default_attributes, attributes)
+    end
+
+    protected
+    def initialize_object(klass, default_attributes, attributes)
+      klass.new(default_attributes.merge(attributes))
+    end
+  end
+
+  # DSL is used to execute the blueprint and construct an object.
+  # The blueprint is instance_eval'd against the Lathe.
+  class DSL
+    attr_reader :adapter, :blueprint
+    def initialize(adapter, blueprint)
+      @adapter   = adapter
+      @blueprint = blueprint
+    end
+
+    def run
+      self.instance_eval(&self.blueprint)
+      assigned_attributes
+    end
+
+    def object
+      yield @object if block_given?
+      @object
+    end
+    
+    def method_missing(symbol, *args, &block)
+      if attribute_assigned?(symbol)
+        # If we've already assigned the attribute, return that.
+        @object.send(symbol)
+      elsif @adapter.has_association?(@object, symbol) && !nil_or_empty?(@object.send(symbol))
+        # If the attribute is an association and is already assigned, return that.
+        @object.send(symbol)
+      else
+        # Otherwise generate a value and assign it.
+        assigned_attributes[symbol] = generate_attribute_value(symbol, *args, &block)
+      end
+    end
+
+    def assigned_attributes
+      @assigned_attributes ||= {}
+    end
+    
+    # Undef a couple of methods that are common ActiveRecord attributes.
+    # (Both of these are deprecated in Ruby 1.8 anyway.)
+    undef_method :id   if respond_to?(:id)
+    undef_method :type if respond_to?(:type)
+    
+  private
+    
+    def nil_or_empty?(object)
+      object.respond_to?(:empty?) ? object.empty? : object.nil?
+    end
+    
+    def attribute_assigned?(key)
+      assigned_attributes.has_key?(key.to_sym)
+    end
+    
+    def generate_attribute_value(attribute, *args)
+      if block_given?
+        # If we've got a block, use that to generate the value.
+        yield
+      else
+        # Otherwise, look for an association or a sham.
+        if @adapter.has_association?(object, attribute)
+          @adapter.class_for_association(object, attribute).make(args.first || {})
+        elsif args.empty?
+          Sham.send(attribute)
+        else
+          # If we've got a constant, just use that.
+          args.first
+        end
+      end
+    end
+    
+  end
+
+  # This sets a flag that stops make from saving objects, so
+  # that calls to make from within a blueprint don't create
+  # anything inside make_unsaved.
+  def self.with_save_nerfed
+    begin
+      @@nerfed = true
+      yield
+    ensure
+      @@nerfed = false
+    end
+  end
+
+  @@nerfed = false
+  def self.nerfed?
+    @@nerfed
+  end
+end

data/spec/manufactory/sham_spec.rb

@@ -0,0 +1,97 @@
+# encoding: utf-8
+
+require File.dirname(__FILE__) + '/spec_helper'
+require 'sham'
+
+describe Sham do
+  it "should ensure generated values are unique" do
+    Sham.clear
+    Sham.half_index {|index| index/2 }
+    values = (1..10).map { Sham.half_index }
+    values.should == (0..9).to_a
+  end
+
+  it "should generate non-unique values when asked" do
+    Sham.clear
+    Sham.coin_toss(:unique => false) {|index| index % 2 == 1 ? 'heads' : 'tails' }
+    values = (1..4).map { Sham.coin_toss }
+    values.should == ['heads', 'tails', 'heads', 'tails']
+  end
+  
+  it "should generate more than a dozen values" do
+    Sham.clear
+    Sham.index {|index| index }
+    values = (1..25).map { Sham.index }
+    values.should == (1..25).to_a
+  end
+    
+  it "should generate the same sequence of values after a reset" do
+    Sham.clear
+    Sham.random { rand }
+    values1 = (1..10).map { Sham.random }
+    Sham.reset
+    values2 = (1..10).map { Sham.random }
+    values2.should == values1
+  end
+
+  it "should alias reset with reset(:before_all)" do
+    Sham.clear
+    Sham.random { rand }
+    values1 = (1..10).map { Sham.random }
+    Sham.reset(:before_all)
+    values2 = (1..10).map { Sham.random }
+    values2.should == values1
+  end
+
+  it "should generate the same sequence of values after each reset(:before_each)" do
+    Sham.clear
+    Sham.random { rand }
+    values1 = (1..10).map { Sham.random }
+    Sham.reset(:before_each)
+    values2 = (1..10).map { Sham.random }
+    Sham.reset(:before_each)
+    values3 = (1..10).map { Sham.random }
+    values2.should_not == values1
+    values3.should == values2
+  end
+
+  it "should generate a different sequence of values after reset(:before_all) followed by reset(:before_each)" do
+    Sham.clear
+    Sham.random { rand }
+    (1..10).map { Sham.random }
+    Sham.reset(:before_each)
+    values1 = (1..10).map { Sham.random }
+    Sham.reset(:before_all)
+    (1..5).map { Sham.random }
+    Sham.reset(:before_each)
+    values2 = (1..10).map { Sham.random }
+    values2.should_not == values1
+  end
+
+  it "should die when it runs out of unique values" do
+    Sham.clear
+    Sham.limited {|index| index%10 }
+    lambda {
+      (1..100).map { Sham.limited }
+    }.should raise_error(RuntimeError)
+  end
+  
+  it "should allow over-riding the name method" do
+    Sham.clear
+    Sham.name  {|index| index }
+    Sham.name.should == 1
+  end
+  
+  describe "define method" do
+    it "should repeat messages in its block to Sham" do
+      block = Proc.new {}
+      Sham.should_receive(:name).with(&block).once.ordered
+      Sham.should_receive(:slug).with(:arg, &block).once.ordered
+      Sham.define do
+        name &block
+        slug :arg, &block
+      end
+    end
+  end
+  
+end

data/spec/manufactory_spec.rb

@@ -0,0 +1,47 @@
+# encoding: utf-8
+
+require_relative "spec_helper"
+require "manufactory/adapters/object"
+
+Post = HashStruct.new(:title, :body, :published)
+
+describe Manufactory do
+  before(:each) do
+    Post.blueprints.clear
+  end
+
+  describe "set attribute" do
+    it "should set an attribute if value for the attribute is provided" do
+      Post.blueprint { title "Hello World!" }
+      Post.make.title.should eql("Hello World!")
+    end
+
+    it "should set an attribute to return value of block if block is provided" do
+      Post.blueprint { title {"Hello World!"} }
+      Post.make.title.should eql("Hello World!")
+    end
+  end
+  
+  describe "inheritance" do
+    it "should be able to inherit attributes" do
+      Post.blueprint { published false }
+      Post.blueprint(:first, Post.blueprint) do
+        title "Hello World!"
+      end
+      Post.make(:first).published.should be_false
+      Post.make(:first).title.should eql("Hello World!")
+    end
+
+    it "should " do
+      Post.blueprint { published false }
+      Post.blueprint(:first, Post.blueprint) do
+        published true
+      end
+      Post.make(:first).published.should be_true
+    end
+  end
+  
+  it "should raise for make on a class with no blueprint" do
+    lambda { Post.make }.should raise_error(RuntimeError)
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,9 @@
+# encoding: utf-8
+
+require "hash_struct"
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), "..", "lib"))
+
+Spec::Runner.configure do |config|
+  config.before(:each) { Sham.reset }
+end

metadata

@@ -0,0 +1,73 @@
+--- !ruby/object:Gem::Specification 
+name: manufactory
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- "Jakub \xC5\xA0\xC5\xA5astn\xC3\xBD aka Botanicus"
+autorequire: 
+bindir: bin
+cert_chain: 
+date: 2009-11-28 00:00:00 +00:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hash_struct
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: ""
+email: knava.bestvinensis@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- lib/manufactory/adapters/datamapper.rb
+- lib/manufactory/adapters/object.rb
+- lib/manufactory/sham.rb
+- lib/manufactory.rb
+- spec/manufactory/sham_spec.rb
+- spec/manufactory_spec.rb
+- spec/spec_helper.rb
+- CHANGELOG
+- LICENSE
+- Rakefile
+- README.textile
+has_rdoc: true
+homepage: http://github.com/botanicus/manufactory
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: 1.9.1
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: manufactory
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Manufactory is a minimalistic and clean rewrite of machinist with some improvements.
+test_files: []
+