technical_graph 0.0.0

data/.document

@@ -0,0 +1,5 @@
+lib/**/*.rb
+bin/*
+- 
+features/**/*.feature
+LICENSE.txt

data/.idea/dictionaries/olek.xml

@@ -0,0 +1,8 @@
+<component name="ProjectDictionaryState">
+  <dictionary name="olek">
+    <words>
+      <w>antialias</w>
+      <w>magick</w>
+    </words>
+  </dictionary>
+</component>

data/.rvmrc

@@ -0,0 +1 @@
+rvm use 1.8.7@technical_graph --create

data/Gemfile

@@ -0,0 +1,14 @@
+source "http://rubygems.org"
+
+gem 'rmagick'
+gem 'jeweler'
+
+# Add dependencies to develop your gem here.
+# Include everything needed to run rake, tests, features, etc.
+group :development do
+  gem "shoulda"
+  gem "bundler", "~> 1.0.0"
+  gem "rspec"
+  gem "jeweler" #, "~> 1.6.4"
+  gem "rcov", ">= 0"
+end

data/Gemfile.lock

@@ -0,0 +1,32 @@
+GEM
+  remote: http://rubygems.org/
+  specs:
+    diff-lcs (1.1.3)
+    git (1.2.5)
+    jeweler (1.6.4)
+      bundler (~> 1.0)
+      git (>= 1.2.5)
+      rake
+    rake (0.9.2)
+    rcov (0.9.10)
+    rmagick (2.13.1)
+    rspec (2.6.0)
+      rspec-core (~> 2.6.0)
+      rspec-expectations (~> 2.6.0)
+      rspec-mocks (~> 2.6.0)
+    rspec-core (2.6.4)
+    rspec-expectations (2.6.0)
+      diff-lcs (~> 1.1.2)
+    rspec-mocks (2.6.0)
+    shoulda (2.11.3)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  bundler (~> 1.0.0)
+  jeweler
+  rcov
+  rmagick
+  rspec
+  shoulda

data/LICENSE.txt

@@ -0,0 +1,20 @@
+Copyright (c) 2011 Aleksander Kwiatkowski
+
+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.rdoc

@@ -0,0 +1,19 @@
+= technical-graph
+
+Create neat graphs.
+
+== Contributing to technical-graph
+ 
+* Check out the latest master to make sure the feature hasn't been implemented or the bug hasn't been fixed yet
+* Check out the issue tracker to make sure someone already hasn't requested it and/or contributed it
+* Fork the project
+* Start a feature/bugfix branch
+* Commit and push until you are happy with your contribution
+* Make sure to add tests for it. This is important so I don't break it in a future version unintentionally.
+* Please try not to mess with the Rakefile, version, or history. If you want to have your own version, or is otherwise necessary, that is fine, but please isolate to its own commit so I can cherry-pick around it.
+
+== Copyright
+
+Copyright (c) 2011 Aleksander Kwiatkowski. See LICENSE.txt for
+further details.
+

data/Rakefile

@@ -0,0 +1,55 @@
+# encoding: utf-8
+
+require 'rubygems'
+require 'bundler'
+begin
+  Bundler.setup(:default, :development)
+rescue Bundler::BundlerError => e
+  $stderr.puts e.message
+  $stderr.puts "Run `bundle install` to install missing gems"
+  exit e.status_code
+end
+require 'rake'
+
+require 'jeweler'
+Jeweler::Tasks.new do |gem|
+  # gem is a Gem::Specification... see http://docs.rubygems.org/read/chapter/20 for more options
+  gem.name = "technical_graph"
+  gem.homepage = "http://github.com/akwiatkowski/technical_graph"
+  gem.license = "LGPLv3"
+  gem.summary = %Q{Create simple and neat graphs}
+  gem.description = %Q{Create simple and neat graphs}
+  gem.email = "bobikx@poczta.fm"
+  gem.authors = ["Aleksander Kwiatkowski"]
+
+  #gem.files =  FileList["[A-Z]*", "{bin,generators,lib,test}/**/*", 'lib/jeweler/templates/.gitignore']
+  # dependencies defined in Gemfile
+end
+Jeweler::RubygemsDotOrgTasks.new
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/test_*.rb'
+  test.verbose = true
+end
+
+require 'rcov/rcovtask'
+Rcov::RcovTask.new do |test|
+  test.libs << 'test'
+  test.pattern = 'test/**/test_*.rb'
+  test.verbose = true
+  test.rcov_opts << '--exclude "gems/*"'
+end
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  version = File.exist?('VERSION') ? File.read('VERSION') : ""
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "technical-graph #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/VERSION

