cards 0.6

data/CHANGES.txt

@@ -0,0 +1,8 @@
+= Change Log
+
+== Version 0.6
+
+* moved main code to win/ subdirectory and moved mac branch to be main branch
+* total refactoring of the mac branch to support configurable dsls
+* releasing as a gem
+* changing name to cards

data/Manifest.txt

@@ -0,0 +1,29 @@
+CHANGES.txt
+Manifest.txt
+README.txt
+Rakefile
+lib/cards.rb
+lib/cards/builder.rb
+lib/cards/card.rb
+lib/cards/card_wall.rb
+lib/cards/csv_builder.rb
+lib/cards/csv_parser.rb
+lib/cards/extensions.rb
+lib/cards/layouts/column_layout.rb
+lib/cards/layouts/nil_layout.rb
+lib/cards/layouts/row_layout.rb
+lib/cards/master_story_list.rb
+lib/cards/swim_lanes.rb
+lib/cards/text.rb
+lib/cards/tracker_csv.rb
+lib/cards/writers/dot_writer.rb
+lib/cards/writers/graffle_writer.rb
+lib/cards/writers/text_writer.rb
+spec/cards/card_spec.rb
+spec/cards/card_wall_spec.rb
+spec/cards/csv_parser_spec.rb
+spec/cards/extensions_spec.rb
+spec/cards/swim_lanes_spec.rb
+spec/cards/writers/dot_writer_spec.rb
+spec/cards/writers/text_writer_spec.rb
+spec/spec_helper.rb

data/README.txt

@@ -0,0 +1,44 @@
+= Project: CardWallGen
+
+== Description
+
+CardWallGen is a program that reads a requirements map and generates a view 
+of it.  Typically it reads it from excel or csv and generates a graphical 
+view in visio or omnigraffle, though it may also generate another csv view of it.
+
+== Usage
+
+We try to make it simple to configure.  However, you still need a driver file 
+that might look something like :
+
+  CardWall.from csv_file("Business Goals") do
+    column :goal
+  end
+
+  CardWall.from csv_file("Current Workflow") do
+    row :activity
+    column :task
+  end
+
+  CardWall.from csv_file("Stories") do
+    row :activity
+    row :task
+    column :story, :wrap_at => 4 do |card, row|
+      card.name << "\n\n#{row[:description]}" unless row[:description].blank?    
+      card.name << "\n\n                           " 
+    end
+  end
+
+  MasterStoryList.from csv_file("Stories")
+
+  TrackerCsv.from csv_file("Stories")
+
+== Contact
+
+Author::     Jeremy Stell-Smith
+Email::      jeremystellsmith@gmail.com
+License::    LGPL License
+
+== Home Page
+
+http://rubyforge.org/projects/cardwallgen

data/Rakefile

@@ -0,0 +1,54 @@
+ENV["FILE"] ||= "/Users/jeremy/Desktop/PunchList Master Story List/Card Wall-Card Wall.csv"
+
+require 'rubygems'
+gem "rspec"
+gem "hoe"
+
+require 'rake/clean'
+require 'spec/rake/spectask'
+require 'hoe'
+
+require 'lib/cards'
+
+desc "Default Task"
+task :default => [:spec]
+
+task :test => :spec
+
+Spec::Rake::SpecTask.new(:spec) do |t|
+  t.spec_files = FileList['spec/**/*_spec.rb']
+end
+
+desc "export to dot file"
+task :run_dot do
+  file = ENV["FILE"] || SAMPLE_FILE
+  file.as(:png).delete_if_exists
+  file.as(:dot).delete_if_exists
+
+  CardWall.convert(file, :dot, file.as(:dot))
+
+  "dot -Tpng #{file.as(:dot).no_spaces} > #{file.as(:png).no_spaces}".run
+  "open #{file.as(:png).no_spaces}".run if file.as(:png).exists?
+end
+
+desc "export to text"
+task :run_text do
+  CardWall.convert(ENV["FILE"] || SAMPLE_FILE, :text)
+end
+
+desc "export to graffle"
+task :run do
+  file = ENV["FILE"] || SAMPLE_FILE
+  file.as(:graffle).delete_if_exists
+
+  CardWall.convert(file, :graffle, file.as(:graffle))
+end
+
+Hoe.new('cards', Cards::VERSION) do |p|
+  p.rubyforge_name = 'cardwallgen'
+  p.summary = p.description = p.paragraphs_of('README.txt', 2).first
+  p.url = p.paragraphs_of('README.txt', -1).first.strip
+  p.author = 'Jeremy Stell-Smith'
+  p.email = 'jeremystellsmith@gmail.com'
+  p.changes = p.paragraphs_of('CHANGES.txt', 0..2).join("\n\n")
+end

