multifarious 0.1.1

data/.rspec

@@ -0,0 +1,2 @@
+--color
+--format progress

data/LICENSE

@@ -0,0 +1,24 @@
+# The MIT License
+
+Copyright (c) 2011 Kristján Pétursson
+
+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.md

@@ -0,0 +1,20 @@
+### 1-2-3 Go
+
+    require 'rubygems'
+    require 'multifarious'
+    mosaic = Mosaic.new(10, 10)
+    mosaic.generate!
+    mosaic.draw
+
+    ------------
+    |bx..myheq~|
+    |zp..$$$&&v|
+    |l!!A$$$&&s|
+    |;!!u$$$r::|
+    |wkBCDd++::|
+    |Efa_@@++'=|
+    |/###@@tn^^|
+    |F###%%%G^^|
+    |H###%%%I**|
+    |gojc%%%i**|
+    ------------

data/Rakefile

@@ -0,0 +1,49 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "multifarious"
+    gem.summary = %Q{A multi-sized tile layer}
+    gem.description = %Q{Multifarious makes generating a solid block of variously-sized tiles simple.}
+    gem.email = "kristjan@gmail.com"
+    gem.homepage = "http://github.com/kristjan/multifarious"
+    gem.authors = ["Kristján Pétursson"]
+    gem.add_development_dependency "rspec"
+    gem.version = "0.1.1"
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: sudo 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|
+  if File.exist?('VERSION')
+    version = File.read('VERSION')
+  else
+    version = ""
+  end
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "multifarious #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/lib/mosaic.rb

