image_paradise 0.1.12

data/lib/image_paradise/graphs/stacked_bar.rb

@@ -0,0 +1,68 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+require 'image_paradise/graphs/base.rb'
+require 'image_paradise/graphs/stacked_mixin.rb'
+
+module ImageParadise
+
+class Gruff::StackedBar < Gruff::Base
+
+    include StackedMixin
+
+    # Spacing factor applied between bars
+    attr_accessor :bar_spacing
+
+    # Number of pixels between bar segments
+    attr_accessor :segment_spacing
+    
+    # === draw
+    #
+    # Draws a bar graph, but multiple sets are stacked on top of each other.
+    def draw
+      get_maximum_by_stack
+      super
+      return unless @has_data
+      # Setup spacing.
+      #
+      # Columns sit stacked.
+      @bar_spacing ||= 0.9
+      @segment_spacing ||= 1
+      @bar_width = @graph_width / @column_count.to_f
+      padding = (@bar_width * (1 - @bar_spacing)) / 2
+    
+      @d = @d.stroke_opacity 0.0
+      
+      height = Array.new(@column_count, 0)
+    
+      @norm_data.each_with_index do |data_row, row_index|      
+        data_row[DATA_VALUES_INDEX].each_with_index do |data_point, point_index|
+          @d = @d.fill data_row[DATA_COLOR_INDEX]
+          
+          # Calculate center based on bar_width and current row
+          label_center = @graph_left + (@bar_width * point_index) + (@bar_width * @bar_spacing / 2.0)
+          draw_label(label_center, point_index)
+
+          next if (data_point == 0)
+          # Use incremented x and scaled y
+          left_x = @graph_left + (@bar_width * point_index) + padding
+          left_y = @graph_top + (@graph_height -
+                                 data_point * @graph_height - 
+                                 height[point_index]) + @segment_spacing
+          right_x = left_x + @bar_width * @bar_spacing
+          right_y = @graph_top + @graph_height - height[point_index] - @segment_spacing
+          
+          # update the total height of the current stacked bar
+          height[point_index] += (data_point * @graph_height ) 
+          
+          @d = @d.rectangle(left_x, left_y, right_x, right_y)
+          
+        end
+
+      end
+    
+      @d.draw(@base_image)    
+    end
+
+end; end

data/lib/image_paradise/graphs/stacked_mixin.rb

@@ -0,0 +1,30 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+module ImageParadise
+
+module Gruff::Base::StackedMixin
+  # Used by StackedBar and child classes.
+  #
+  # tsal: moved from Base 03 FEB 2007
+  DATA_VALUES_INDEX = Gruff::Base::DATA_VALUES_INDEX
+  # === get_maximum_by_stack
+  def get_maximum_by_stack
+    # Get sum of each stack
+    max_hash = {}
+    @data.each { |data_set|
+      data_set[DATA_VALUES_INDEX].each_with_index do |data_point, i|
+        max_hash[i] = 0.0 unless max_hash[i]
+        max_hash[i] += data_point.to_f
+      end
+    }
+  
+    # @maximum_value = 0
+    max_hash.keys.each { |key|
+      @maximum_value = max_hash[key] if max_hash[key] > @maximum_value
+    }
+    @minimum_value = 0
+  end
+
+end; end

data/lib/image_paradise/graphs/themes.rb