data/lib/cards.rb

@@ -0,0 +1,17 @@
+$LOAD_PATH.unshift File.expand_path(File.dirname(__FILE__))
+
+require 'cards/extensions'
+require 'cards/builder'
+require 'cards/csv_parser'
+
+require 'cards/card_wall'
+# writers
+require 'cards/writers/dot_writer'
+require 'cards/writers/graffle_writer'
+
+require 'cards/master_story_list'
+require 'cards/tracker_csv'
+
+module Cards
+  VERSION = "0.6"
+end

data/lib/cards/builder.rb

@@ -0,0 +1,9 @@
+require 'cards/card'
+require 'cards/layouts/row_layout'
+require 'cards/layouts/column_layout'
+require 'cards/layouts/nil_layout'
+
+module Cards
+  class Builder
+  end
+end

data/lib/cards/card.rb

@@ -0,0 +1,44 @@
+module Cards
+  class Card
+    attr_accessor :name, :color, :children, :x, :y
+    attr_writer :layout
+    
+    def initialize(name)
+      @name = name
+      @x, @y = 0, 0
+      @children = []
+    end
+        
+    def add(*cards)
+      @children += cards
+    end
+    
+    def visit(&block)
+      yield self
+      @children.each {|c| c.visit(&block) }
+    end
+    
+    def layout
+      my_layout.layout(self)
+    end
+    
+    def width
+      return 1 if children.empty?
+      my_layout.width(self)
+    end
+    
+    def height
+      return 1 if children.empty?
+      my_layout.height(self)
+    end
+        
+    def cell() [x, y]; end
+    def cell=(cells) self.x, self.y = *cells; end
+    
+    private
+    
+    def my_layout
+      @layout || NilLayout.new
+    end
+  end
+end

data/lib/cards/card_wall.rb

@@ -0,0 +1,95 @@
+require 'cards/builder'
+
+module Cards
+  class CardWall < Builder
+    def define(&block)
+      DefinitionContext.new(self).instance_eval(&block)
+      self
+    end
+
+    def self.writer=(writer_class)
+      @writer_class = writer_class
+    end
+    
+    def self.colors
+      @colors ||= {
+        :role => :blue,
+        :activity => :blue,
+        :task => :red,
+        :story => :yellow
+      }
+    end
+
+    def self.from(parser, &block)
+      builder = self.new.define(&block)
+
+      parser.each_row do |row|
+        builder.process(row)
+      end
+
+      builder.show(@writer_class.new(parser.default_output_file))
+    end
+
+    def initialize
+      @handlers = []
+      @layouts = []
+      @root = Card.new("root")
+      @root.layout = RowLayout.new
+      @root.y = -1
+      @last_cards = [@root]
+    end
+    
+    def process(row)
+      @handlers.each do |handler|
+        unless row[handler].blank?
+          send("add_#{handler}", row[handler], row)
+        end
+      end
+    end
+    
+    def add_handler(type, layout, &block)
+      i = @handlers.size
+      @handlers << type
+      @root.layout = layout if @layouts.empty?
+      @layouts << layout
+      (class << self; self; end).module_eval do
+        define_method("add_#{type}") do |name, row|
+          card = yield(name, row)
+          card.layout = @layouts[i+1]
+          card.color ||= CardWall.colors[type] || :white
+          @last_cards[i].add(card)
+          @last_cards[i+1] = card
+        end
+      end
+    end
+
+    def show(output)
+      @root.layout
+      @root.visit {|card| output.create_card(card.name, card.color, card.cell) unless card == @root}
+    end
+        
+    class DefinitionContext
+      def initialize(wraps)
+        @this = wraps
+        @i = 0
+      end
+      
+      def row(name, *options)
+        @this.add_handler(name, RowLayout.new(*options)) do |name, row|
+          Card.new(name)
+        end
+      end
+      
+      def column(name, *options)
+        @this.add_handler(name, ColumnLayout.new(*options)) do |name, row|
+          c = Card.new(name)
+          yield c, row if block_given?
+          c
+        end
+      end
+      
+      def lanes(name, options)
+      end
+    end
+  end
+end

data/lib/cards/csv_builder.rb

