plist4r 0.2.2 → 1.0.0

data/lib/plist4r/mixin/haml4r.rb

@@ -0,0 +1,4 @@
+
+# Dir.glob(File.dirname(__FILE__) + "/haml4r/**/*.rb").each {|b| require File.expand_path b}
+
+require 'plist4r/mixin/haml4r/table'

data/lib/plist4r/mixin/haml4r/css_attributes.rb

@@ -0,0 +1,19 @@
+
+module Haml4r
+  CssAttributes = %w[ css_class css_id css_style ]
+
+  module HamlObject
+    def haml
+      @haml ||= <<-'EOC'
+= super
+EOC
+    end
+
+    def to_s
+      require 'haml'
+      engine = ::Haml::Engine.new self.haml
+      rendered_html_output = engine.render self
+    end
+  end
+
+end

data/lib/plist4r/mixin/haml4r/examples.rb

@@ -0,0 +1,261 @@
+
+require 'haml'
+require 'plist4r/mixin/haml4r/table'
+
+# def table
+#   t = Haml4r::Table.new :size => [0..5, 0..5]
+#   t.cell 0,0, "foo"
+#   t.cell 0,0
+# 
+#   t.cell 2,0, "pineapples"
+#   t.cell 4,0, "some_string"
+#   t.fill 0..5, 1..4, 0
+#   puts t.inspect
+# end
+# table
+
+
+
+def haml4r_table
+  # t = Haml4r::Table.new :size => [0..5, 0..5]
+  # t.cell 0,0, "foo"
+  # t.cell 0,0
+
+  # t.cell 2,0, "pineapples"
+  # t.cell 4,0, "some_string"
+  # t.fill 0..5, 1..4, 0
+  # puts t.inspect
+  # puts ""
+
+  # puts "col_range = #{t.col_range}"
+  # puts "row_range = #{t.row_range}"
+  # puts "size = #{t.size}.inspect"
+  # puts ""
+  
+  # puts "pad_all \"empty\""
+  # t.pad_all "empty"
+  # puts t.inspect
+  # puts ""
+  
+  # puts "crop 0..2, 0..2"
+  # t2 = t.crop 0..2, 0..2
+  # puts t2.inspect
+  # puts ""
+
+  # puts "fill 0..2, 1..2, \"fill\""
+  # t.fill 0..2, 1..2, "fill"
+  # puts t.inspect
+  # puts ""
+
+  # puts "fill_all, \"fill\""
+  # t2.fill_all "fill"
+  # puts t2.inspect
+  # puts ""
+
+  # puts "inverse_fill, 1..1, 1..1, \"inverse\""
+  # # t2.inverse_fill 1..1, 1..1, "inverse"
+  # t2.inverse_fill 1, 1, "inverse"
+  # puts t2.inspect
+  # puts ""
+
+  # puts "t3"
+  # fruit = %w[ apples strawberries banana grapefruit mango papaya]
+  # day = %w[ mon tues wed thurs fri sat]
+  # t3 = Haml4r::Table.new :size => [0..5, 0..5]
+  # (0..5).each do |col|
+  #   (0..2).each do |row|
+  #     t3.cell col,row, fruit[col]
+  #     # t3.cell col,row, "S " << (97+col).chr << " " << (97+row).chr
+  #   end
+  #   (3..5).each do |row|
+  #     t3.cell col,row, day[col]
+  #   end
+  # end
+  # puts t3.inspect
+  # puts ""
+
+  # puts "transpose"
+  # t3.transpose
+  # puts t3.inspect
+  # puts ""
+  # 
+  # puts "transpose 3..5, 3..5"
+  # t3.transpose 3..5, 3..5
+  # puts t3.inspect
+  # puts ""
+  # 
+  # puts "transpose 3..5, 3..5"
+  # t3.transpose 3..5, 3..5
+  # puts t3.inspect
+  # puts ""
+  # 
+  # puts "transpose 0..3, 0..2"
+  # t3.transpose 0..3, 0..2
+  # puts t3.inspect
+  # puts ""
+
+  # puts "col_replace 0, (row 3)"
+  # # t3.col_replace 0, t3.row(3)
+  # t3.col_replace 0..1, "col 0..1"
+  # # t3.col 0, t3.col(5)
+  # puts t3.inspect
+  # puts ""
+
+  # puts "row_replace 0, (col 5)"
+  # puts t3.col(5).transpose.inspect
+  # t3.row_replace 1, t3.col(5).transpose
+  # # t3.row_replace 1, "row 1"
+  # puts t3.inspect
+  # puts ""
+
+  # puts "translate 0..2, 0..2, [3,3]"
+  # t3.translate 0..2, 0..2, [3,3]
+  # puts t3.inspect
+  # puts ""
+
+  # puts "t3.cells(0..1, 2..2)"
+  # puts t3.cells(0..1,2..2).inspect
+  # puts ""
+
+  # puts "col_insert 3..4, 3..4, t3.cells(0..1, 2..2)"
+  # t3.col_insert 3..4, 3..4, t3.cells(0..1,2..2)
+  # puts t3.inspect
+  # puts ""
+
+end
+# haml4r_table
+
+def haml4r_haml_table_cells
+  # t = Haml4r::TableCells.new :size => [0..3, 0..5]
+  # puts t.inspect
+  # puts ""
+  # 
+  # puts "t.each content = Date::DAYNAMES[i]"
+  # i = 0
+  # require 'date'
+  # t.each 1..2, 1..3 do |c|
+  #   c.content = Date::DAYNAMES[i]
+  #   i +=1
+  # end
+  # puts t.inspect
+  # puts ""
+  # 
+  # t.cell(1,1).content = "foos"
+  # c = t.content
+  # puts "t.content => #{c.class}"
+  # puts c.inspect
+  # puts c.cell(0,0).class
+  # puts c.cell(1,1).class
+  # puts ""
+  # 
+  # puts "t.content = \"depeche mode\""
+  # t.content = "depeche mode"
+  # puts t.inspect
+  # puts t.cell(0,0).class
+  # puts t.cell(1,1).class
+  # puts ""
+end
+# haml4r_haml_table_cells
+
+def haml4r_haml_table_cell
+  # puts "table cell"
+  # c = Haml4r::TableCell.new
+  # puts c.inspect
+  # puts ""
+  # c.content = "jeremy"
+  # puts c.inspect
+  # puts ""
+end
+# haml4r_haml_table_cell
+
+def haml4r_haml_table_cell_spans
+  # t = Haml4r::TableCells.new :size => [0..3, 0..5]
+  # # puts t.inspect
+  # # puts ""
+  # 
+  # puts "t.each(1..2, 1..3) content = Date::DAYNAMES[i]"
+  # i = 0
+  # require 'date'
+  # t.each 1..2, 1..3 do |c|
+  #   c.content = Date::DAYNAMES[i]
+  #   i +=1
+  # end
+  # puts t.inspect
+  # puts ""
+  # 
+  # puts "t.span_cells 0..3, 4..5, :content => \"foos\""
+  # t.span_cells 0..3, 4..5, :content => "foos"
+  # puts t.inspect
+  # puts ""
+  # 
+  # puts "t.cell(0,4).content = \"bar\""
+  # t.cell(0,4).content = "bar"
+  # t.cell(0,4).css_class = "bar"
+  # t.cell(0,4).css_class += " of_trouble"
+  # puts t.inspect
+  # puts ""
+  # 
+  # puts "t.to_s"
+  # puts t
+  # puts ""
+end
+# haml4r_haml_table_cell_spans
+
+def haml4r_haml_table
+  t = Haml4r::Table.new :size => [1..3, 1..2]
+  
+  t.col_range.each do |col|
+    t.row_range.each do |row|
+      t.cell(col,row).content = "val#{col}#{row}"
+    end
+  end
+
+  t.col_header = Haml4r::TableSection.new
+  t.col_header.size [t.body.col_range,1..2]
+  t.col_header.span_cells 1..3, 1, :content => "Open"
+  t.col_header.col_range.each do |col|
+    t.col_header.cell(col,2).content = "x#{col}"
+  end
+  
+  t.row_header = Haml4r::TableSection.new
+  t.row_header.size [1,t.body.row_range]
+  t.row_header.row_range.each do |row|
+    t.row_header.cell(1,row).content = "y#{row}"
+  end
+  
+  puts t.inspect
+  puts ""
+  
+  puts "t.to_s"
+  puts t
+  puts ""
+end
+# haml4r_haml_table
+
+def haml4r_transpose_test
+  t = Haml4r::Table.new :size => [0..6, 2..8]
+  puts "strip = t.body.cells(1..5, 3..3) ; strip.span"
+  strip = t.body.cells(1..5, 3..3)
+  strip.span_cells
+  # strip.first.content = "foo"
+  strip.content = "foo"
+  strip.cell(6,3).content = "james"
+
+  strip.map!(1..6,3) do |c|
+    c.content += " bar"
+  end
+
+  puts t.inspect
+  puts ""
+
+  puts "t.body.transpose 1..5,3..3"
+  t.body.transpose 1..5, 3..3
+  # t.body.transpose 1..4, 3..3
+  # t.body.cell(1,7).content = "bar"
+  puts t.body.inspect
+  puts ""
+  
+end
+# haml4r_transpose_test
+
+