@@ -0,0 +1,99 @@
+class Mosaic
+  attr_reader :rows, :cols, :grid, :tiles
+
+  DuplicateTile = Class.new(RuntimeError)
+
+  def initialize(rows, cols)
+    @rows, @cols = rows, cols
+    @grid = Array.new(@rows) { Array.new(@cols) {:empty} }
+    @tiles = []
+  end
+
+  def area
+    @rows * @cols
+  end
+
+  def available_area
+    count = 0
+    (0...@rows).each do |row|
+      (0...@cols).each do |col|
+        count += 1 if available?(row, col)
+      end
+    end
+    count
+  end
+
+  def available?(row, col)
+    @grid[row] && @grid[row][col] == :empty
+  end
+
+  def covered_area
+    area - available_area
+  end
+
+  DRAW_CHARS = %[!@#\$%^&*_=+\/\:;'.~abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ].split('')
+  def draw
+    charmap = Hash[@tiles.zip(DRAW_CHARS.first(@tiles.size))]
+    charmap[:empty] = ' '
+    horizontal = '-'*(@cols + 2)
+    puts horizontal
+    puts(@grid.map do |row|
+      "|#{row.map{|tile| charmap[tile]}.join}|"
+    end.join("\n"))
+    puts horizontal
+  end
+
+  def can_place?(tile, row, col)
+    (row...(row + tile.rows)).each do |r|
+      (col...(col + tile.cols)).each do |c|
+        return false unless available?(r, c)
+      end
+    end
+    true
+  end
+
+  def generate!
+    candidates = Tile.rand_covering(area)
+    until candidates.empty? || candidates.all?{|tile| tile.is_a?(Tile::Small) }
+      tile = candidates.shift
+      placed = false
+      5.times {
+        row, col = random_location(tile)
+        placed = place!(tile, row, col)
+        break if placed
+      }
+      candidates.concat tile.shatter unless placed
+    end
+    # Fill in missed spaces
+    (0...@rows).each do |row|
+      (0...@cols).each do |col|
+        place!(Tile::Small.new, row, col) if available?(row, col)
+      end
+    end
+    true
+  end
+
+  def has_tile?(tile)
+    !!@tiles.find {|t| t.equal? tile}
+  end
+
+  def place!(tile, row, col)
+    raise DuplicateTile if has_tile?(tile)
+    return false unless can_place?(tile, row, col)
+    @tiles << tile
+    (row...(row + tile.rows)).each do |r|
+      (col...(col + tile.cols)).each do |c|
+        @grid[r][c] = tile
+      end
+    end
+    true
+  end
+
+  def random_location(tile)
+    [rand(rows - tile.rows + 1), rand(cols - tile.cols + 1)]
+  end
+
+  def space_available?
+    covered_area < area
+  end
+end

data/lib/tile.rb

@@ -0,0 +1,61 @@
+class Tile
+  attr_reader :rows, :cols
+
+  class Large < Tile
+    def initialize
+      @rows = @cols = 3
+    end
+  end
+
+  class Medium < Tile
+    def initialize
+      @rows = @cols = 2
+    end
+  end
+
+  class Small < Tile
+    def initialize
+      @rows = @cols = 1
+    end
+
+    def shatter
+      []
+    end
+  end
+
+  def self.rand(max_area=nil)
+    tiles = [Large, Medium, Small].map(&:new).select do |tile|
+      max_area.nil? || tile.area <= max_area
+    end
+    tiles[Kernel.rand(tiles.size)]
+  end
+
+  def self.rand_covering(area)
+    tiles = []
+    while self.area(tiles) < area
+      tiles << Tile.rand(area - self.area(tiles))
+    end
+    tiles
+  end
+
+  def self.area(tiles)
+    tiles.inject(0) {|sum, tile| sum + tile.area}
+  end
+
+  def initialize(rows, cols)
+    @rows, @cols = rows, cols
+  end
+
+  def ==(other)
+    return false unless other.is_a?(Tile)
+    self.rows == other.rows && self.cols == other.cols
+  end
+
+  def area
+    @rows * @cols
+  end
+
+  def shatter
+    Tile.rand_covering(area)
+  end
+end

data/multifarious.rb

@@ -0,0 +1,4 @@
+$LOAD_PATH.unshift 'lib'
+
+require 'tile'
+require 'mosaic'

data/spec/lib/mosaic_spec.rb

@@ -0,0 +1,124 @@
+require "spec_helper"
+
+describe Mosaic do
+  describe "initializing" do
+    it "stores the rows" do
+      Mosaic.new(1,2).rows.should == 1
+    end
+
+    it "stores the columns" do
+      Mosaic.new(1,2).cols.should == 2
+    end
+  end
+
+  it "knows its area" do
+    Mosaic.new(1,1).area.should == 1
+    Mosaic.new(2,2).area.should == 4
+    Mosaic.new(2,3).area.should == 6
+  end
+
+  it "knows its covered area" do
+    m = Mosaic.new(4,4)
+    m.covered_area.should == 0
+    m.place!(Tile::Small.new, 0, 0)
+    m.covered_area.should == 1
+    m.place!(Tile::Large.new, 1, 1)
+    m.covered_area.should == 10
+  end
+
+  it "knows its available area" do
+    m = Mosaic.new(4,4)
+    m.available_area.should == 16
+    m.place!(Tile::Small.new, 0, 0)
+    m.available_area.should == 15
+    m.place!(Tile::Large.new, 1, 1)
+    m.available_area.should == 6
+  end
+
+  describe "available spaces" do
+    before :each do
+      @mosaic = Mosaic.new(1,2)
+      @mosaic.place!(Tile::Small.new, 0, 1)
+    end
+
+    it "knows when a space is available" do
+      @mosaic.available?(0,0).should be_true
+    end
+
+    it "knows when a space is unavailable" do
+      @mosaic.available?(0,1).should be_false
+    end
+
+    it "considers out-of-bounds unavailable" do
+      @mosaic.available?(3,3).should be_false
+    end
+  end
+
+  describe "determining whether a tile can be placed" do
+    before :each do
+      @mosaic = Mosaic.new(4, 4)
+      @tile = Tile::Medium.new
+      @mosaic.place!(@tile, 2, 2)
+    end
+
+    it "returns true when all spaces are clear" do
+      @mosaic.can_place?(@tile, 0, 0).should be_true
+    end
+
+    it "returns false when there is overlap" do
+      @mosaic.can_place?(@tile, 1, 1).should be_false
+    end
+
+    it "returns false when the tile is out of bounds" do
+      @mosaic.can_place?(@tile, 0, 3).should be_false
+    end
+  end
+
+  describe "placing a tile" do
+    before(:each) do
+      @mosaic = Mosaic.new(4, 4)
+      @mosaic.place!(Tile::Medium.new, 2, 2)
+      @tile = Tile::Medium.new
+    end
+
+    it "sets every grid space to the tile" do
+      @mosaic.place!(@tile, 0, 0)
+      [0, 1].each do |row|
+        [0, 1].each do |col|
+          @mosaic.grid[row][col].should == @tile
+        end
+      end
+    end
+
+    it "adds the tile to the tile list" do
+      @mosaic.place!(@tile, 0, 0)
+      @mosaic.tiles.should include(@tile)
+    end
+
+    it "returns true when the tile is placed" do
+      @mosaic.place!(@tile, 0, 0).should be_true
+    end
+
+    it "returns false if placement fails" do
+      @mosaic.place!(@tile, 1, 1).should be_false
+    end
+
+    it "doesn't let you place the same tile twice" do
+      @mosaic.place!(@tile, 0, 0)
+      expect {
+        @mosaic.place!(@tile, 0, 0)
+      }.to raise_error(Mosaic::DuplicateTile)
+    end
+  end
+
+  it "knows when it contains a tile" do
+    mosaic = Mosaic.new(4,4)
+    tile = Tile::Medium.new
+    other_tile = Tile::Medium.new
+    mosaic.should_not have_tile(tile)
+    mosaic.place!(tile, 0, 0)
+    mosaic.should have_tile(tile)
+    mosaic.should_not have_tile(other_tile)
+  end
+
+end

data/spec/lib/tile_spec.rb

@@ -0,0 +1,57 @@
+require "spec_helper"
+
+describe Tile do
+  describe "initializing" do
+    it "stores the rows" do
+      Tile.new(1,2).rows.should == 1
+    end
+
+    it "stores the columns" do
+      Tile.new(1,2).cols.should == 2
+    end
+  end
+
+  describe "comparison" do
+    it "is == to another tile of the same dimensions" do
+      Tile.new(1,2).should == Tile.new(1,2)
+    end
+
+    it "is not == to a tile with a different width" do
+      Tile.new(1,1).should_not == Tile.new(2,1)
+    end
+
+    it "is not == to a tile with a different height" do
+      Tile.new(1,1).should_not == Tile.new(1,2)
+    end
+
+    it "is #equal to itself" do
+      tile = Tile.new(1,1)
+      tile.should be_equal(tile)
+    end
+
+    it "is not #equal to another tile of the same dimensions" do
+      Tile.new(1,1).should_not be_equal(Tile.new(1,1))
+    end
+  end
+
+  it "knows its area" do
+    Tile.new(1,1).area.should == 1
+    Tile.new(2,2).area.should == 4
+    Tile.new(2,3).area.should == 6
+  end
+
+  it "knows the area of many tiles" do
+    tiles = 1.upto(3).map{|i| Tile.new(i, i) }
+    Tile.area(tiles).should == 14
+  end
+
+  describe "picking a random tile" do
+    it "returns some tile when there is no area limit" do
+      Tile.rand.should be_a(Tile)
+    end
+
+    it "returns a tile of a maximum area" do
+      Tile.rand(3).should be_a(Tile::Small)
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,7 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+
+Dir['lib/**/*.rb'].each {|f| require f}
+
+RSpec.configure do |config|
+end

metadata

@@ -0,0 +1,90 @@
+--- !ruby/object:Gem::Specification 
+name: multifarious
+version: !ruby/object:Gem::Version 
+  hash: 25
+  prerelease: false
+  segments: 
+  - 0
+  - 1
+  - 1
+  version: 0.1.1
+platform: ruby
+authors: 
+- "Kristj\xC3\xA1n P\xC3\xA9tursson"
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-06-10 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :development
+  version_requirements: *id001
+description: Multifarious makes generating a solid block of variously-sized tiles simple.
+email: kristjan@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.md
+files: 
+- .rspec
+- LICENSE
+- README.md
+- Rakefile
+- lib/mosaic.rb
+- lib/tile.rb
+- multifarious.rb
+- spec/lib/mosaic_spec.rb
+- spec/lib/tile_spec.rb
+- spec/spec_helper.rb
+has_rdoc: true
+homepage: http://github.com/kristjan/multifarious
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: A multi-sized tile layer
+test_files: []
+