@@ -0,0 +1,46 @@
+class CsvBuilder
+  def initialize(file_name)
+    @file_name = file_name
+    @file = File.open(file_name, "wb")
+    @csv = CSV::Writer.create(@file)
+    @csv << header
+  end
+  
+  def header
+    raise "implement me"
+  end
+  
+  def self.from(parser)
+    builder = self.new(parser.default_output_file + ".#{self.to_s.gsub("Cards::", "").downcase}.csv")
+
+    parser.each_row do |row|
+      builder.process(row)
+    end
+    
+    builder.done
+  end
+  
+  def process(row)
+    [:activity, :task, :story].each do |handler|
+      send("add_#{handler}", row[handler], row) if row[handler]
+    end
+  end
+  
+  def add_activity(name, params = {})
+    @activity = name
+  end
+  
+  def add_task(name, params = {})
+    @task = name
+  end
+  
+  def add_story(name, params = {})
+    raise "implement me"
+  end
+  
+  def done
+    @csv.close
+    @file.close
+    `open #{@file_name.gsub(' ', '\\ ')}`
+  end
+end

data/lib/cards/csv_parser.rb

@@ -0,0 +1,60 @@
+require 'csv'
+
+module Cards
+  class CsvParser
+    def initialize(file)
+      @file = file
+    end
+
+    def rows
+      rows = []
+      each_row {|row| rows << row}
+      rows
+    end
+    
+    def each_row
+      header = nil
+      CSV.open(@file, 'r') do |row|
+        if header.nil?
+          header = define_header(row)
+        else
+          yield Row.new(header, row)
+        end
+      end
+    end
+  
+    def default_output_file
+      File.basename(@file).sub(/\..*/, '')
+    end
+    
+    private
+
+    def define_header(header_row)
+      header = {}
+      header_row.each_with_index do |name, i|
+        header[name.downcase.gsub(' ', '_').to_sym] = i
+      end
+      return header
+    end
+
+    class Row
+      def initialize(header, row)
+        @header, @row = header, row
+      end
+
+      def [](key)
+        index = @header[key] || raise("can't find column header #{key.inspect} in #{@header.inspect}")
+        @row[index]
+      end
+
+      def to_h
+        h = {}
+        @header.each_key do |column_header|
+          val = @row[@header[column_header]]
+          h[column_header] = val unless val.blank?
+        end
+        h
+      end
+    end
+  end
+end

data/lib/cards/extensions.rb

@@ -0,0 +1,59 @@
+class String
+  def blank?
+    self.size == 0 || self.strip.size == 0
+  end
+
+  def no_spaces
+    self.gsub(' ', '\\ ')
+  end
+
+  def as(extension)
+    self.gsub(/\.[^\/]+$/, '') + ".#{extension}"
+  end
+
+  def exists?
+    File.exist?(self)
+  end
+
+  def delete_if_exists
+    File.delete(self) if self.exists?
+  end
+
+  def run
+    puts self
+    `#{self}`
+  end
+end
+
+class Array
+  def sum
+    s = 0
+    each {|i| s += i}
+    s
+  end
+  
+  def widths
+    map {|c| c.width}
+  end
+  
+  def heights
+    map {|c| c.height}
+  end
+end
+
+class Numeric
+  def inches # as points
+    self * 72.0
+  end
+end
+
+class Object
+  def blank?
+    nil?
+  end
+  
+  def dump_methods(ignore = Object)
+    ignore = ignore.instance_methods if ignore.is_a? Class
+    p (methods - ignore).sort
+  end
+end

data/lib/cards/layouts/column_layout.rb

@@ -0,0 +1,34 @@
+require 'enumerator'
+
+module Cards
+  class ColumnLayout
+    def initialize(options = {})
+      @wrap_at = options.delete(:wrap_at) || 10
+    end
+    
+    def layout(card)
+      x = card.x
+      card.children.each_slice(@wrap_at) do |slice|
+        y = card.y + 1
+        slice.each do |child|
+          child.x, child.y = x, y
+          child.layout
+          y += child.height
+        end
+        x += slice.widths.max
+      end
+    end
+    
+    def width(card)
+      width = 0
+      card.children.each_slice(@wrap_at) do |slice|
+        width += slice.widths.max
+      end
+      width
+    end
+    
+    def height(card)
+      card.children.heights.sum
+    end
+  end
+end

data/lib/cards/layouts/nil_layout.rb

@@ -0,0 +1,14 @@
+module Cards
+  class NilLayout
+    def layout(card)
+    end
+    
+    def width(card)
+      1
+    end
+    
+    def height(card)
+      1
+    end
+  end
+end

