diaspora-cluster-creator 0.2.0 → 0.3.0

data/features/star_system.feature

@@ -1,13 +0,0 @@
-Feature: Star System Creation
-
-Scenario: Star System Creation
-  When I create a Star System
-  Then it should have a technology rating
-  And it should have a resources rating
-  And it should have a environment rating
-  
-Scenario: Named Star System Creation
-  When I create a Star System with name "Sparta [T1 E-2 R3]"
-  Then it should have a technology rating of 1
-  And it should have a resources rating of 3
-  And it should have a environment rating of -2

data/features/step_definitions/star_system_steps.rb

@@ -1,16 +0,0 @@
-When /^I create a Star System$/ do
-  current_star_system
-end
-
-When /^I create a Star System with (?:the )?name "([^"]*)"$/ do |name|
-  set_current_star_system(name)
-end
-
-Then /^it should have an? (#{CAPTURE_SYSTEM_ATTRIBUTE}) rating$/ do |system_attribute|
-  current_star_system.send(system_attribute).must_be :<=, 4
-  current_star_system.send(system_attribute).must_be :>=, -4
-end
-
-Then /^it should have an? (#{CAPTURE_SYSTEM_ATTRIBUTE}) rating of (#{CAPTURE_INTEGER})$/ do |system_attribute, rating|
-  current_star_system.send(system_attribute).must_equal rating
-end

data/lib/diaspora-cluster-creator/graph.rb

@@ -1,58 +0,0 @@
-require 'dependency_injector'
-require 'set'
-require_relative 'fate_dice'
-
-module Diaspora
-  module Cluster
-    module Creator
-      class Graph
-        extend DependencyInjector
-        def_injector(:dice) { FateDice.new }
-        
-        attr_reader :source
-        def initialize(source)
-          @source = source
-        end
-
-        def to_s
-          source.to_s
-        end
-
-        def nodes
-          draw!
-          @nodes
-        end
-
-        def edges
-          draw!
-          @edges
-        end
-
-        private
-        def draw!
-          return if @__drawn__
-          @nodes = source.collect.to_a
-          @nodes.each_with_index do |node, i|
-            result = dice.roll
-            if result < 0
-              connect(node, @nodes[i+1])
-            elsif result == 0
-              connect(node, @nodes[i+1], @nodes[i+2])
-            elsif result > 0
-              connect(node, @nodes[i+1], @nodes[i+2], @nodes[i+3])
-            end
-          end
-          @__drawn__ = true
-        end
-
-        def connect(node, *others)
-          @edges ||= Set.new
-
-          others.flatten.compact.each do |other|
-            @edges << [node,other] 
-          end
-        end
-      end
-    end
-  end
-end

data/lib/diaspora-cluster-creator/star_system.rb

@@ -1,80 +0,0 @@
-require 'dependency_injector'
-require 'set'
-require_relative 'fate_dice'
-
-module Diaspora
-  module Cluster
-    module Creator
-      class StarSystem
-        def self.rolled_attributes
-          unless defined?(@@rolled_attributes)
-            @@rolled_attributes = Set.new
-          end
-          @@rolled_attributes
-        end
-        def self.rolled_attribute(attribute_name, abbreviation = nil)
-          rolled_attributes << attribute_name.to_s
-          define_method(attribute_name) do
-            instance_variable_get("@#{attribute_name}") || instance_variable_set("@#{attribute_name}", dice.roll)
-            instance_variable_get("@#{attribute_name}")
-          end
-          define_method("#{attribute_name}=") do |value|
-            instance_variable_set("@#{attribute_name}", value.to_i)
-          end
-        end
-        def self.guarantee!(star_systems)
-          return star_systems if star_systems.detect {|ss| ss.technology >= 2 }
-          working = star_systems.sort
-          working.first.technology = 2
-          working.last.technology = 2
-          star_systems
-        end
-
-        extend DependencyInjector
-        def_injector(:dice) { FateDice.new }
-
-        attr_reader :context, :name
-        def initialize(context, name)
-          @context = context
-          set_name(name.to_s)
-        end
-
-        rolled_attribute :technology, :t
-        rolled_attribute :resources, :r
-        rolled_attribute :environment, :e
-        
-        include Comparable
-        def <=>(other)
-          to_i <=> other.to_i
-        end
-        
-        def to_i
-          self.class.rolled_attributes.inject(0) {|m,v| m += send(v) }
-        end
-        
-        def to_s
-          name.to_s
-        end
-        
-        def label
-          "#{name}\nT#{technology} R#{resources} E#{environment}"
-        end
-        
-        protected
-        def set_name(name_with_attribtes)
-          name, options = name_with_attribtes.strip.split(/ *\[/)
-          @name = name
-          if options
-            options.sub(/\]$/,'').split.collect(&:strip).each do |option|
-              original, attribute_prefix, value = option.match(/(\w) *(-?\d)/).to_a
-              if attribute_name = self.class.rolled_attributes.detect {|roled_attribute| roled_attribute =~ /^#{attribute_prefix}/i}
-                send("#{attribute_name}=",value)
-              end
-            end
-          end
-          @name
-        end
-      end
-    end
-  end
-end

data/spec/diaspora-cluster-creator/graph_spec.rb

@@ -1,34 +0,0 @@
-require_relative '../spec_helper_lite'
-require 'graph'
-
-describe Graph do
-  subject { Graph.new(collection) }
-  let(:collection) {[1,2,3]}
-
-  describe '#nodes' do
-    it 'should be the collection of the input' do
-      subject.nodes.must_equal collection
-    end
-  end
-
-  describe '#edges' do
-    it 'connection for all -1 rolls' do
-      expected = Set.new
-      expected << [1,2]
-      expected << [2,3]
-      with_loaded_dice(-1, subject) do
-        subject.edges.must_equal expected
-      end
-    end
-
-    it 'connection for all -2 rolls' do
-      expected = Set.new
-      expected << [1,2]
-      expected << [1,3]
-      expected << [2,3]
-      with_loaded_dice(0, subject) do
-        subject.edges.must_equal expected
-      end
-    end
-  end
-end

data/spec/diaspora-cluster-creator/star_system_spec.rb

@@ -1,103 +0,0 @@
-require_relative '../spec_helper_lite'
-require 'star_system'
-
-describe StarSystem do
-  subject { StarSystem.new( Object.new, 1 ) }
-
-  describe '#initialize with one attribute' do
-    subject { StarSystem.new(Object.new, "Sparta [T1 E-4]") }
-    it 'should have an extracted name' do
-      subject.name.must_equal 'Sparta'
-    end
-    it 'should have an preset attribute' do
-      with_loaded_dice(0, subject) do
-        subject.resources.must_equal 0
-        subject.technology.must_equal 1
-        subject.environment.must_equal -4
-      end
-    end
-  end
-
-  describe '#technology=' do
-    it 'should be overridable' do
-      subject.technology = 3
-      subject.technology.must_equal 3
-    end
-  end
-
-  describe '#technology' do
-    it 'should be randomly rolled' do
-      with_loaded_dice(1, subject) do
-        subject.technology.must_equal 1
-      end
-    end
-  end
-
-  describe '#resources' do
-    it 'should be randomly rolled' do
-      with_loaded_dice(1, subject) do
-        subject.resources.must_equal 1
-      end
-    end
-  end
-
-  describe '#environment' do
-    it 'should be randomly rolled' do
-      with_loaded_dice(1, subject) do
-        subject.environment.must_equal 1
-      end
-    end
-  end
-
-  describe '#<=>' do
-    it 'should be comparable to another star system' do
-      @system_a = StarSystem.new('', 1)
-      @system_b = StarSystem.new('', 2)
-      with_loaded_dice(2, @system_a) do
-        with_loaded_dice(1, @system_b) do
-          @system_b.must_be :<, @system_a
-        end
-      end
-    end
-  end
-
-  describe '.guarantee!' do
-    it 'should adjust technology rating without altering the sort order' do
-      @system_a = StarSystem.new('', 1)
-      @system_b = StarSystem.new('', 2)
-      @system_c = StarSystem.new('', 3)
-      order =
-      with_loaded_dice(1, @system_a) do
-        with_loaded_dice(0, @system_b) do
-          with_loaded_dice(-1, @system_c) do
-            input = [@system_b, @system_c, @system_a]
-            StarSystem.guarantee!(input).must_equal input
-          end
-        end
-      end
-
-      @system_a.technology.must_equal 2
-      @system_b.technology.must_equal 0
-      @system_c.technology.must_equal 2
-    end
-
-    it 'should not adjust technology rating if one is already adequate' do
-      @system_a = StarSystem.new('', 1)
-      @system_b = StarSystem.new('', 2)
-      @system_c = StarSystem.new('', 3)
-      order =
-      with_loaded_dice(2, @system_a) do
-        with_loaded_dice(0, @system_b) do
-          with_loaded_dice(-1, @system_c) do
-            input = [@system_b, @system_c, @system_a]
-            StarSystem.guarantee!(input).must_equal input
-          end
-        end
-      end
-
-      @system_a.technology.must_equal 2
-      @system_b.technology.must_equal 0
-      @system_c.technology.must_equal(-1)
-    end
-  end
-end