data/lib/plist4r/mixin/haml4r/haml_table_example.rb

@@ -0,0 +1,79 @@
+require 'haml'
+require 'plist4r/mixin/haml4r/table'
+
+module Haml4r
+  class TableExample
+
+    def haml
+      @haml ||= <<-'EOC'
+%h1 Backend Test Matrix
+%div
+  %h3 Code to generate html table
+  %pre{ :class => "code" } #{create_dynamic_table}
+  %p Haml
+  %pre{ :class => "code" } #{@table.haml}
+  %h2 ** Generated Html **
+  %h3 Dynamic table
+  %p Inspect method (ascii representation)
+  %pre{ :class => "code" } #{"&nbsp;\n" + @table.inspect + "&nbsp;\n"}
+  %p Haml helper method
+  %pre{ :class => "code" } = @table
+  = @table
+  %hr
+  %h3 Dynamic table, transposed (flipped)
+  %pre{ :class => "code" } - @table.transpose
+  %p Inspect method (ascii representation)
+  - @table.transpose
+  %pre{ :class => "code" } #{"&nbsp;\n" + @table.inspect + "&nbsp;\n"}
+  %p Haml helper method
+  %pre{ :class => "code" } = @table
+  = @table
+%p
+EOC
+    end
+
+    def to_s
+      require 'haml'
+      engine = ::Haml::Engine.new self.haml
+      rendered_html_output = engine.render self
+    end
+
+    def create_dynamic_table
+@create_dynamic_table ||= <<-'EOC'
+t = Haml4r::Table.new :size => [1..3, 1..2]
+
+t.col_range.each do |col|
+  t.row_range.each do |row|
+    t.cell(col,row).content = "val#{col}#{row}"
+  end
+end
+
+t.col_header.size [t.body.col_range,1..2]
+t.col_header.span_cells 1..3, 1, :content => "Open"
+
+t.col_header.col_range.each do |col|
+  t.col_header.cell(col,2).content = "x#{col}"
+end
+
+t.row_header.size [1,t.body.row_range]
+t.row_header.row_range.each do |row|
+  t.row_header.cell(1,row).content = "y#{row}"
+end
+@table = t
+EOC
+    end
+
+    def initialize *args, &blk
+      eval create_dynamic_table
+    end
+
+    def write_html_file
+      docs_dir = File.dirname(__FILE__) + "/../../../lib/plist4r/docs"
+      File.open "#{docs_dir}/BackendTestMatrix.html","w" do |o|
+        o << to_s
+      end
+    end
+
+  end
+end
+