data/lib/cards/layouts/row_layout.rb

@@ -0,0 +1,21 @@
+module Cards
+  class RowLayout
+    def layout(card)
+      x = card.x
+      card.children.each_with_index do |child, i|
+        child.x = x
+        child.y = card.y + 1
+        child.layout
+        x += child.width
+      end
+    end
+    
+    def width(card)
+      card.children.map {|c| c.width}.sum
+    end
+    
+    def height(card)
+      card.children.map {|c| c.height}.max
+    end
+  end
+end

data/lib/cards/master_story_list.rb

@@ -0,0 +1,24 @@
+require 'cards/csv_builder'
+
+module Cards
+  # this is an example of a custom csv builder that you can create
+  class MasterStoryList < CsvBuilder
+    def header
+      ["Activity", "Task", "Story", "Description", "Estimate", "Phase", "Priority"]
+    end
+  
+    def add_story(name, params = {})
+      return unless [nil, '', 'Story', 'Chore'].include?(params[:story_type])
+    
+      @csv << [
+                @activity,
+                @task,
+                name,
+                params[:description],
+                nil, # params[:estimate],
+                nil, # params[:phase],
+                nil  # params[:priority]
+              ]
+    end
+  end
+end

data/lib/cards/swim_lanes.rb

@@ -0,0 +1,9 @@
+require 'cards/card_wall'
+
+module Cards
+  class SwimLanes < CardWall
+    def initialize
+      super
+    end
+  end
+end

data/lib/cards/text.rb

@@ -0,0 +1,23 @@
+class Text
+  def add_role(name, params = {})
+    puts name
+  end
+  
+  def add_activity(name, params = {})
+    puts "  #{name}"
+  end
+  
+  def add_task(name, params = {})
+    puts "    #{name}"
+  end
+  
+  def add_story(name, params = {})
+    string = "      #{name}"
+    string << " - #{params[:description]}" unless params[:description].blank?
+    string << " - #{params[:estimate]}" unless params[:estimate].blank?
+    puts string
+  end
+  
+  def done
+  end
+end

data/lib/cards/tracker_csv.rb

@@ -0,0 +1,19 @@
+require 'cards/csv_builder'
+
+class TrackerCsv < CsvBuilder
+  def header
+    ["Story", "Labels", "Story Type", "Estimate", "Description"]
+  end
+
+  def add_story(name, params = {})
+    return unless [nil, '', 'Story', 'Chore'].include?(params[:story_type])
+    
+    @csv << [
+              name,
+              @task,
+              params[:story_type],
+              nil, # params[:estimate],
+              "#{@activity}\n#{params[:description]}"
+            ]
+  end
+end

data/lib/cards/writers/dot_writer.rb

