svg-render 0.1.0 → 0.1.1

data/lib/canvas_enclosure.rb

@@ -0,0 +1,12 @@
+def render_canvas(template_name)
+  url = "http://rorbuilder.info/r/heroku/erb/canvas.erb"
+  t = open(url, "UserAgent" => "Sinatra-Rscript").read
+  build_templates(t)
+
+  @@templates[template_name] = yield.strip
+  @content_type = 'text/xml'
+  erb @@templates[template_name]
+end      
+
+
+

data/lib/canvas_shape.rb

@@ -0,0 +1,94 @@
+#!/usr/bin/ruby
+
+# file: canvas_shape.rb
+
+require 'shape_base'
+
+module CanvasShape
+
+  class Shape < ShapeBase
+
+    def initialize()
+      super
+    end
+    
+    private
+
+    def load_shapes()
+
+      line =  Proc.new do |h|
+        x1, y1, x2, y2 = h[:x1], h[:y1], h[:x2], h[:y2]
+        #x2, y2 = (h[:width] - x1), (h[:height] - y1)
+        stroke = h[:stroke]
+        stroke_width = stroke[:width]
+        colour = stroke[:colour]
+
+        Proc.new do 
+          puts "*** drawing a line"
+"
+ctx.strokeStyle = '#{colour}';
+ctx.lineWidth = #{stroke_width};
+ctx.beginPath();
+ctx.moveTo(#{x1},#{y1});
+ctx.lineTo(#{x2},#{y2});
+ctx.stroke();"
+      
+        end
+      end
+
+      rectangle = Proc.new do |h|
+        x, y = h[:x], h[:y]
+        width, height=  h[:width], h[:height]
+        
+        style = h[:style]
+        fill = style[:fill]        
+        stroke = style[:stroke]
+        stroke_width = style['stroke-width']
+
+        Proc.new do 
+          puts "*** drawing a rectangle"
+          
+<<CANVAS
+       
+ctx.fillStyle = "#{fill}";
+ctx.fillRect (#{x}, #{y}, #{width}, #{height});
+
+CANVAS
+          
+          #canvas.rect(x2, y2, x1, y1).styles(:fill => fill, :stroke => stroke, :stroke_width => stroke_width)
+        end
+      end
+
+
+      text = lambda do |h|
+        x, y = h[:x], h[:y]
+        font_size = h[:font][:size] # ???
+        fill = h[:style][:fill]
+        text2 = h[:text]
+        text_align = h[:style][:text_align]
+
+        #jr031209 stroke = h[:stroke]
+        #jr031209 r,g,b = stroke[:rgb]
+
+        return Proc.new {} if text2.length < 1
+        Proc.new do 
+          puts "*** drawing text x %s y %s text: %s" % [x,y,text2]
+<<CANVAS
+
+ctx.font = "#{font_size}em Times New Roman";
+ctx.fillStyle = "#{fill}";
+ctx.textAlign = '#{text_align}';
+ctx.fillText("#{text2}", #{x}, #{y});
+
+CANVAS
+        end
+      end
+
+      @shape[:line] = line
+      @shape[:rectangle] = rectangle
+      @shape[:text] = text
+
+    end
+  end
+
+end

data/lib/elements.rb

@@ -0,0 +1,34 @@
+#!/usr/bin/ruby
+
+# file: elements.rb
+
+# this code extends REXML::Document::Element
+REXML::Element.class_eval do
+
+  def ui_element=(object)
+    @ui_element = object
+  end
+  
+  def ui_element()
+    @ui_element
+  end
+
+  def render()
+    @ui_element.invoke
+  end
+
+  def load_ui_element
+
+    text = self.text.to_s.strip.chomp   
+    @ui_element.text = text.length > 0 ? text : ''
+
+    # must load the parent properties
+    # inherit the parent properties
+    @ui_element.load_properties(self.parent.attributes)
+    # get the style
+    @ui_element.load_properties(self.attributes)
+  end
+
+end
+
+

data/lib/render_svg3.rb

@@ -0,0 +1,265 @@
+#!/usr/bin/ruby
+# file: render_svg3.rb
+
+require 'elements'
+
+class SvgEnvironment
+
+  def initialize()
+    @@scale = 0.5
+  end
+  
+  def load_renderer(renderer)
+    @@shape2 = renderer
+  end
+  
+  def scale()
+    @@scale
+  end
+  
+  def scale=(val)
+    @@scale = val
+  end
+end
+
+class ElementSvg #< SvgEnvironment
+#include RVGShape
+
+  # this initialize method should be overridden with a class_eval from the calling RSF job
+  def initialize()
+    initialize_variables()
+    #@@shape = RVGShape::Shape.new
+    #@@shape = Shape.new
+  end
+    
+  def initialize_variables()
+    @property = {'style' => ''}
+    @style_property = {}    
+  end
+
+  def text=(val)
+    @text = val
+  end
+
+  def text()
+    @text
+  end
+
+  def scale=(val);    @@scale = val;  end
+  def scale()    @@scale  end
+  
+  def x_offset=(val);    @@x_offset = val;  end
+  def x_offset();    @@x_offset;  end
+    
+  def y_offset=(val);    @@y_offset = val;  end
+  def y_offset();    @@y_offset;  end    
+
+  def render_element()
+    #parse_style()
+    properties = yield
+    @@shape.draw @type, properties
+  end
+
+  def parse_style()
+    if @property['style'] then
+      properties = get_style_properties(@property['style']) 
+
+      #h = Hash[*properties.join(';').split(';')]
+      properties.each do |name, value|
+        @style_property[name] = value if @style_property.has_key? name
+      end
+
+    end
+  end
+
+  def get_style_properties(properties_string)
+    properties_string.split(/;/).map do |a|
+      a.match(/^(.[^:]+):([^$]+$)/).captures.map {|x| x.strip}
+    end
+  end
+
+  def load_properties(attributes)
+    attributes.each_attribute do |attribute|
+      @property[attribute.name] = attribute.value if @property.has_key? attribute.name
+    end
+    parse_style()
+  end
+  
+  def load_renderer(renderer)
+    @@shape = renderer
+  end
+end
+
+class ElementEllipse < ElementSvg
+  def initialize()
+    super
+  end
+
+  def invoke()
+    puts " -- render the 'ellipse' element"    
+    render_element()
+  end
+end
+
+
+class ElementRect < ElementSvg
+
+  def initialize()
+    super
+    local_properties = {'x' => '','y' => '', 'width' => '', 'height' => ''}
+    @property.merge!(local_properties)
+    @style_property = {'fill' => '', 'stroke' => '', 'stroke-width' => ''}
+    @type = :rectangle
+  end
+
+  def invoke()
+    puts " -- render the 'rect' element" 
+    render_element()
+  end
+
+  def render_element()
+    super do 
+      h = @property; hs = @style_property
+      x1, y1, x2, y2 =  h['x'].to_i,  h['y'].to_i,  h['x'].to_i + h['width'].to_i,  h['y'].to_i + h['height'].to_i
+      #r,g,b = hs['fill'].match(/rgb\((\d{1,5}),(\d{1,5}),(\d{1,5})\)/).captures
+      style =  {:fill => hs['fill'], :stroke => hs['stroke'], :stroke_width => hs['stroke-width']}
+      
+      #scale = run_projectx('registry', 'get-key', :path => 'app/svg_viewer/scale').first.to_f
+      x1, y1, x2, y2 = [x1, y1, x2, y2].map {|x| x * @@scale}
+      x1, x2 = [x1, x2].map {|x| x + @@x_offset * @@scale}
+      y1, y2 = [y1, y2].map {|x| x + @@y_offset * @@scale}
+
+      properties = {:x => x1, :y => y1, :width => x2 - x1, :height => y2 - y1, :style => style}
+      #properties = {:x => x1, :y => y1,  :width => x2 - x1, :height => y2 - y1}
+      #draw properties
+    end
+  end
+
+end
+
+
+class ElementLine < ElementSvg
+
+  def initialize()
+    super
+    local_properties = {'x1' => '','y1' => '', 'x2' => '', 'y2' => ''}
+    @property.merge!(local_properties)
+    @style_property = {'stroke' => '', 'stroke-width' => ''}
+    @type = :line
+  end
+
+  def invoke()
+    puts " -- render the 'line' element "  + @text
+    render_element() 
+  end
+
+  def render_element()
+    super do
+      h = @property; hs = @style_property
+      x1, y1, x2, y2 =  h['x1'].to_i,  h['y1'].to_i,  h['x2'].to_i,  h['y2'].to_i
+      stroke_width = hs['stroke-width'].to_i
+      colour = hs['stroke']
+
+      #scale = run_projectx('registry', 'get-key', :path => 'app/svg_viewer/scale').first.to_f
+      x1, y1, x2, y2 = [x1, y1, x2, y2].map {|x| x * @@scale}
+      x1, x2 = [x1, x2].map {|x| x + @@x_offset * @@scale}
+      y1, y2 = [y1, y2].map {|x| x + @@y_offset * @@scale}
+      
+      stroke = {:width => stroke_width, :colour => colour}
+      {:x1 => x1, :y1 => y1, :x2 => x2, :y2 => y2, :stroke => stroke}
+      #draw properties
+    end
+  end
+
+end
+
+class ElementText < ElementSvg
+  def initialize()
+    super
+    local_properties = {'x' => '','y' => '', 'fill' => '', 'font-size' => '15'}
+    @property.merge!(local_properties)
+    @style_property = {'font-size' => '', 'font-style' => '', 'font-weight' => '', 
+                       'fill' => '', 'fill-opacity' => '', 'stroke' => '', 'font-family' => '', 'text-align' => 'start'}
+    @type = :text
+  end
+
+  def invoke()
+    puts " -- render the 'text' element" 
+    render_element()
+  end
+
+  def render_element()
+    super do
+      h = @property; style = @style_property
+      style.delete_if {|key, value| value.empty?}
+      h.merge! style
+      x, y =  h['x'].to_i,  h['y'].to_i
+      font_size = (h['font-size'].to_f * 0.0625) unless h['font-size'].empty?
+
+      
+      fill = h['fill']
+      text2 = self.text
+      text_align = h['text-align'] 
+      @style_property['text-align'] = 'start'
+      #@style_property = {'font-size' => '', 'font-style' => '', 'font-weight' => '', 
+       #                'fill' => '', 'fill-opacity' => '', 'stroke' => '', 'font-family' => '', 'text-align' => 'start'}
+      #puts 'xzx ' + text2 + 'xzx'
+     
+      #stroke_width = hs['stroke-width'].to_i
+      #r,g,b = hs['stroke'].match(/rgb\((\d{1,5}),(\d{1,5}),(\d{1,5})\)/).captures
+      #puts 'x0xx ' + font_size.to_s + ' y0yy'
+      #scale = run_projectx('registry', 'get-key', :path => 'app/svg_viewer/scale').first.to_f
+      x, y, font_size = [x, y, font_size].map {|x| x * @@scale }
+      #x_offset = -40
+      x += @@x_offset * @@scale
+      y += @@y_offset * @@scale
+      #puts 'x1xx ' + font_size.to_s + ' y1yy'
+
+      {:x => x, :y => y, :text => text2, :style => {:fill => fill, :text_align => text_align}, :font => {:size => font_size}}
+    end
+  end
+
+end
+
+
+class RenderSvg
+  def initialize()
+    @dom = {}
+    @svg_procs = []
+    puts 'render ...'
+
+    load_elements
+    #@dom = render_document(doc.root)    
+  end
+
+  def load_elements()
+    @h = {}
+    @h['ellipse'] = ElementEllipse.new
+    @h['line'] = ElementLine.new
+    @h['rect'] = ElementRect.new
+    @h['text'] = ElementText.new
+    @h['tspan'] = ElementText.new
+
+  end
+
+  def render(doc)
+    @svg_procs = []
+    render_all doc        
+  end
+
+  def render_all( doc)
+    if @h.has_key? doc.name then
+      doc.ui_element = @h[doc.name] 
+      doc.load_ui_element
+      @svg_procs << doc.ui_element.invoke
+    end
+
+    doc.elements.each { |node|  render_all node}
+  end
+
+  def svg_procs()
+    @svg_procs
+  end
+
+end
+

data/lib/rvg_shape.rb

@@ -0,0 +1,75 @@
+#!/usr/bin/ruby
+
+# file: rvg_shape.rb
+
+require 'shape_base'
+
+module RVGShape
+
+  class Shape < ShapeBase
+    
+    def initialize()
+      super
+    end
+
+    private
+
+    def load_shapes()
+
+      line =  Proc.new do |h|
+        x1, y1, x2, y2 = h[:x1], h[:y1], h[:x2], h[:y2]
+        #x2, y2 = (h[:width] - x1), (h[:height] - y1)
+        stroke = h[:stroke]
+        stroke_width = stroke[:width]
+        colour = stroke[:colour]
+
+        Proc.new do |canvas|
+          puts "*** drawing a line"
+          canvas.line(x1, y1, x2, y2).styles(:stroke=> "#{colour}" , :stroke_width => stroke_width)
+        end
+        
+      end
+
+      rectangle = Proc.new do |h|
+        x, y = h[:x], h[:y]
+        width, height = h[:width], h[:height]
+        
+        style = h[:style]
+        fill = style[:fill]        
+        stroke = style[:stroke]
+        stroke_width = style['stroke-width']
+
+        Proc.new do |canvas|
+          puts "*** drawing a rectangle x: %s y: %s" % [x, y]
+          canvas.rect(width, height, x, y).styles(:fill => fill, :stroke => stroke, :stroke_width => stroke_width)
+        end
+      end
+
+
+      text = lambda do |h|
+
+        x, y = h[:x], h[:y]
+        font_size = (h[:font][:size] * 16) # ???
+        fill = h[:style][:fill]
+        text2 = h[:text]
+        text_align = h[:style][:text_align]
+
+        #jr031209 stroke = h[:stroke]
+        #jr031209 r,g,b = stroke[:rgb]
+        return Proc.new {} if text2.length < 1
+
+        Proc.new do |canvas|
+          puts "*** drawing text x: %s y: %s" % [x, y]
+          canvas.text(x, y, text2).styles(:text_anchor => text_align, :font_size=> font_size, :font_family=>'helvetica', :fill => fill)
+        end
+
+      end
+
+      @shape[:line] = line
+      @shape[:rectangle] = rectangle
+      @shape[:text] = text
+
+    end
+  end
+
+end

data/lib/shape_base.rb

@@ -0,0 +1,23 @@
+#!/usr/bin/ruby
+
+# file: shape_base.rb
+
+class ShapeBase
+
+  def initialize(scale=1)
+    @shape = {}
+    load_shapes()
+  end
+
+  def draw(name, properties)
+    @shape[name].call(properties)
+  end
+
+  private
+
+  def load_shapes()
+
+  end
+
+end
+

data/lib/svg_browser.rb

@@ -0,0 +1,36 @@
+require 'render_svg3'
+require 'rcscript'
+
+class Browser
+
+  attr_accessor :doc
+
+  def initialize(o={})
+    
+    h = {scale:0.5, x_offset:0, y_offset:0}.merge o
+    svg_environ = ElementSvg.new
+    yield(svg_environ)
+    
+    svg_environ.scale = h[:scale]
+    svg_environ.x_offset = h[:x_offset] 
+    svg_environ.y_offset = h[:y_offset]
+
+    @svg_engine, @script = RenderSvg.new(), RScriptBase.new()
+    
+  end
+
+  def load_page(url)
+    #url = 'http://rorbuilder.info/r/heroku/image/' + svg_file_name
+    buffer = open(url, 'UserAgent' => 'Sinatra-Rscript').read
+    #puts 'buffer : ' + buffer
+    doc = Document.new(buffer)
+    yield(doc) if block_given?
+    #puts '@doc : ' + @doc.to_s
+    script = @script.run(doc)
+    #eval(script) # de-activated for now
+    @svg_engine.render doc
+    @svg_engine.svg_procs
+  end
+
+end
+

data/lib/svg_to_canvas_browser.rb

@@ -0,0 +1,17 @@
+require 'svg_browser'
+require 'canvas_shape'
+
+class CanvasBrowser < Browser
+
+  def initialize(o={})
+    super(o) {|env| env.load_renderer CanvasShape::Shape.new}
+  end
+
+  def load_page(svg_file_name)
+    super(svg_file_name) do |doc|
+      yield(doc)
+    end
+  end
+
+end
+

data/lib/template_builder.rb

@@ -0,0 +1,10 @@
+def build_templates(t)
+  a = []
+  t.gsub!(/\#\{/,'\#\\{')
+  t.scan(/@@ (\w+)/){ a << [$1,$']}        
+  code = a.map {|x| i = x[1] =~ /@@/; r = i.nil? ? x[1] : x[1][0,i] ; [x[0], r] }
+  template_code = code.map {|f,c| "@@templates[:%s] = \"%s\"" % [f, c.gsub(/"/,'\\"')]}
+  instance_eval(template_code.join("\n"))
+  instance_eval("template :layout do \"%s\" end" % @@templates[:layout].strip) if @@templates.has_key? :layout
+end
+

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: svg-render
 version: !ruby/object:Gem::Version 
-  version: 0.1.0
+  version: 0.1.1
 platform: ruby
 authors: []
 
@@ -22,7 +22,16 @@ extensions: []
 extra_rdoc_files: []
 
 files: 
+- lib/elements.rb
+- lib/shape_base.rb
+- lib/rvg_shape.rb
+- lib/template_builder.rb
+- lib/canvas_shape.rb
+- lib/canvas_enclosure.rb
 - lib/svg-render.rb
+- lib/svg_browser.rb
+- lib/render_svg3.rb
+- lib/svg_to_canvas_browser.rb
 has_rdoc: true
 homepage: 
 licenses: []