yaml-model 1.0.1

data/.gitignore

@@ -0,0 +1,6 @@
+Gemfile.lock
+pkg/*
+*.gem
+.bundle
+vendor/*
+*.swp

data/Gemfile

@@ -0,0 +1,4 @@
+source "http://rubygems.org"
+
+# Specify your gem's dependencies in yaml-model.gemspec
+gemspec

data/Rakefile

@@ -0,0 +1,9 @@
+require 'bundler'
+Bundler::GemHelper.install_tasks
+
+task :default => :test
+
+desc "unit tests"
+task :test do
+  exec 'bundle exec rspec test/*.rb'
+end

data/lib/yaml-model.rb

@@ -0,0 +1,173 @@
+require 'yaml'
+require 'yaml-model/version'
+
+class YAML_Model
+
+  class Error < Exception
+  end
+
+  def self.reset!
+    @@database_filename = nil
+
+    @@database = {
+      :next_oid => 1,
+      :data => {}
+    }
+  end
+
+  reset!
+
+  attr_reader :id
+
+  @@volatile = [ :@volatile ]
+
+  def self.all
+    @@database[ :data ][ self.name ] ||= []
+  end
+
+  def assert( assertion, info )
+    raise Error.new( info.inspect ) unless assertion
+  end
+
+  def assert_type( variable, types )
+    assert( [types].flatten.inject(false){|result,type|result||=(type===variable)}, "Invalid type: `#{variable.class.name}`" )
+  end
+
+  def self.type attribute, types, &block
+    define_method attribute do
+      instance_eval "@#{attribute}"
+    end
+    define_method "#{attribute}=".to_sym do |value|
+      assert_type value, types
+      instance_exec( value, &block ) if block_given?
+      instance_eval "@#{attribute} = value"
+    end
+  end
+
+  def self.init *attributes, &block
+    define_method :initialize do |*args|
+      attributes.each do |attribute|
+        self.send( "#{attribute}=".to_sym, args.shift )
+      end
+      self.instance_eval( &block ) if block_given?
+    end
+  end
+
+  def self.[]( id )
+    all.select{|n|n.id==id}.first
+  end
+
+  def self.load!
+    @@database = YAML.load( File.read( @@database_filename.to_s ) ) if File.exists?( @@database_filename.to_s )
+  end
+
+  def self.filename=( filename )
+    @@database_filename = filename
+    self.load!
+  end
+
+  def self.to_yaml
+    @@database.to_yaml
+  end
+
+  def self.save!
+    if @@database_filename
+      File.open( @@database_filename, 'w' ) do |file|
+        file.write( self.to_yaml )
+      end
+    end
+  end
+
+  def self.each &block
+    all.each &block
+  end
+
+  def self.select &block
+    all.select &block
+  end
+
+  def self.filter hash
+    select do |this|
+      hash.keys.inject( true ) do |result,variable|
+        this.instance_eval( "@#{variable}" ) == hash[ variable ]
+      end
+    end
+  end
+
+  def self.volatile variable
+    @@volatile << "@#{variable}".to_sym
+  end
+
+  def to_yaml_properties
+    instance_variables - @@volatile
+  end
+
+  def self.create( *args )
+    this = self.new( *args )
+    this.instance_eval do
+      @id = @@database[ :next_oid ]
+      @id.freeze
+    end
+    @@database[ :next_oid ] += 1
+    @@database[ :data ][ this.class.name ] ||= []
+    @@database[ :data ][ this.class.name ] << this
+    this
+  end
+
+  def delete
+    @@database[ :data ][ self.class.name ].delete( self )
+  end
+
+  def self.sort_by( *attributes )
+    define_method '<=>'.to_sym do |other|
+      attributes.map{|a|self.send(a)} <=> attributes.map{|a|other.send(a)}
+    end
+  end
+
+  sort_by :id
+
+  def self.has( that_attribute_plural, that_class, many_to_many = false )
+    if many_to_many
+      this_class = self
+      this_class_name, that_class_name = [this_class,that_class].map{|n|n.name.split(':')[-1]}
+      this_attribute_singular = this_class_name.downcase.to_sym
+      that_attribute_singular = that_class_name.downcase.to_sym
+      via_class_name = [ this_class_name, that_class_name ].sort.map{|n|n.capitalize}.join('')
+      via_class = eval( "#{via_class_name}||=Class.new(YAML_Model)" )
+      via_attribute_plural = ( via_class_name.downcase + "s" ).to_sym
+
+      if via_class.instance_variables.empty?
+        via_class.type this_attribute_singular, this_class
+        via_class.type that_attribute_singular, that_class
+      end
+
+      this_class.has via_attribute_plural, via_class
+
+      define_method that_attribute_plural do
+        send( via_attribute_plural ).map do |via_instance|
+          via_instance.send( that_attribute_singular )
+        end
+      end
+
+      define_method "add_#{that_attribute_singular}".to_sym do |that_instance|
+        via_instance = via_class.create
+        via_instance.send( "#{this_attribute_singular}=".to_sym, self )
+        via_instance.send( "#{that_attribute_singular}=".to_sym, that_instance )
+      end
+
+    else
+
+      define_method that_attribute_plural do
+        that_class.select do |that_instance|
+          that_instance.instance_variables.inject( false ) do |result,variable|
+            result ||= that_instance.instance_eval(variable.to_s).class == self.class && that_instance.instance_eval(variable.to_s).id == self.id
+          end
+        end
+      end
+
+    end
+  end
+
+  at_exit { self.save! }
+
+end

data/lib/yaml-model/version.rb

@@ -0,0 +1,3 @@
+class YAML_Model
+  VERSION = "1.0.1"
+end

data/test/has.rb

@@ -0,0 +1,77 @@
+require 'yaml-model'
+
+describe YAML_Model, "::has" do
+
+  before( :each ) do
+    YAML_Model.reset!
+  end
+
+  it "creates a method of the correct attribute name" do
+    User = Class.new( YAML_Model )
+    class User < YAML_Model
+      has :posts, Class.new( YAML_Model )
+    end
+    User.instance_methods.index( :posts ).should_not == nil
+  end
+
+  it "correctly references items that belong to it" do
+    User = Class.new( YAML_Model )
+    Post = Class.new( YAML_Model )
+    class Post < YAML_Model
+      type :user, User
+      init :user
+    end
+    class User < YAML_Model
+      has :posts, Post
+    end
+
+    user_a = User.create
+    user_b = User.create
+    user_c = User.create
+    post_a = Post.create( user_a )
+    post_b = Post.create( user_a )
+    post_c = Post.create( user_c )
+
+    user_a.posts.should == [ post_a, post_b ]
+    user_b.posts.should == []
+    user_c.posts.should == [ post_c ]
+  end
+
+  it "adds an add_ method when the relationship is many_to_many" do
+    Tag = Class.new( YAML_Model )
+    Post = Class.new( YAML_Model )
+    class Post < YAML_Model
+      has :tags, Tag, :many_to_many
+    end
+    Post.instance_methods.index( :add_tag ).should_not == nil
+    Tag.instance_methods.index( :add_post ).should == nil
+  end
+
+  it "handles many to many relationships seamlessly" do
+    Tag = Class.new( YAML_Model )
+    Post = Class.new( YAML_Model )
+    Post.has :tags, Tag, :many_to_many
+    Tag.has :posts, Post, :many_to_many
+
+    post_a = Post.create
+    post_b = Post.create
+    post_c = Post.create
+
+    tag_a = Tag.create
+    tag_b = Tag.create
+    tag_c = Tag.create
+
+    post_a.add_tag( tag_a )
+    post_a.add_tag( tag_b )
+    tag_b.add_post( post_c )
+
+    post_a.tags.sort.should == [ tag_a, tag_b ].sort
+    post_b.tags.should == []
+    post_c.tags.should == [ tag_b ]
+
+    tag_a.posts.should == [ post_a ]
+    tag_b.posts.sort.should == [ post_a, post_c ].sort
+    tag_c.posts.should == []
+  end
+
+end

data/test/init.rb

@@ -0,0 +1,34 @@
+require 'yaml-model'
+
+describe YAML_Model, "::init" do
+
+  before( :each ) do
+    YAML_Model.reset!
+  end
+
+  it "runs the block it's given" do
+    $ran_it = false
+    Test = Class.new( YAML_Model )
+    class Test < YAML_Model
+      init do
+        $ran_it = true
+      end
+    end
+    $ran_it.should == false
+    Test.create
+    $ran_it.should == true
+  end
+
+  it "can set instance varibles inside blocks it's given" do
+    Test = Class.new( YAML_Model )
+    class Test < YAML_Model
+      type :name, String
+      init :name do
+        @name = "Bar"
+      end
+    end
+    test = Test.create( "Foo" )
+    test.name.should == "Bar"
+  end
+
+end

data/yaml-model.gemspec

@@ -0,0 +1,23 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "yaml-model/version"
+
+Gem::Specification.new do |s|
+  s.name        = "yaml-model"
+  s.version     = YAML_Model::VERSION
+  s.platform    = Gem::Platform::RUBY
+  s.authors     = ["Clive Crous"]
+  s.email       = ["clive@crous.co.za"]
+  s.homepage    = "http://www.darkarts.co.za/yaml-model"
+  s.summary     = %q{A NoSQL data model with data stored as YAML}
+  s.description = %q{A NoSQL data model with data stored as YAML}
+
+  s.add_development_dependency "bundler", ">= 1.0.0"
+  s.add_development_dependency "rspec", ">= 1.3.0"
+  s.add_development_dependency "rake", ">= 0.8.7"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+end

metadata

@@ -0,0 +1,118 @@
+--- !ruby/object:Gem::Specification 
+name: yaml-model
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 1
+  - 0
+  - 1
+  version: 1.0.1
+platform: ruby
+authors: 
+- Clive Crous
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-01-27 00:00:00 +02:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: bundler
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 1
+        - 0
+        - 0
+        version: 1.0.0
+  type: :development
+  prerelease: false
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 1
+        - 3
+        - 0
+        version: 1.3.0
+  type: :development
+  prerelease: false
+  version_requirements: *id002
+- !ruby/object:Gem::Dependency 
+  name: rake
+  requirement: &id003 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 0
+        - 8
+        - 7
+        version: 0.8.7
+  type: :development
+  prerelease: false
+  version_requirements: *id003
+description: A NoSQL data model with data stored as YAML
+email: 
+- clive@crous.co.za
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- .gitignore
+- Gemfile
+- Rakefile
+- lib/yaml-model.rb
+- lib/yaml-model/version.rb
+- test/has.rb
+- test/init.rb
+- yaml-model.gemspec
+has_rdoc: true
+homepage: http://www.darkarts.co.za/yaml-model
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: -961508909
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: -961508909
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: A NoSQL data model with data stored as YAML
+test_files: []
+