keso 0.1.3

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,21 @@
+## MAC OS
+.DS_Store
+
+## TEXTMATE
+*.tmproj
+tmtags
+
+## EMACS
+*~
+\#*
+.\#*
+
+## VIM
+*.swp
+
+## PROJECT::GENERAL
+coverage
+rdoc
+pkg
+
+## PROJECT::SPECIFIC

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Darwin B Blomqvist
+
+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.rdoc

@@ -0,0 +1,23 @@
+= keso
+
+A relation implementation based in inspiration from "The Third Manifesto".
+
+The goal of this to make it easier to organize data.
+
+This is a evolutionary project that will change shape with changing understudying of the problem.
+
+If you find Keso interesting checkout this other http://github.com/dkubb/veritas.
+
+== Note on Patches/Pull Requests
+ 
+* Fork the project.
+* Make your feature addition or bug fix.
+* Add tests for it. This is important so I don't break it in a
+  future version unintentionally.
+* Commit, do not mess with rakefile, version, or history.
+  (if you want to have your own version, that is fine but bump version in a commit by itself I can ignore when I pull)
+* Send me a pull request. Bonus points for topic branches.
+
+== Copyright
+
+Copyright (c) 2010 Darwin B Blomqvist. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,44 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "keso"
+    gem.summary = %Q{Cottage cheees with lots of relational theory}
+    gem.description = %Q{Cottage cheees with lots of relational theory. Or mabye not so much theory =(}
+    gem.email = "darwin@markkonsulter.se"
+    gem.homepage = "http://github.com/bjornblomqvist/keso"
+    gem.authors = ["Darwin"]
+    gem.add_development_dependency "rspec", ">= 1.2.9"
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: gem install jeweler"
+end
+
+# require 'spec/rake/spectask'
+# Spec::Rake::SpecTask.new(:spec) do |spec|
+#   spec.libs << 'lib' << 'spec'
+#   spec.spec_files = FileList['spec/**/*_spec.rb']
+# end
+
+# Spec::Rake::SpecTask.new(:rcov) do |spec|
+#   spec.libs << 'lib' << 'spec'
+#   spec.pattern = 'spec/**/*_spec.rb'
+#   spec.rcov = true
+# end
+
+# task :spec => :check_dependencies
+# 
+# task :default => :spec
+# 
+# require 'rake/rdoctask'
+# Rake::RDocTask.new do |rdoc|
+#   version = File.exist?('VERSION') ? File.read('VERSION') : ""
+# 
+#   rdoc.rdoc_dir = 'rdoc'
+#   rdoc.title = "keso #{version}"
+#   rdoc.rdoc_files.include('README*')
+#   rdoc.rdoc_files.include('lib/**/*.rb')
+# end

data/VERSION

@@ -0,0 +1 @@
+0.1.3

data/keso.gemspec

@@ -0,0 +1,72 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{keso}
+  s.version = "0.1.3"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Darwin"]
+  s.date = %q{2010-10-29}
+  s.description = %q{Cottage cheees with lots of relational theory. Or mabye not so much theory =(}
+  s.email = %q{darwin@markkonsulter.se}
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+     ".gitignore",
+     "LICENSE",
+     "README.rdoc",
+     "Rakefile",
+     "VERSION",
+     "keso.gemspec",
+     "lib/keso.rb",
+     "lib/realvar.rb",
+     "lib/values/attribute.rb",
+     "lib/values/heading.rb",
+     "lib/values/immutable_hash.rb",
+     "lib/values/immutable_set.rb",
+     "lib/values/relation.rb",
+     "lib/values/tuple.rb",
+     "spec/attribute_spec.rb",
+     "spec/heading_spec.rb",
+     "spec/immutable_hash_spec.rb",
+     "spec/immutable_set_spec.rb",
+     "spec/relation_spec.rb",
+     "spec/spec.opts",
+     "spec/spec_helper.rb",
+     "spec/tuple_spec.rb"
+  ]
+  s.homepage = %q{http://github.com/bjornblomqvist/keso}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.7}
+  s.summary = %q{Cottage cheees with lots of relational theory}
+  s.test_files = [
+    "spec/attribute_spec.rb",
+     "spec/heading_spec.rb",
+     "spec/immutable_hash_spec.rb",
+     "spec/immutable_set_spec.rb",
+     "spec/relation_spec.rb",
+     "spec/spec_helper.rb",
+     "spec/tuple_spec.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<rspec>, [">= 1.2.9"])
+    else
+      s.add_dependency(%q<rspec>, [">= 1.2.9"])
+    end
+  else
+    s.add_dependency(%q<rspec>, [">= 1.2.9"])
+  end
+end
+

data/lib/keso.rb

@@ -0,0 +1,8 @@
+
+require File.dirname(__FILE__)+'/values/immutable_hash'
+require File.dirname(__FILE__)+'/values/immutable_set'
+require File.dirname(__FILE__)+'/values/attribute'
+require File.dirname(__FILE__)+'/values/heading'
+require File.dirname(__FILE__)+'/values/tuple'
+require File.dirname(__FILE__)+'/values/relation'
+

data/lib/realvar.rb

@@ -0,0 +1,12 @@
+
+
+A relatinal variable
+
+  Can take a relational value
+  Can have constraints to the relatinal value
+  
+  
+
+
+
+

data/lib/values/attribute.rb

@@ -0,0 +1,44 @@
+
+class Attribute
+  attr_reader :name,:type
+  
+  def initialize name_or_hash,type = nil
+    name = nil
+    if name_or_hash.is_a? Hash
+      name = name_or_hash[:name]
+      type = name_or_hash[:type]
+    else
+      name = name_or_hash
+    end
+    
+    unless(type.is_a?(Class) || type.is_a?(Heading))
+      type = type.class
+    end
+    
+    throw "Type cant be nil, :#{name} => #{type}" if type == NilClass
+      
+    
+    @name = name.to_s
+    @type = type
+  end
+  
+  def eql? other
+    self == other
+  end
+  
+  def hash
+    name.hash + type.hash
+  end
+  
+  def == object
+    if object.equal?(self)
+      true
+    elsif !self.class.equal?(object.class)
+      false
+    else
+      object.name == self.name && object.type == self.type
+    end
+  end
+  
+end
+

data/lib/values/heading.rb

@@ -0,0 +1,125 @@
+
+class Heading
+  
+  def initialize values = nil
+    @attributes = ImmutableSet.new
+    
+    if values.is_a? Attribute
+      @attributes = @attributes.add values
+    elsif values.is_a? ImmutableSet
+      @attributes = values
+    elsif values.is_a? Hash
+      @attributes = @attributes.add(Attribute.new(values))
+    elsif values.is_a? Heading
+      values.get_attributes.each do |attribute|
+        @attributes = @attributes.add(attribute)
+      end
+    elsif values.nil?
+      # Nil is the same as a no params
+    else
+      raise 'Invalid parameter, expected a hash with name and type or a attribute'
+    end
+  end
+  
+  def names
+    toReturn = []
+    @attributes.each do |attribute|
+      toReturn << attribute.name
+    end
+    
+    toReturn
+  end
+  
+  def add values
+    if values.is_a? Attribute
+      Heading.new(@attributes.add(values))
+    elsif values.is_a? Hash
+      Heading.new(@attributes.add(Attribute.new(values)))
+    elsif values.is_a? Heading
+      toReturn = Heading.new(self)
+      values.get_attributes.each do |attribute|
+        toReturn = toReturn.add(attribute)
+      end
+      toReturn
+    else
+      throw "Unknown argument #{values.class}"
+    end
+  end
+  
+  def hash
+    @attributes.hash
+  end
+  
+  def == object
+    if object.equal?(self)
+      true
+    elsif !self.class.equal?(object.class)
+      false
+    else
+      self.get_attributes.eql?(object.get_attributes)
+    end
+  end
+  
+  def eql? other
+    self == other
+  end
+  
+  def each &block
+    @attributes.each do |value|
+      block.call value
+    end
+  end
+  
+  def [] attribute_name
+    @attributes.to_a.each do |value|
+      if value.name == attribute_name.to_s
+        return value
+      end
+    end
+    
+    nil
+  end
+  
+  def rename from,to
+    throw "Missing from" if self[from].nil?
+    throw "to already exists" unless self[to].nil?
+    
+    Heading.new(@attributes).remove(from).add(:name => to, :type => self[from].type)
+  end
+  
+  def remove attribute_or_name
+    if attribute_or_name.is_a? Attribute
+      Heading.new(@attributes.remove(attribute_or_name))
+    else
+      result = nil
+      @attributes.to_a.each do |value|
+        if value.name == attribute_or_name.to_s
+          result = value
+        end
+      end
+      if result
+        Heading.new(@attributes.remove(result))
+      else
+        Heading.new @attributes
+      end
+    end
+  end
+  
+  def count
+    @attributes.count
+  end
+  
+  def first 
+    @attributes.to_a.first
+  end
+  
+  protected
+  
+  def get_attributes
+    @attributes
+  end
+  
+end
+
+
+

data/lib/values/immutable_hash.rb

@@ -0,0 +1,112 @@
+
+class ImmutableHash
+  
+  def initialize key_or_hash = nil,value = nil
+    
+    @hash = {}
+    
+    if key_or_hash.is_a?(ImmutableHash) || key_or_hash.is_a?(Hash)
+      key_or_hash.keys.each do |key|
+        @hash[key] = key_or_hash[key]
+      end
+    elsif !key_or_hash.nil?
+      @hash[key_or_hash] = value
+    end
+  end
+  
+  def [] key
+    @hash[key]
+  end
+  
+  def set key_or_hash,value = nil
+    add key_or_hash,value
+  end
+
+  def keys
+    @hash.keys
+  end
+  
+  def values
+    @hash.values
+  end
+  
+  def count
+    @hash.count
+  end
+  
+  def size
+    @hash.size
+  end
+  
+  def - to_remove
+    delete to_remove
+  end
+  
+  def each
+    @hash.each do |key,value|
+      yield key,value
+    end
+  end
+  
+  def delete *to_remove
+    
+    newHash = @hash.clone
+    
+    to_remove.each do |to_remove|
+      if to_remove.is_a?(ImmutableHash) || to_remove.is_a?(Hash)
+        to_remove.keys.each do |value|
+          newHash.delete value if newHash[value] == to_remove[value]
+        end
+      elsif to_remove.is_a? Array 
+        to_remove.each do |value|
+          newHash.delete value
+        end
+      else
+        newHash.delete to_remove
+      end
+    end
+    
+    ImmutableHash.new newHash
+  end
+  
+  def add key_or_hash,value = nil
+    if key_or_hash.is_a?(ImmutableHash) || key_or_hash.is_a?(Hash)
+      newHash = @hash.clone
+      key_or_hash.keys.each do |key|
+        newHash[key] = key_or_hash[key]
+      end
+      ImmutableHash.new(newHash)
+    else
+      newHash = @hash.clone
+      newHash[key_or_hash] = value
+      ImmutableHash.new newHash
+    end
+  end
+  
+  def == object
+    eql? object
+  end
+  
+  def eql?(object)
+    if object.equal?(self)
+      true
+    elsif !self.class.equal?(object.class)
+      false
+    else
+      self.inner_hash.eql?(object.inner_hash)
+    end
+  end
+  
+  def hash
+    @hash.hash
+  end
+  
+  protected
+  
+  def inner_hash
+    @hash
+  end
+  
+end
+
+