ruport 0.7.2 → 0.8.0

data/lib/ruport/data/collection.rb

@@ -1,65 +0,0 @@
-# The Ruport Data Collections.
-# Authors: Gregory Brown / Dudley Flanders
-#
-# This is Free Software.  For details, see LICENSE and COPYING
-# Copyright 2006 by respective content owners, all rights reserved.
-
-module Ruport::Data
-  
-  # === Overview
-  #
-  # This is the base class for Ruport's Data structures. It mixes in the 
-  # <tt>Taggable</tt> module and provides methods for converting between 
-  # <tt>Data::Set</tt>s and <tt>Data::Table</tt>s.
-  #
-  class Collection
-    require "forwardable"
-    extend Forwardable
-    include Enumerable
-    include Taggable
-    
-    def initialize(data=nil,options={}) #:nodoc:
-      @data = data.dup if data
-    end
-
-    # A simple formatting tool which allows you to quickly generate a formatted
-    # table from a <tt>Collection</tt> object.
-    #
-    # If given a block, the Renderer::Table object will be yielded
-    #
-    #
-    # Examples:
-    #
-    #   my_collection.as(:csv)  #=> "1,2,3\n4,5,6"
-    #
-    #   my_collection.as(:csv) { |e| e.layout.show_table_headers = false }
-    def as(type)
-      Ruport::Renderer::Table.render(type) do |rend|
-        rend.data = self
-        yield(rend) if block_given?
-      end
-    end
-
-    # Converts a <tt>Collection</tt> object to a <tt>Data::Set</tt>.
-    def to_set
-      Set.new :data => data
-    end
-   
-    # Converts a <tt>Collection</tt> object to a <tt>Data::Table</tt>.
-    def to_table(options={})
-      Table.new({:data => data.map { |r| r.to_a }}.merge(options))
-    end
-
-    # Provides a shortcut for the <tt>as()</tt> method by converting a call to
-    # <tt>as(:format_name)</tt> into a call to <tt>to_format_name</tt>
-    # 
-    def method_missing(id,*args)
-     return as($1.to_sym) if id.to_s =~ /^to_(.*)/ 
-     super
-    end
-    
-    attr_reader :data
-    def_delegators :@data, :each, :length, :size, :empty?
-  end
-end
-

data/lib/ruport/data/set.rb