@@ -0,0 +1,85 @@
+module Cards
+  class DotWriter
+    def initialize(file)
+      @file = file
+      @node_color = {:green => "darkseagreen1", :blue => "lightblue", :red => "pink", :yellow => "lightyellow"}
+      @nodes = []
+
+      puts "digraph G {"
+      puts "graph [nodesep=.1, ranksep=.1, ordering=out];"
+      puts "node [shape=box, color=black, style=filled, width=2, height=1.2, fixedsize=true, labeljust=\"l\"];"
+      puts "edge [style=invis, weight=1];"
+    end
+  
+    def puts(string)
+      @file.puts string
+    end
+  
+    def create_card(name, color, position)
+      create_node("card", position, %{label="#{wrap(name)}",fillcolor=#{@node_color[color]}})
+    end
+  
+    def done
+      create_gap_nodes
+      create_ranks
+      create_edges
+      puts "}"
+    end  
+  
+    private
+  
+    def create_node(name, position, properties)
+      node_id = name.gsub(/\s*/, "")[0, 10] << "_" << position.join("_")
+      x = position[0]; y = position[1]
+      column = @nodes[x] == nil ? @nodes[x] = [] : @nodes[x]
+      column[y] = node_id
+      puts %{#{node_id} [#{properties}];}
+    end
+  
+    def create_gap_nodes
+      @nodes.each_index do |x|
+        if !@nodes[x] 
+          create_gap([x,0])
+        else
+          @nodes[x].each_index do |y|
+            create_gap([x,y]) unless @nodes[x][y]
+          end
+        end 
+      end
+    end
+  
+    def create_gap(position)
+      create_node("gap", position, "style=invis")
+    end
+  
+    def create_ranks
+      3.times do |y|
+        rank = "{rank=same"
+        @nodes.each_index { |x| rank += "; #{@nodes[x][y]}" if @nodes[x][y] }
+        rank << "};"
+        puts rank
+      end
+    end
+  
+    def create_edges
+      (@nodes.length-1).times do |x|
+        create_edge(@nodes[x][0], @nodes[x+1][0])
+      end
+    
+      @nodes.each do |column|
+        (column.length-1).times do |y|
+          create_edge(column[y], column[y+1])
+        end
+      end
+    end
+  
+    def create_edge(node1, node2)
+      puts %{#{node1} -> #{node2};}
+    end
+  
+    def wrap(text)
+      label_width = 20
+      text.gsub(/\n/," ").scan(/\S.{0,#{label_width-2}}\S(?=\s|$)|\S+/).join("\\n")
+    end
+  end
+end

data/lib/cards/writers/graffle_writer.rb

@@ -0,0 +1,69 @@
+require 'rubygems'
+gem 'rb-appscript'
+gem 'rubyosa'
+require 'appscript'
+require 'rbosa'
+
+module Cards
+  class GraffleWriter
+    CARD_WALL_STENCIL = File.expand_path(File.dirname(__FILE__) + "/CardWall.gstencil")
+    COLORS = {
+      :green => [0xcccc, 0xffff, 0xcccc],
+      :red => [0xffff, 0xcccc, 0xcccc],
+      :yellow => [0xffff, 0xffff, 0xcccc],
+      :blue => [0xcccc, 0xcccc, 0xffff],
+      :white => [0xffff, 0xffff, 0xffff]
+    }
+    CARD_WIDTH = 2.875.inches
+    CARD_HEIGHT = 2.875.inches
+    CARD_PADDING = 0.4.inches
+    
+    attr_reader :app
+  
+    def initialize(name = "Card Wall")
+      @app = Appscript.app('OmniGraffle 4')
+      @doc = @app.documents[0]
+      puts "opening #{name}"
+      open_document(name)
+      activate
+      clear_shapes
+    end
+  
+    def open_document(name)
+      @doc = @app.documents[name]
+      return @doc if @doc.exists
+    
+      @doc = @app.make :new => :document, :with_properties => {:name => name}
+      canvas.adjusts_pages.set true
+      @app.windows[name].zoom.set 0.2
+    end
+  
+    def clear_shapes
+      canvas.shapes.get.each do |shape|
+        shape.delete
+      end
+    end
+  
+    def create_card(text, color = :yellow, cell = [0, 0])
+      canvas.make :new => :shape, 
+                  :with_properties => {
+                    :origin => [cell[0] * (CARD_WIDTH + CARD_PADDING),
+                                cell[1] * (CARD_HEIGHT + CARD_PADDING)], 
+                    :size => [CARD_WIDTH, CARD_HEIGHT],
+                    :fill_color => COLORS[color],
+                    :text => {:size => 16.0, :text => text}
+                  }
+    end
+  
+    def done
+    end
+    
+    def canvas
+      @doc.canvases[0]
+    end
+  
+    def method_missing(sym, *args)
+      @app.send(sym, *args)
+    end
+  end
+end

data/lib/cards/writers/text_writer.rb

@@ -0,0 +1,23 @@
+module Cards
+  class TextWriter
+    def initialize
+      @rows = []
+    end
+  
+    def show(card)
+      create_card(card.name, card.color, card.cell)
+    end
+  
+    def create_card(name, color, cell)
+      (@rows[cell[1]] ||= [])[cell[0]] = name
+    end
+  
+    def to_s
+      @rows.map{|row| row.map{|val| val ? val : " " }.join }.join("\n")
+    end
+  
+    def inspect
+      @rows.map{|row| "|#{row.join("|")}|" }.join("\n")
+    end
+  end
+end

data/spec/cards/card_spec.rb

@@ -0,0 +1,141 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+require 'cards/card'
+require 'cards/layouts/row_layout'
+require 'cards/layouts/column_layout'
+include Cards
+
+module Cards
+  def a() @a ||= new_card("a"); end
+  def b() @b ||= new_card("b"); end
+  def c() @c ||= new_card("c"); end
+  def d() @d ||= new_card("d"); end
+  def e() @e ||= new_card("e"); end
+  def f() @f ||= new_card("f"); end
+  def g() @g ||= new_card("g"); end
+  def h() @h ||= new_card("h"); end
+  def i() @i ||= new_card("i"); end
+  def j() @j ||= new_card("j"); end
+  def k() @k ||= new_card("k"); end
+  def l() @l ||= new_card("l"); end
+  def m() @m ||= new_card("m"); end
+  
+  def new_card(name)
+    Card.new(name)
+  end
+end
+
+describe Card do
+  include Cards
+  
+  it "should have x & y" do
+    a.x = 1
+    a.y = 2
+    a.x.should == 1
+    a.y.should == 2
+  end
+end
+
+describe Card, "row layout" do
+  include Cards
+      
+  it "should have 1 row" do
+    a.add(b, c, d)
+
+    cards_to_s(a).should == 
+"a
+bcd"
+  end
+  
+  it "should show with 2 rows" do
+    a.add(b, g)
+    b.add(c, f)
+    c.add(d, e)
+
+    cards_to_s(a).should == 
+"a
+b  g
+c f
+de"
+  end
+  
+  def cards_to_s(card)
+    out = TextWriter.new
+    card.layout
+    card.visit {|c| out.show(c)}
+    out.to_s
+  end
+  
+  def new_card(name)
+    c = Card.new(name)
+    c.layout = RowLayout.new
+    c
+  end
+end
+
+describe Card, "column layout" do
+  include Cards
+  
+  before do
+    a.layout = RowLayout.new
+    @layout = ColumnLayout.new
+  end
+
+  it "should have 1 column" do
+    a.add(b, c, d)
+    d.add(e, f)
+    c.add(g, h, i)
+
+    cards_to_s(a).should == 
+"a
+bcd
+ ge
+ hf
+ i"
+  end
+  
+  it "should show with 2 rows and then columns" do
+    a.add(b, c, d)
+    a.children.each {|child| child.layout = RowLayout.new}
+    b.add(e, f, g)
+    d.add(h)
+    h.add(i, j)
+    f.add(k, l, m)
+
+    cards_to_s(a).should == 
+"a
+b  cd
+efg h
+ k  i
+ l  j
+ m"
+  end
+  
+  it "should wrap" do
+    @layout = ColumnLayout.new(:wrap_at => 3)
+    a.add(b, c, d)
+    c.add(e, f, g, h, i, j, k)
+    d.add(l, m)
+    
+    cards_to_s(a).should == 
+"a
+bc  d
+ ehkl
+ fi m
+ gj"
+    
+  end
+  
+  def cards_to_s(card)
+    out = TextWriter.new
+    card.layout
+    card.visit {|c| out.show(c)}
+    out.to_s
+  end
+  
+  def new_card(name)
+    c = Card.new(name)
+    c.layout = @layout
+    c
+  end
+end

data/spec/cards/card_wall_spec.rb

@@ -0,0 +1,76 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+require 'cards/card_wall'
+include Cards
+
+describe CardWall, "row, col" do
+  before do
+    @builder = CardWall.new.define do
+      row :activity
+      column :task
+    end
+    @out = TextWriter.new
+  end
+
+  it "should display cards" do
+    @builder.process :activity => 'a', :task => 1
+    @builder.process :task => 2
+    @builder.process :task => 3
+    @builder.process :activity => 'b', :task => 4
+    @builder.process :activity => 'c', :task => 5
+    @builder.process :task => 6
+    @builder.process :task => 7
+    @builder.process :task => 8
+    @builder.process :task => 9
+    @builder.process :task => 0
+    @builder.process :task => 1
+    @builder.process :activity => 'd', :task => 2
+
+    @builder.show(@out)
+    @out.to_s.should == 
+"abcd
+1452
+2 6
+3 7
+  8
+  9
+  0
+  1"
+  end
+end
+
+describe CardWall, "row, row, col" do
+  before do
+    @builder = CardWall.new.define do
+      row :activity
+      row :task
+      column :story
+    end
+    @out = TextWriter.new
+  end
+
+  it "should display cards" do
+    @builder.process :activity => 'a', :task => 1, :story => 'A'
+    @builder.process :task => 2, :story => 'B'
+    @builder.process :story => 'C'
+    @builder.process :task => 3, :story => 'D'
+    @builder.process :activity => 'b', :task => 4
+    @builder.process :activity => 'c', :task => 5
+    @builder.process :task => 6, :story => 'E'
+    @builder.process :story => 'F'
+    @builder.process :story => 'G'
+    @builder.process :story => 'H'
+    @builder.process :task => 7
+    @builder.process :task => 8
+    @builder.process :activity => 'd', :task => 2, :story => 'I'
+
+    @builder.show(@out)
+    @out.to_s.should == 
+"a  bc   d
+123456782
+ABD  E  I
+ C   F
+     G
+     H"
+  end
+end

data/spec/cards/csv_parser_spec.rb

@@ -0,0 +1,28 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+require 'file_sandbox_behavior'
+require 'cards/csv_parser'
+include Cards
+
+describe CsvParser do
+  include FileSandbox
+  
+  it "should parse csv" do
+    sandbox.new :file => 'tmp.csv', :with_contents =>
+"activity,task,story,estimate
+manage email,,
+,read email,
+,,display email body
+manage email,think about email,,1
+,read email,,2
+,,display email body,3"
+    
+    rows = CsvParser.new(sandbox['tmp.csv'].path).rows
+    rows[0].to_h.should == {:activity => 'manage email'}
+    rows[1].to_h.should == {:task => 'read email'}
+    rows[2].to_h.should == {:story => 'display email body'}
+    rows[3].to_h.should == {:activity => 'manage email', :task => 'think about email', :estimate => "1"}
+    rows[4].to_h.should == {:task => 'read email', :estimate => "2"}
+    rows[5].to_h.should == {:story => 'display email body', :estimate => "3"}
+  end
+end

data/spec/cards/extensions_spec.rb

@@ -0,0 +1,24 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "String extensions" do
+  it "should know what's blank" do
+    nil.should be_blank
+    "".should be_blank
+    "  \t\n".should be_blank
+    "a".should_not be_blank
+  end
+end
+
+describe "Array extensions" do
+  it "should have max" do
+    [1, 2, 5, 4].max.should == 5
+  end
+
+  it "should have min" do
+    [1, 2, 5, 4].min.should == 1    
+  end
+
+  it "should compute sum" do
+    [1, 2, 3].sum.should == 6
+  end
+end

data/spec/cards/swim_lanes_spec.rb

@@ -0,0 +1,17 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+require 'cards/swim_lanes'
+include Cards
+
+describe SwimLanes do
+  before do
+    @lanes = SwimLanes.new.define do
+      row :area
+      lanes :pain_points, :by => %w(H M L)
+    end
+  end
+  
+  it "should show rows w/ no swim lanes" do
+    
+  end
+  
+end

data/spec/cards/writers/dot_writer_spec.rb

@@ -0,0 +1,70 @@
+require File.dirname(__FILE__) + '/../../spec_helper'
+require 'cards/writers/dot_writer'
+require 'stringio'
+include Cards
+
+describe DotWriter do
+  CardStruct = Struct.new(:name, :color, :position)
+  {
+    CardStruct["role", :green, [0,0]] => /card_0_0 \[label="role",fillcolor=darkseagreen1\];/,
+    CardStruct["activity", :blue, [0,1]] => /card_0_1 \[label="activity",fillcolor=lightblue\];/,
+    CardStruct["task", :red, [0,2]] => /card_0_2 \[label="task",fillcolor=pink\];/,
+    CardStruct["feature", :yellow, [0,3]] => /card_0_3 \[label="feature",fillcolor=lightyellow\];/,
+  }.each do |card, expected_node|
+    it %{given #{card.color} card created with name #{card.name.inspect} in position #{card.position.inspect} it should create node #{expected_node.inspect}} do
+      create_card(card.name, card.color, card.position)
+      @actual_output.should =~ expected_node
+    end
+  end
+  
+  {
+    [[0,0],[0,2]] => /gap_0_1 \[style=invis\];/,
+    [[0,0],[2,0]] => /gap_1_0 \[style=invis\];/,
+    [[0,0],[1,1]] => /gap_1_0 \[style=invis\];/,
+  }.each do |card_positions, expected_gap_node|
+    it %{given cards created in positions #{card_positions.inspect} it should create invisible node #{expected_gap_node.inspect}} do
+      create_cards_in_positions(card_positions)
+      @actual_output.should =~ expected_gap_node
+    end
+  end
+
+  {
+    [[0,0],[1,0],[2,0]] => [/card_0_0 -> card_1_0;/,/card_1_0 -> card_2_0;/],                  
+    [[0,0],[0,1],[0,2]] => [/card_0_0 -> card_0_1;/,/card_0_1 -> card_0_2;/],
+  }.each do |card_positions, edges|
+    it %{given cards created in positions #{card_positions.inspect} it should create edges #{edges.inspect} } do
+      create_cards_in_positions(card_positions)
+      @actual_output.expect(edges)
+    end
+  end
+  
+  {
+    [[0,0],[1,0]] => [/\{rank=same; card_0_0; card_1_0\};/],
+  }.each do |card_positions, ranks|
+    it %{given cards created in positions #{card_positions.inspect} it should create ranks #{ranks.inspect} } do
+      create_cards_in_positions(card_positions)
+      @actual_output.expect(ranks)
+    end
+  end
+  
+  def build
+    @builder = DotWriter.new(StringIO.new(@actual_output = "", "w+"))
+    yield
+    @builder.done
+  end
+  
+  def create_cards_in_positions(positions)
+    build { positions.each { |position| @builder.create_card("card", :yellow, position)} }
+  end
+  
+  def create_card(name, color, position)
+    build { @builder.create_card(name, color, position) }
+  end
+  
+  class String
+    def expect(lines)
+      lines.each { |line| self.should =~ line }
+    end
+  end
+  
+end

data/spec/cards/writers/text_writer_spec.rb

@@ -0,0 +1,26 @@
+require File.dirname(__FILE__) + '/../../spec_helper'
+include Cards
+
+describe TextWriter do
+  before do
+    @output = TextWriter.new
+  end
+  
+  it "should show simple output for to_s" do
+    @output.create_card('a', nil, [0, 0])
+    @output.create_card('b', nil, [0, 1])
+    @output.create_card('c', nil, [0, 2])
+    @output.create_card('d', nil, [2, 2])
+    @output.create_card('e', nil, [1, 2])
+    @output.create_card('f', nil, [3, 0])
+    
+    @output.to_s.should == 
+"a  f
+b
+ced"
+    @output.inspect.should == 
+"|a|||f|
+|b|
+|c|e|d|"
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,13 @@
+$LOAD_PATH.unshift File.expand_path(File.dirname(__FILE__) + "/../lib")
+
+require "rubygems"
+gem "rspec"
+gem "mocha"
+gem "file_sandbox"
+
+require 'cards/extensions'
+require 'cards/writers/text_writer'
+
+Spec::Runner.configure do |config|
+  #config.mock_with :mocha
+end

metadata

@@ -0,0 +1,92 @@
+--- !ruby/object:Gem::Specification 
+name: cards
+version: !ruby/object:Gem::Version 
+  version: "0.6"
+platform: ruby
+authors: 
+- Jeremy Stell-Smith
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-06-05 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.5.3
+    version: 
+description: CardWallGen is a program that reads a requirements map and generates a view  of it.  Typically it reads it from excel or csv and generates a graphical  view in visio or omnigraffle, though it may also generate another csv view of it.
+email: jeremystellsmith@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- CHANGES.txt
+- Manifest.txt
+- README.txt
+files: 
+- CHANGES.txt
+- Manifest.txt
+- README.txt
+- Rakefile
+- lib/cards.rb
+- lib/cards/builder.rb
+- lib/cards/card.rb
+- lib/cards/card_wall.rb
+- lib/cards/csv_builder.rb
+- lib/cards/csv_parser.rb
+- lib/cards/extensions.rb
+- lib/cards/layouts/column_layout.rb
+- lib/cards/layouts/nil_layout.rb
+- lib/cards/layouts/row_layout.rb
+- lib/cards/master_story_list.rb
+- lib/cards/swim_lanes.rb
+- lib/cards/text.rb
+- lib/cards/tracker_csv.rb
+- lib/cards/writers/dot_writer.rb
+- lib/cards/writers/graffle_writer.rb
+- lib/cards/writers/text_writer.rb
+- spec/cards/card_spec.rb
+- spec/cards/card_wall_spec.rb
+- spec/cards/csv_parser_spec.rb
+- spec/cards/extensions_spec.rb
+- spec/cards/swim_lanes_spec.rb
+- spec/cards/writers/dot_writer_spec.rb
+- spec/cards/writers/text_writer_spec.rb
+- spec/spec_helper.rb
+has_rdoc: true
+homepage: http://rubyforge.org/projects/cardwallgen
+post_install_message: 
+rdoc_options: 
+- --main
+- README.txt
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: cardwallgen
+rubygems_version: 1.1.1
+signing_key: 
+specification_version: 2
+summary: CardWallGen is a program that reads a requirements map and generates a view  of it.  Typically it reads it from excel or csv and generates a graphical  view in visio or omnigraffle, though it may also generate another csv view of it.
+test_files: []
+