@@ -0,0 +1 @@
+0.0.0

data/lib/technical_graph/data_layer.rb

@@ -0,0 +1,87 @@
+#encoding: utf-8
+
+# Stores only data used for one layer
+# Instances of this class are used elsewhere
+# Stores also drawing parameters for one layer
+
+class DataLayer
+
+  def initialize(d = [], options = { })
+    @options = options
+    @data_params = Hash.new
+
+    # set data and append initial data
+    clear_data
+    append_data(d)
+  end
+
+  # Accessor for setting chart data for layer to draw
+  def append_data(d)
+    if d.kind_of? Array
+      @data += d
+      # sort, clean bad records
+      process_data
+    else
+      raise 'Data not an Array'
+    end
+  end
+
+  # Array of {:x =>, :y =>}
+  attr_reader :data
+
+  # Additional parameters
+  attr_reader :data_params
+
+  # Color of
+  def color
+    return @data_params[:color] || 'blue'
+  end
+
+  def antialias
+    return @data_params[:antialias] == false
+  end
+
+  # Clear data
+  def clear_data
+    @data = Array.new
+  end
+
+  # Clean and process data used for drawing current data layer
+  def process_data
+    # delete duplicates
+    @data = @data.inject([]) { |result, d| result << d unless result.select { |r| r[:x] == d[:x] }.size > 0; result }
+
+    @data.delete_if { |d| d[:x].nil? or d[:y].nil? }
+    @data.sort! { |d, e| d[:x] <=> e[:x] }
+
+    @data_params = Hash.new
+    # default X values, if data is not empty
+    if @data.size > 0
+      @data_params[:x_min] = @data.first[:x] || @options[:default_x_min]
+      @data_params[:x_max] = @data.last[:x] || @options[:default_x_max]
+
+      # default Y values
+      y_sort = @data.sort { |a, b| a[:y] <=> b[:y] }
+      @data_params[:y_min] = y_sort.first[:y] || @options[:default_y_min]
+      @data_params[:y_max] = y_sort.last[:y] || @options[:@default_y_max]
+    end
+
+  end
+
+  def x_min
+    @data_params[:x_min]
+  end
+
+  def x_max
+    @data_params[:x_max]
+  end
+
+  def y_min
+    @data_params[:y_min]
+  end
+
+  def y_max
+    @data_params[:y_max]
+  end
+
+end

data/lib/technical_graph/graph_axis.rb