@@ -1,148 +0,0 @@
-# The Ruport Data Collections.
-# Authors: Gregory Brown / Dudley Flanders
-#
-# This is Free Software.  For details, see LICENSE and COPYING
-# Copyright 2006 by respective content owners, all rights reserved.
-require 'set'
-
-module Ruport::Data
-  
-  # === Overview
-  #
-  # This class is one of the core classes for building and working with data 
-  # in Ruport. The idea is to get your data into a standard form, regardless 
-  # of its source (a database, manual arrays, ActiveRecord, CSVs, etc.).
-  # 
-  # Set is intended to be used as the data store for unstructured data -
-  # Ruport::Data::Table is an alternate data store intended for structured, 
-	# tabular data.
-  #
-  # Once your data is in a Ruport::Data::Set object, it can be manipulated
-  # to suit your needs, then used to build a report.
-  #
-  class Set < Collection
-    
-    # Creates a new Set containing the elements of <tt>options[:data]</tt>.
-    #
-    # Example:
-    #
-    #   Set.new :data => [%w[one two three] %w[1 2 3] %w[I II III]]
-    #
-    def initialize(options={})
-      @data = ::Set.new
-      options[:data].each {|e| self << e} if options[:data]
-    end
-    
-    # Adds the given object to the Set and returns self. 
-    #
-    # Example:
-    #
-    #   set = Set.new :data => [%w[one two three]]
-    #   set << [5,6,7]
-    #
-    def add(other)
-      case other
-        when Record 
-          @data << other
-        when Array
-          @data << Record.new(other)
-      end
-      self
-    end
-    alias_method :<<, :add
-    
-    # Produces a shallow copy of the Set: the same data elements are 
-    # referenced by both the old and new Sets.
-    #
-    # Example:
-    #
-    #   set = Set.new :data => [%w[one two three]]
-    #   set2 = set.dup
-    #   set == set2 #=> true
-    #   set << [8,9,10]
-    #   set == set2 #=> false
-    #
-    def dup
-     a =  self.class.new(:data=>@data)
-     a.tags = tags.dup
-     return a
-    end
-    alias_method :clone, :dup
-
-    # Two Sets are equal if they contain the same set of objects.
-    # 
-    # Example:
-    #   s1 = Set.new :data => [[1,2,3]]
-    #   s2 = Set.new :data => [[1,2,3]]
-    #   s1 == s2 #=> true
-    #
-    def ==(other)
-      @data == other.data
-    end
-    
-    # Returns a new Set containing the all of the objects contained in either 
-    # of the two Sets.
-    #
-    # Example:
-    #
-    #   s1 = Set.new :data => [[1,2,3]]
-    #   s2 = Set.new :data => [[4,5,6]]
-    #   s3 = s1 | s2
-    #   s4 = Set.new :data => [[1,2,3], [4,5,6]]
-    #   s3 == s4 #=> true
-    #
-    def |(other)
-      Set.new :data => (@data | other.data)
-    end
-    alias_method :union, :|
-    alias_method :+, :|
-    
-    # Returns a new Set containing the objects common to the two Sets.
-    #
-    # Example:
-    #
-    #   s1 = Set.new :data => [%w[a b c],[1,2,3]]
-    #   s2 = Set.new :data => [%w[a b c],[4,5,6]]
-    #   s3 = s1 & s2
-    #   s4 = Set.new :data => [%w[a b c]]
-    #   s3 == s4 #=> true
-    #
-    def &(other)
-      Set.new :data => (@data & other.data)
-    end
-    alias_method :intersection, :&
-    
-    # Returns a new Set containing those objects present in this Set but not 
-    # the other.
-    #
-    # Example:
-    #
-    #   s1 = Set.new :data => [%w[a b c],[1,2,3]]
-    #   s2 = Set.new :data => [%w[a b c],[4,5,6]]
-    #   s3 = s1 - s2 
-    #   s4 = Set.new :data => [[1, 2, 3]]
-    #   s3 == s4 #=> true 
-    #
-    def -(other)
-      Set.new :data => (@data - other.data)
-    end
-    alias_method :difference, :-
-
-    # Returns a new Set containing those objects that are either in this Set 
-    # or the other Set but not in both.
-    #
-    # Example:
-    # 
-    #   s1 = Set.new :data => [%w[a b c],[1,2,3]]
-    #   s2 = Set.new :data => [%w[a b c],[4,5,6]]
-    #   s3 = s1 ^ s2
-    #   s4 = Set.new :data => [[1, 2, 3],[4,5,6]]
-    #   s3 == s4 #=> true   
-    #
-    def ^(other)
-      Set.new :data => (@data ^ other.data)
-    end
-    
-    def_delegators :@data, :each
-  end
-end

data/test/test_collection.rb

@@ -1,30 +0,0 @@
-require "test/unit"
-require "ruport"
-begin; require "rubygems"; rescue LoadError; nil; end
-class TestCollection < Test::Unit::TestCase
-
-	def setup
-		@ghosts = Ruport::Data::Collection.new %w[inky blinky clyde]
-		@ghost_list = [["inky", "blue"],["blinky","red"],["clyde","orange"]]
-		@ghost_records = @ghost_list.map {|x| Ruport::Data::Record.new x }
-		@ghost_collection = Ruport::Data::Collection.new @ghost_records
-		@ghost_table = Ruport::Data::Table.new :data => @ghost_list
-		@ghost_set = Ruport::Data::Set.new :data => @ghost_list
-	end
-
-	def test_size
-		assert_equal 3, @ghosts.length
-		assert_equal @ghosts.length, @ghosts.data.length
-		assert_equal @ghosts.length, @ghosts.size
-		assert_equal @ghosts.length, @ghosts.data.size
-	end
-
-  def test_to_table
-    assert_equal @ghost_table, @ghost_collection.to_table
-  end
-  
-  def test_to_set
-    assert_equal @ghost_set, @ghost_collection.to_set
-  end
-
-end