data/lib/plist4r/mixin/haml4r/table.rb

@@ -0,0 +1,157 @@
+
+require 'plist4r/mixin/haml4r/table_section'
+
+module Haml4r
+
+  # A Table is composed of 3 sub-tables. The table of Column Headers, the table of Row Headers,
+  # and the body of the table, the table data. Its the responsibility of the Table to render all 
+  # Table Sections into html/xhtml, with to_s method.
+  # 
+  # The three tables are laid out by TableView as follows:
+  # 
+  #   :------------------------------------------:
+  #   |                     :------------------: |
+  #   |                     |                  | |
+  #   |                     |                  | |
+  #   |                     |   TableSection   | |
+  #   |                     |   @col_headers   | |
+  #   |                     |                  | |
+  #   |                     |                  | |
+  #   |                     :------------------: |
+  #   | :------------------::------------------: |
+  #   | |                  ||                  | |
+  #   | |                  ||                  | |
+  #   | |   TableSection   ||   TableSection   | |
+  #   | |   @row_headers   ||   @body          | |
+  #   | |                  ||                  | |
+  #   | |                  ||                  | |
+  #   | :------------------::------------------: |
+  #   |                   Table                  |
+  #   :------------------------------------------:
+  # Note: The row header TableSection can be set with CSS attributes. 
+  # However there is no overall HTML element for row headers, 
+  # Therefore we cannot apply the row_headers css attributes.
+  #       
+  class Table
+
+    def to_s
+      require 'haml'
+      engine = ::Haml::Engine.new self.haml
+      rendered_html_output = engine.render self
+    end
+
+    def haml
+      @haml ||= <<-'EOC'
+%table{:class => self.css_class, :id => self.css_id, :style => self.css_style}
+  - if @col_header
+    %thead{:class => @col_header.css_class, :id => @col_header.css_id, :style => @col_header.css_style}
+      - @col_header.row_range.each do |row|
+        %tr
+          - if @row_header
+            - @row_header.col_range.each do |col|
+              %th &nbsp;
+          - @col_header.col_range.each do |col|
+            - c = @col_header.cell col, row
+            - unless c.spanee
+              %th{:class => c.css_class, :id => c.css_id, :style => c.css_style, :colspan => @col_header.colspan(col,row), :rowspan => @col_header.rowspan(col,row)} #{c.content}
+  - if @body
+    %tbody{:class => @body.css_class, :id => @body.css_id, :style => @body.css_style}
+      - @body.row_range.each do |row|
+        %tr
+          - if @row_header
+            - @row_header.col_range.each do |col|
+              - c = @row_header.cell col, row
+              - unless c.spanee
+                %th{:class => c.css_class, :id => c.css_id, :style => c.css_style, :colspan => @row_header.colspan(col,row), :rowspan => @row_header.rowspan(col,row)} #{c.content}
+          - @body.col_range.each do |col|
+            - c = @body.cell col, row
+            - unless c.spanee
+              %td{:class => c.css_class, :id => c.css_id, :style => c.css_style, :colspan => @body.colspan(col,row), :rowspan => @body.rowspan(col,row)} #{c.content}
+EOC
+    end
+
+    Attributes = Haml4r::CssAttributes + %w[ col_header row_header body ]
+
+    def initialize *args, &blk
+      @body = TableSection.new *args, &blk
+      @col_header, @row_header = [TableSection.new,TableSection.new]
+    end
+
+    def method_missing method_sym, *args, &blk
+      if Attributes.include? method_sym.to_s.chomp('=')
+        set_or_return method_sym.to_s, *args, &blk
+
+      elsif @body.respond_to? method_sym
+        @body.send method_sym, *args, &blk
+
+      else
+        super
+      end
+    end
+
+    def transpose
+      @col_header, @row_header = @row_header, @col_header
+      @col_header.transpose
+      @row_header.transpose
+      @body.transpose
+      self
+    end
+
+    def respond_to? method_sym
+      return true if Attributes.include? method_sym.to_s.chomp('=')
+      return true if @body.respond_to? method_sym
+      super
+    end
+
+    def set attribute, value
+      eval "@#{attribute} = value"
+    end
+
+    def value_for attribute
+      eval "@#{attribute}"
+    end
+
+    def set_or_return attribute, value=nil
+      case attribute
+      when /\=$/
+        set attribute.to_s.chomp('='), value
+      else
+        value_for attribute.to_s
+      end
+    end
+
+    def inspect start_col=0
+      col0 = 0
+      cha,ba = [0,0]
+
+      unless row_header.empty?
+        col0 += row_header.ascii_col_width
+        bw = body.ascii_col_width
+        chw = col_header.ascii_col_width
+
+        if bw > chw
+          cha += (bw-chw)/2
+        elsif chw > bw
+          ba += (chw-bw)/2
+        end
+      end
+
+      b = body.inspect(start_col+col0+ba).split "\n"
+
+      unless row_header.empty?
+        rh = row_header.inspect(start_col).split "\n"
+        (0..([rh.size, b.size].min-1)).each do |i|
+          b[i][0,col0] = rh[i][0,col0]
+        end
+      end
+
+      if col_header.empty?
+        return b.join("\n") + "\n"
+      else
+        return col_header.inspect(start_col+col0+cha) + b.join("\n") + "\n"
+      end
+    end
+
+  end
+
+end