@@ -0,0 +1,248 @@
+#encoding: utf-8
+
+# Calculate axis (only) and draw them
+
+class GraphAxis
+
+  attr_reader :technical_graph
+
+  # Accessor for options Hash
+  def options
+    @technical_graph.options
+  end
+
+  # Accessor for DataLayer Array
+  def layers
+    @technical_graph.layers
+  end
+
+  # Calculate everything
+  def data_processor
+    @technical_graph.data_processor
+  end
+
+  def image_drawer
+    @technical_graph.image_drawer
+  end
+
+  def initialize(technical_graph)
+    @technical_graph = technical_graph
+  end
+
+  def x_axis_fixed?
+    options[:x_axises_fixed_interval] == true
+  end
+
+  # Value axis has fixed count
+  def y_axis_fixed?
+    options[:y_axises_fixed_interval] == true
+  end
+
+  # Where to put axis values
+  def value_axises
+    return calc_axis(data_processor.y_min, data_processor.y_max, options[:y_axises_interval], options[:y_axises_count], y_axis_fixed?)
+  end
+
+  # Where to put axis values
+  def parameter_axises
+    return calc_axis(data_processor.x_min, data_processor.x_max, options[:x_axises_interval], options[:x_axises_count], x_axis_fixed?)
+  end
+
+  # Calculate axis using 2 methods
+  def calc_axis(from, to, interval, count, fixed_interval)
+    axises = Array.new
+    l = to - from
+    current = from
+
+    if fixed_interval
+      while current < to
+        axises << current
+        current += interval
+      end
+      return axises
+
+    else
+      (0...count).each do |i|
+        axises << from + (l.to_f * i.to_f) / count.to_f
+      end
+      return axises
+
+    end
+  end
+
+
+  # Render axis on image
+  def render_on_image(image)
+    @image = image
+
+    render_values_axis
+    render_parameters_axis
+
+    render_values_zero_axis
+    render_parameters_zero_axis
+  end
+
+  def axis_antialias
+    options[:axis_antialias] == true
+  end
+
+
+  def render_values_axis
+    plot_axis_y_line = Magick::Draw.new
+    plot_axis_y_text = Magick::Draw.new
+
+    plot_axis_y_line.stroke_antialias(axis_antialias)
+    plot_axis_y_text.text_antialias(image_drawer.font_antialias)
+
+    plot_axis_y_line.fill_opacity(0)
+    plot_axis_y_line.stroke(options[:axis_color])
+    plot_axis_y_line.stroke_opacity(1.0)
+    plot_axis_y_line.stroke_width(1.0)
+    plot_axis_y_line.stroke_linecap('square')
+    plot_axis_y_line.stroke_linejoin('miter')
+
+    plot_axis_y_text.font_family('helvetica')
+    plot_axis_y_text.font_style(Magick::NormalStyle)
+    plot_axis_y_text.text_align(Magick::LeftAlign)
+    plot_axis_y_text.text_undercolor(options[:background_color])
+
+    value_axises.each do |y|
+      by = image_drawer.calc_bitmap_y(y)
+      plot_axis_y_line.line(
+        0, by.round,
+        @image.columns-1, by.round
+      )
+
+      plot_axis_y_text.text(
+        5,
+        by.round + 15,
+        "#{y}"
+      )
+    end
+
+    t = Time.now
+    plot_axis_y_line.draw(@image)
+    puts "#{Time.now - t} drawing lines"
+    plot_axis_y_text.draw(@image)
+    puts "#{Time.now - t} drawing text"
+  end
+
+  def render_parameters_axis
+
+    plot_axis_x_line = Magick::Draw.new
+    plot_axis_x_text = Magick::Draw.new
+
+    plot_axis_x_line.stroke_antialias(axis_antialias)
+    plot_axis_x_text.text_antialias(axis_antialias)
+
+    plot_axis_x_line.fill_opacity(0)
+    plot_axis_x_line.stroke(options[:axis_color])
+    plot_axis_x_line.stroke_opacity(1.0)
+    plot_axis_x_line.stroke_width(1.0)
+    plot_axis_x_line.stroke_linecap('square')
+    plot_axis_x_line.stroke_linejoin('miter')
+
+    plot_axis_x_text.font_family('helvetica')
+    plot_axis_x_text.font_style(Magick::NormalStyle)
+    plot_axis_x_text.text_align(Magick::LeftAlign)
+    plot_axis_x_text.text_undercolor(options[:background_color])
+
+    parameter_axises.each do |x|
+      bx = image_drawer.calc_bitmap_x(x)
+      plot_axis_x_line.line(
+        bx.round, 0,
+        bx.round, @image.rows-1
+      )
+
+      plot_axis_x_text.text(
+        bx.round + 15,
+        @image.rows - 15,
+        "#{x}"
+      )
+    end
+
+    t = Time.now
+    plot_axis_x_line.draw(@image)
+    puts "#{Time.now - t} drawing lines"
+    plot_axis_x_text.draw(@image)
+    puts "#{Time.now - t} drawing text"
+
+  end
+
+  # TODO: make it DRY
+  def render_values_zero_axis
+    plot_axis_y_line = Magick::Draw.new
+    plot_axis_y_text = Magick::Draw.new
+
+    plot_axis_y_line.stroke_antialias(axis_antialias)
+    plot_axis_y_text.text_antialias(image_drawer.font_antialias)
+
+    plot_axis_y_line.fill_opacity(0)
+    plot_axis_y_line.stroke(options[:axis_color])
+    plot_axis_y_line.stroke_opacity(1.0)
+    plot_axis_y_line.stroke_width(2.0)
+    plot_axis_y_line.stroke_linecap('square')
+    plot_axis_y_line.stroke_linejoin('miter')
+
+    plot_axis_y_text.font_family('helvetica')
+    plot_axis_y_text.font_style(Magick::NormalStyle)
+    plot_axis_y_text.text_align(Magick::LeftAlign)
+    plot_axis_y_text.text_undercolor(options[:background_color])
+
+    y = 0.0
+    by = image_drawer.calc_bitmap_y(y)
+    plot_axis_y_line.line(
+      0, by.round,
+      @image.columns-1, by.round
+    )
+
+    plot_axis_y_text.text(
+      5,
+      by.round + 15,
+      "#{y}"
+    )
+
+    # TODO: why normal axis does not need it?
+    plot_axis_y_line.draw(@image)
+    plot_axis_y_text.draw(@image)
+  end
+
+  def render_parameters_zero_axis
+
+    plot_axis_x_line = Magick::Draw.new
+    plot_axis_x_text = Magick::Draw.new
+
+    plot_axis_x_line.stroke_antialias(axis_antialias)
+    plot_axis_x_text.text_antialias(axis_antialias)
+
+    plot_axis_x_line.fill_opacity(0)
+    plot_axis_x_line.stroke(options[:axis_color])
+    plot_axis_x_line.stroke_opacity(1.0)
+    plot_axis_x_line.stroke_width(2.0)
+    plot_axis_x_line.stroke_linecap('square')
+    plot_axis_x_line.stroke_linejoin('miter')
+
+    plot_axis_x_text.font_family('helvetica')
+    plot_axis_x_text.font_style(Magick::NormalStyle)
+    plot_axis_x_text.text_align(Magick::LeftAlign)
+    plot_axis_x_text.text_undercolor(options[:background_color])
+
+    x = 0.0
+    bx = image_drawer.calc_bitmap_x(x)
+    plot_axis_x_line.line(
+      bx.round, 0,
+      bx.round, @image.rows-1
+    )
+
+    plot_axis_x_text.text(
+      bx.round + 15,
+      @image.rows - 15,
+      "#{x}"
+    )
+
+    # TODO: why normal axis does not need it?
+    plot_axis_x_line.draw(@image)
+    plot_axis_x_text.draw(@image)
+  end
+
+end