data/test/test_set.rb

@@ -1,118 +0,0 @@
-#!/usr/local/bin/ruby -w
-
-require "test/unit"
-require "ruport"
-
-class TestSet < Test::Unit::TestCase
-  include Ruport::Data
-  
-  def setup
-    @empty_set = Set.new
-    @set = Set.new :data => [%w[shirt box onion]]
-  end
-  
-  def test_constructor
-    assert_not_nil @empty_set
-
-    assert_not_nil @set
-    assert_not_nil @set.data
-  end
-  
-  def test_set_is_a_collection
-    assert_kind_of Ruport::Data::Collection, @set
-  end
-  
-  def test_equality
-    assert_equal @set, Set.new(:data => [%w[shirt box onion]])
-    assert_not_equal @set, Set.new(:data => [%w[hat bucket turnip]])
-  end
-  
-  def test_append_record
-    s = Set.new
-    assert s.data.empty?
-    s << Record.new([1,2,3])
-    assert_equal [Record.new([1,2,3])], s.data.to_a
-  end
-  
-  def test_append_array
-    s = Set.new
-    assert s.data.empty?
-    s << [1,2,3]
-    assert_equal [Record.new([1,2,3])], s.data.to_a
-  end
-  
-  def test_dup
-    assert_not_equal @set.data.object_id, @set.dup.data.object_id
-  end
-  # def test_append_hash
-  #   s = Set.new
-  #   assert s.data.empty?
-  #   s << {:a => 1, :b => 2, :c => 3}
-  #   assert_equal [Record.new([1,2,3], :attributes => [:a,:b,:c])], s.data.to_a
-  # end
-  
-  def test_union
-    set = Set.new
-    set << %w[ a b c ] << %w[ x y z ]
-  
-    set2 = Set.new
-    set2 << %w[ a b c ] << ["d","","e"]
-    
-    set3 = set | set2
-    assert_kind_of(Set, set3)
-    assert_equal(set3.data.length, 3)
-    assert_equal(Set.new(:data => [ %w[a b c], %w[x y z], ["d","","e"] ]), set3)
-    assert_equal((set | set2), set.union(set2))
-    assert_equal((set | set2), set + (set2))
-  end
-  
-  def test_difference
-    set = Set.new
-    set << %w[ a b c ]  << %w[x y z] << [1,2,3]
-
-    set2 = Set.new
-    set2 << %w[ a b c ]
-  
-    set3 = set - set2
-    assert_kind_of(Set, set3)
-    assert_equal(2, set3.data.length)
-    assert_equal(Set.new(:data => [ %w[x y z], [1,2,3] ]), set3)
-    assert_equal((set - set2), set.difference(set2))
-  end
-
-  def test_intersection
-    set = Set.new
-    set << %w[ a b c ]  << %w[x y z] << [1,2,3]
-
-    set2 = Set.new
-    set2 << %w[ a b c ]
-  
-    set3 = set & set2
-    assert_kind_of(Set, set3)
-    assert_equal(1, set3.data.length)
-    assert_equal(Set.new(:data => [ %w[a b c] ]), set3)
-    assert_equal((set & set2), set.intersection(set2))
-  end
-  
-  def test_exclusion
-    set = Set.new
-    set << %w[ a b c ]  << %w[x y z] << [1,2,3]
-
-    set2 = Set.new
-    set2 << %w[ a b c ]
-  
-    set3 = set ^ set2
-    assert_kind_of(Set, set3)
-    assert_equal(2, set3.data.length)
-    assert_equal(Set.new(:data => [ %w[x y z], [1,2,3] ]), set3)
-  end
-  
-  # sets only hold one of any item, so adding again does nothing
-  def test_set_semantics
-      set = Set.new
-      set << %w[ a b c]
-      set2 = set.dup
-      set2 << %w[ a b c]
-      assert_equal set, set2
-  end
-end