@@ -0,0 +1,117 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+module ImageParadise
+
+module Gruff
+
+module Themes
+
+  # ========================================================================= #
+  # === THIRTYSEVEN_SIGNALS
+  #
+  # A color scheme plucked from the colors on the popular usability blog.
+  # ========================================================================= #
+  THIRTYSEVEN_SIGNALS = {
+    :colors => [
+        '#FFF804',  # yellow
+        '#336699',  # blue
+        '#339933',  # green
+        '#ff0000',  # red
+        '#cc99cc',  # purple
+        '#cf5910',  # orange
+        'black'
+    ],
+    :marker_color => 'black',
+    :font_color => 'black',
+    :background_colors => %w(#d1edf5 white)
+  }
+
+  # ========================================================================= #
+  # === KEYNOTE
+  #
+  # A color scheme similar to the popular presentation software.
+  # ========================================================================= #
+  KEYNOTE = {
+    :colors => [
+      '#FDD84E',  # yellow
+      '#6886B4',  # blue
+      '#72AE6E',  # green
+      '#D1695E',  # red
+      '#8A6EAF',  # purple
+      '#EFAA43',  # orange
+      'white'
+    ],
+    :marker_color => 'white',
+    :font_color => 'white',
+    :background_colors => %w(black #4a465a)
+  }
+
+  # A color scheme from the colors used on the 2005 Rails keynote
+  # presentation at RubyConf.
+  RAILS_KEYNOTE = {
+    :colors => [
+      '#00ff00',  # green
+      '#333333',  # grey
+      '#ff5d00',  # orange
+      '#f61100',  # red
+      'white',
+      '#999999',  # light grey
+      'black'
+    ],
+    :marker_color => 'white',
+    :font_color => 'white',
+    :background_colors => %w(#0083a3 #0083a3)
+  }
+
+  # A color scheme similar to that used on the popular podcast site.
+  ODEO = {
+    :colors => [
+      '#202020',  # grey
+      'white',
+      '#3a5b87',  # dark blue
+      '#a21764',  # dark pink
+      '#8ab438',  # green
+      '#999999',  # light grey
+      'black'
+    ],
+    :marker_color => 'white',
+    :font_color => 'white',
+    :background_colors => %w(#ff47a4 #ff1f81)
+  }
+
+  # A pastel theme
+  PASTEL = {
+    :colors => [
+      '#a9dada', # blue
+      '#aedaa9', # green
+      '#daaea9', # peach
+      '#dadaa9', # yellow
+      '#a9a9da', # dk purple
+      '#daaeda', # purple
+      '#dadada' # grey
+    ],
+    :marker_color => '#aea9a9', # Grey
+    :font_color => 'black',
+    :background_colors => 'white'
+  }
+
+  # === GREYSCALE
+  #
+  # A greyscale theme
+  GREYSCALE = {
+    :colors => [
+      '#282828', #
+      '#383838', #
+      '#686868', #
+      '#989898', #
+      '#c8c8c8', #
+      '#e8e8e8', #
+    ],
+    :marker_color => '#aea9a9', # Grey
+    :font_color => 'black',
+    :background_colors => 'white'
+  }
+
+end; end; end

data/lib/image_paradise/graphviz/README.md

@@ -0,0 +1,2 @@
+This directory may contain code that can be used in conjunction with
+the program called graphviz.

data/lib/image_paradise/graphviz/generate_graphviz_image.rb

@@ -0,0 +1,274 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === ImageParadise::GenerateGraphvizImage
+#
+# This class can generate a graphviz-image.
+#
+# Note that it currently is catered to the Studium project's primary
+# use case, so don't expect it to have too many features.
+#
+# The first argument to this class can be a Hash. If so then this
+# class will batch-process that Hash.
+#
+# The generated String, into the dotfile, should be like this:
+#
+#   "Module M4" -> "Module M10";
+#   "Module M8" -> "Module M10";
+#
+# Usage example:
+#
+#   ImageParadise::GenerateGraphvizImage.new(ARGV)
+#
+# =========================================================================== #
+# require 'image_paradise/graphviz/generate_graphviz_image.rb'
+# ImageParadise::GenerateGraphvizImage.new(ARGV)
+# =========================================================================== #
+require 'image_paradise/base/base.rb'
+
+module ImageParadise
+
+class GenerateGraphvizImage < Base # === ImageParadise::GenerateGraphvizImage
+
+  require 'fileutils'
+
+  # ========================================================================= #
+  # === TRY_TO_REDUCE_THE_FILESIZE_FOR_GENERATED_PNG_FILES
+  # ========================================================================= #
+  TRY_TO_REDUCE_THE_FILESIZE_FOR_GENERATED_PNG_FILES = true
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      commandline_arguments = nil,
+      run_already           = true
+    )
+    reset
+    set_commandline_arguments(
+      commandline_arguments
+    )
+    # ======================================================================= #
+    # === Handle blocks
+    # ======================================================================= #
+    if block_given?
+      yielded = yield
+      case yielded
+      # ===================================================================== #
+      # === :use_bold_font
+      # ===================================================================== #
+      when :use_bold_font
+        use_bold_font
+      # ===================================================================== #
+      # === :use_bold_font_and_german
+      # ===================================================================== #
+      when :use_bold_font_and_german
+        use_bold_font
+        use_german
+      end
+    end
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === reset                                                     (reset tag)
+  # ========================================================================= #
+  def reset
+    super()
+    # ======================================================================= #
+    # === @append_this_string_to_each_node
+    #
+    # This string here will be appended to each node-line.
+    # ======================================================================= #
+    @append_this_string_to_each_node = ''.dup
+    # ======================================================================= #
+    # === @use_this_fontname
+    # ======================================================================= #
+    @use_this_fontname = 'Courier'
+    # ======================================================================= #
+    # === @penwidth
+    # ======================================================================= #
+    @penwidth = 2
+    # ======================================================================= #
+    # === @use_english_or_german_for_this_class
+    # ======================================================================= #
+    @use_english_or_german_for_this_class = :english
+  end
+
+  # ========================================================================= #
+  # === to_german
+  # ========================================================================= #
+  def to_german
+    @use_english_or_german_for_this_class = :german
+  end; alias use_german to_german # === use_german
+
+  # ========================================================================= #
+  # === return_english_or_german_name_for_a_module
+  # ========================================================================= #
+  def return_english_or_german_name_for_a_module
+    case @use_english_or_german_for_this_class
+    when :english
+      'Module'
+    when :german
+      'Modul'
+    end
+  end
+
+  # ========================================================================= #
+  # === use_bold_font
+  #
+  # This will use a hardcoded font by default. The user is expected to
+  # supply another font if he/she seeks to change the font.
+  # ========================================================================= #
+  def use_bold_font(
+      i = 'Cascadia Mono PL Bold'
+    )
+    @use_this_fontname = i
+  end
+
+  # ========================================================================= #
+  # === set_commandline_arguments
+  # ========================================================================= #
+  def set_commandline_arguments(i = '')
+    i = [i].flatten.compact
+    @commandline_arguments = i
+  end
+
+  # ========================================================================= #
+  # === commandline_arguments?
+  # ========================================================================= #
+  def commandline_arguments?
+    @commandline_arguments
+  end
+
+  # ========================================================================= #
+  # === first_argument?
+  # ========================================================================= #
+  def first_argument?
+    @commandline_arguments.first
+  end; alias dataset? first_argument? # === dataset?
+
+  # ========================================================================= #
+  # === check_whether_the_first_argument_is_a_hash
+  # ========================================================================= #
+  def check_whether_the_first_argument_is_a_hash
+    into = 'module_dependencies.dot'
+    _ = ''.dup
+    _ << "#     dot -Tpng #{into} -o outfile.png\n"
+    _ << 'digraph graphname {
+
+node [color=Red,fontname="'+@use_this_fontname+'",shape=box, fontsize=28] // All nodes will this shape and colour
+edge [color=Blue, style=dashed]             // All the lines look like this
+'
+    first_argument = first_argument?
+    if first_argument.is_a? Hash
+      if @penwidth
+        @append_this_string_to_each_node << " [penwidth=#{@penwidth}]"
+      end
+      sorted = first_argument.sort_by {|key, value|
+        key.delete('M').to_i
+      }
+      sorted.each {|module_number, module_dependencies|
+        # Iterate over the module dependencies next.
+        module_dependencies.each {|this_module|
+          this_module.delete!('"')
+          unless this_module.include?('None')
+            source_module = '"'+return_english_or_german_name_for_a_module+' '+module_number+'"'
+            target_module = '"'+return_english_or_german_name_for_a_module+' '+this_module+'"'
+            unless source_module == target_module
+              _ << "#{target_module} -> #{source_module}"
+              unless @append_this_string_to_each_node.empty?
+                _ << @append_this_string_to_each_node
+              end
+              _ << ';'
+              _ << N
+            end
+          end
+        }
+        _ << "\n"
+      }
+      _ << '}'
+      # ===================================================================== #
+      # Remove the old file if it exists.
+      # ===================================================================== #
+      puts "Saving into the file #{into} next."
+      if File.exist? into
+        File.delete(into)
+      end
+      write_what_into(_, into)
+      if File.exist? into
+        run_dot_command_to_create_the_image(into)
+      end
+    end
+  end
+
+  # ========================================================================= #
+  # === run_dot_command_to_create_the_image
+  # ========================================================================= #
+  def run_dot_command_to_create_the_image(i)
+    output_file = 'outfile.png'
+    if File.exist? output_file
+      File.delete(output_file)
+    end
+    cmd_to_run = "dot -Tpng #{i} -o #{output_file}"
+    e
+    e "  #{cmd_to_run}"
+    e
+    result = `#{cmd_to_run} 2>&1`
+    if result.include? 'Error: '
+      # ===================================================================== #
+      # Handle situations such as this one here:
+      #   Error: module_dependencies.dot: syntax error in line 4 near ','
+      # ===================================================================== #
+      e 'Some error happened. The error will be shown next:'
+      e
+      e Colours.crimson("  #{result.strip}")
+      e
+    else
+      # ===================================================================== #
+      # Try to optimize the .png file at hand.
+      # ===================================================================== #
+      if TRY_TO_REDUCE_THE_FILESIZE_FOR_GENERATED_PNG_FILES and
+         output_file.end_with?('.png') and
+         File.exist?(output_file)
+        new_file = 'OUT_'+output_file
+        e
+        e 'Running pngquant next:'
+        e
+        esystem "pngquant #{output_file} --output #{new_file}"
+        e
+        if File.exist?(new_file) and File.exist?(output_file)
+          FileUtils.mv(new_file, output_file)
+        end
+      end
+      # ===================================================================== #
+      # Open the existing file in the browser next, if present.
+      # ===================================================================== #
+      if File.exist?(output_file) and is_on_roebe?
+        require 'roebe/toplevel_methods/open_in_browser.rb'
+        e "Now opening #{sfile(output_file)} in the browser."
+        OpenInBrowser[output_file]
+      end
+    end
+  end
+
+  # ========================================================================= #
+  # === run                                                         (run tag)
+  # ========================================================================= #
+  def run
+    check_whether_the_first_argument_is_a_hash
+  end
+
+  # ========================================================================= #
+  # === ImageParadise::GenerateGraphvizImage[]
+  # ========================================================================= #
+  def self.[](i = '')
+    new(i)
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  ImageParadise::GenerateGraphvizImage.new(ARGV)
+end # generate_graphviz_image