data/lib/technical_graph/graph_data_processor.rb

@@ -0,0 +1,175 @@
+#encoding: utf-8
+
+require 'technical_graph/data_layer'
+
+# Calculate every aspect of graph, but not directly image oriented variables
+
+class GraphDataProcessor
+  attr_reader :technical_graph
+
+  # Accessor for options Hash
+  def options
+    @technical_graph.options
+  end
+
+  # Accessor for DataLayer Array
+  def layers
+    @technical_graph.layers
+  end
+
+  def initialize(technical_graph)
+    @technical_graph = technical_graph
+
+    options[:x_min] ||= (Time.now - 24 * 3600).to_f
+    options[:x_max] ||= Time.now.to_f
+    options[:y_min] ||= 0.0
+    options[:y_max] ||= 1.0
+    # :default - coords are default
+    # :fixed or whatever else - min/max coords are fixed
+    options[:xy_behaviour] ||= :default
+
+    # number of axises
+    options[:y_axises_count] ||= 10
+    options[:x_axises_count] ||= 10
+    # interval
+    options[:y_axises_interval] ||= 1.0
+    options[:x_axises_interval] ||= 1.0
+    # when false then axises are generated to meet 'count'
+    # when true then axises are generated every X from lowest
+    options[:x_axises_fixed_interval] = true if options[:x_axises_fixed_interval].nil?
+    options[:y_axises_fixed_interval] = true if options[:y_axises_fixed_interval].nil?
+
+    # default truncate string used for rendering numbers
+    options[:truncate_string] ||= "%.2f"
+
+    @zoom_x = 1.0
+    @zoom_y = 1.0
+  end
+
+  # Ranges are fixed
+  def fixed?
+    options[:xy_behaviour] == :fixed
+  end
+
+  # Ranges without zoom
+  def raw_x_min
+    options[:x_min]
+  end
+
+  def raw_x_max
+    options[:x_max]
+  end
+
+  def raw_y_min
+    options[:y_min]
+  end
+
+  def raw_y_max
+    options[:y_max]
+  end
+
+  # Ranges with zoom
+  def x_min
+    calc_x_zoomed([self.raw_x_min]).first
+  end
+
+  def x_max
+    calc_x_zoomed([self.raw_x_max]).first
+  end
+
+  def y_min
+    calc_y_zoomed([self.raw_y_min]).first
+  end
+
+  def y_max
+    calc_y_zoomed([self.raw_y_max]).first
+  end
+
+  # Accessors
+  private
+  def raw_x_min=(x)
+    options[:x_min] = x
+  end
+
+  def raw_x_max=(x)
+    options[:x_max] = x
+  end
+
+  def raw_y_min=(y)
+    options[:y_min] = y
+  end
+
+  def raw_y_max=(y)
+    options[:y_max] = y
+  end
+
+  public
+
+  # Consider changing ranges if needed
+  def process_data_layer(data_layer)
+    # ranges are set, can't change
+    return if fixed?
+
+    # updating ranges
+    self.raw_y_max = data_layer.y_max if not data_layer.y_max.nil? and data_layer.y_max > self.raw_y_max
+    self.raw_x_max = data_layer.x_max if not data_layer.x_max.nil? and data_layer.x_max > self.raw_x_max
+
+    self.raw_y_min = data_layer.y_min if not data_layer.y_min.nil? and data_layer.y_min < self.raw_y_min
+    self.raw_x_min = data_layer.x_min if not data_layer.x_min.nil? and data_layer.x_min < self.raw_x_min
+  end
+
+  # Change overall image zoom
+  def zoom=(z = 1.0)
+    self.x_zoom = z
+    self.y_zoom = z
+  end
+
+  # Change X axis zoom
+  def x_zoom=(z = 1.0)
+    @zoom_x = z
+  end
+
+  # Change X axis zoom
+  def y_zoom=(z = 1.0)
+    @zoom_y = z
+  end
+
+  attr_reader :zoom_x, :zoom_y
+
+  # Calculate zoomed X position for Array of X'es
+  def calc_x_zoomed(old_xes)
+    # default zoom
+    if self.zoom_x == 1.0
+      return old_xes
+    end
+
+    a = (raw_x_max.to_f + raw_x_min.to_f) / 2.0
+    new_xes = Array.new
+
+    old_xes.each do |x|
+      d = x - a
+      new_xes << (a + d * self.zoom_x)
+    end
+
+    return new_xes
+  end
+
+  # Calculate zoomed Y position for Array of Y'es
+  def calc_y_zoomed(old_yes)
+    # default zoom
+    if self.zoom_y == 1.0
+      return old_yes
+    end
+
+    a = (raw_y_max.to_f + raw_y_min.to_f) / 2.0
+    new_yes = Array.new
+
+    old_yes.each do |y|
+      d = y - a
+      new_yes << (a + d * self.zoom_y)
+    end
+
+    return new_yes
+  end
+
+end