most 0.7.3

data/lib/most/environment.rb

@@ -0,0 +1,67 @@
+#    Most - Modular Open Software Tester.
+#    Copyright (C) 2009  Dmitrii Toksaitov
+#
+#    This file is part of Most.
+#
+#    Most is free software: you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation, either version 3 of the License, or
+#    (at your option) any later version.
+#
+#    Most is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with Most. If not, see <http://www.gnu.org/licenses/>.
+
+require 'singleton'
+
+module Most
+
+  class Environment
+    include Singleton
+
+    attr_reader :arguments
+
+    attr_reader :logger
+    attr_reader :options, :modes, :tasks
+
+    def initialize()
+      @arguments = ARGV
+
+      @logger  = SERVICES[:logger]
+
+      @options = PARAMETERS[:options]
+      @modes   = PARAMETERS[:modes]
+      @tasks   = PARAMETERS[:tasks]
+    end
+
+    def log_error(exception, message)
+      @logger.error(message)
+      @logger.error(exception.message)
+
+      unless @modes.nil?
+        @logger.error(exception.backtrace) if @modes[:verbose] or
+                                              @modes[:debug]
+      end
+
+      GLOBALS[:exit_code] = 1
+    end
+
+    def log_warning(text)
+      @logger.warn(text)
+    end
+
+    def log_message(text)
+      @logger.info(text)
+    end
+
+    def show_message(message, is_log_data = false)
+      puts "#{message}"
+      log_message(message) if is_log_data
+    end
+  end
+
+end

data/lib/most/executor.rb

@@ -0,0 +1,80 @@
+#    Most - Modular Open Software Tester.
+#    Copyright (C) 2009  Dmitrii Toksaitov
+#
+#    This file is part of Most.
+#
+#    Most is free software: you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation, either version 3 of the License, or
+#    (at your option) any later version.
+#
+#    Most is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with Most. If not, see <http://www.gnu.org/licenses/>.
+
+module Most
+
+  class Executor
+    def initialize()
+      @environment = SERVICES[:environment]
+      @options = @environment.options
+      @tasks   = @environment.tasks
+    end
+
+    def run()
+      if @tasks[:show_version]
+        output_version()
+      elsif @tasks[:show_help]
+        output_help()
+      else
+        begin
+          output_result(SERVICES[:core].run())
+        rescue Exception => e
+          @environment.log_error(e, 'Core failure')
+        end
+      end
+    end
+
+    private
+    def output_result(result)
+      file = @options[:output_file]
+
+      unless file.nil?
+        begin
+          File.open(File.expand_path(file), 'w+') do |io|
+            io.write(result)
+          end
+        rescue Exception => e
+          @environment.log_error(e, 'Failed to output the report')
+          puts(result)
+        end
+      else
+        puts(result)
+      end
+    end
+
+    def output_help()
+      output_version()
+      output_options()
+    end
+
+    def output_version()
+      @environment.show_message("#{FULL_NAME} version #{VERSION}")
+      @environment.show_message("#{COPYRIGHT}")
+    end
+
+    def output_options()
+      @environment.show_message("Available options: \n\n")
+      @environment.show_message("Usage: #{UNIX_NAME} {[option] [parameter]}")
+
+      SERVICES[:starter].usage.each do |name, options|
+        @environment.show_message("\n\t#{options[2]}\n\t\t#{options[0]}, #{options[1]}")
+      end
+    end
+  end
+
+end

data/lib/most/helpers/array.rb

@@ -0,0 +1,31 @@
+#    Most - Modular Open Software Tester.
+#    Copyright (C) 2009  Dmitrii Toksaitov
+#
+#    This file is part of Most.
+#
+#    Most is free software: you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation, either version 3 of the License, or
+#    (at your option) any later version.
+#
+#    Most is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with Most. If not, see <http://www.gnu.org/licenses/>.
+
+class Array
+  def /(value)
+    result = nil
+
+    if value.is_a?(Symbol)
+      result = self + [value]
+    elsif value.is_a?(Array)
+      result = self + value
+    end
+
+    result
+  end
+end

data/lib/most/helpers/hash.rb

@@ -0,0 +1,25 @@
+#    Most - Modular Open Software Tester.
+#    Copyright (C) 2009  Dmitrii Toksaitov
+#
+#    This file is part of Most.
+#
+#    Most is free software: you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation, either version 3 of the License, or
+#    (at your option) any later version.
+#
+#    Most is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with Most. If not, see <http://www.gnu.org/licenses/>.
+
+require 'most/structures/types/options'
+
+class Hash
+  def to_options()
+    Most::Options.new(self)
+  end
+end

data/lib/most/helpers/kernel.rb

@@ -0,0 +1,35 @@
+#    Most - Modular Open Software Tester.
+#    Copyright (C) 2009  Dmitrii Toksaitov
+#
+#    This file is part of Most.
+#
+#    Most is free software: you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation, either version 3 of the License, or
+#    (at your option) any later version.
+#
+#    Most is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with Most. If not, see <http://www.gnu.org/licenses/>.
+
+require 'stringio'
+
+module Kernel
+  def fake_std()
+    result = [StringIO.new(), StringIO.new()]
+
+    $stdout = result.first()
+    $stderr = result.last()
+
+    yield if block_given?
+
+    return result
+  ensure
+    $stdout = STDOUT
+    $stderr = STDERR
+  end
+end

data/lib/most/helpers/memory_out.rb

@@ -0,0 +1,93 @@
+module Most
+  module MemoryOut
+    class Error < Interrupt; end
+    class ExitException < Exception; end
+
+    THIS_FILE = /\A#{Regexp.quote(__FILE__)}:/o
+    CALLER_OFFSET = ((c = caller[0]) && THIS_FILE =~ c) ? 1 : 0
+
+    def generic_memory_out(bytes, pid = nil, precision = 0.1, klass = nil, checking_proc = method(:memory), &block)
+      return yield if bytes.nil? and block_given?
+
+      current_thread = nil
+      checker_thread = nil
+
+      exception = klass || Class.new(ExitException)
+
+      begin
+        current_thread = Thread.current
+        checker_thread = Thread.start do
+          loop do
+            memory_report = checking_proc.call(pid)
+
+            GLOBALS[:memory] ||= []
+            GLOBALS[:memory] << memory_report
+
+            if memory_report > bytes
+              current_thread.raise(exception)
+            end
+
+            sleep(precision)
+          end
+        end
+
+        yield bytes if block_given?
+
+      rescue exception => e
+        rej = /\A#{Regexp.quote(__FILE__)}:#{__LINE__-4}\z/o
+        (bt = e.backtrace).reject! {|m| rej =~ m}
+        level = -caller(CALLER_OFFSET).size
+
+        while THIS_FILE =~ bt[level]
+          bt.delete_at(level)
+          level += 1
+        end
+
+        raise unless klass.nil?
+
+        raise(Error, e.message, e.backtrace)
+      ensure
+        checker_thread.kill() if not checker_thread.nil? and checker_thread.alive?
+      end
+    end
+
+    def memory_out(bytes, pid = nil, precision = 0.1, klass = nil, &block)
+      generic_memory_out(bytes, pid, precision, klass, method(:memory), &block)
+    end
+
+    def virtual_memory_out(bytes, pid = nil, precision = 0.1, klass = nil, &block)
+      generic_memory_out(bytes, pid, precision, klass, method(:virtual_memory), &block)
+    end
+
+    def total_memory_out(bytes, pid = nil, precision = 0.1, klass = nil, &block)
+      generic_memory_out(bytes, pid, precision, klass, method(:total_memory), &block)
+    end
+
+    def memory(pid = Process.pid)
+      result = 0
+
+      pid ||= GLOBALS[:pid]
+      result = SERVICES[:process_table].memory(pid) unless pid.nil?
+
+      result
+    end
+
+    def virtual_memory(pid = Process.pid)
+      result = 0
+
+      pid ||= GLOBALS[:pid]
+      result = SERVICES[:process_table].virtual_memory(pid) unless pid.nil?
+
+      result
+    end
+
+    def total_memory(pid = Process.pid)
+      memory(pid) + virtual_memory(pid)
+    end
+
+    module_function :generic_memory_out
+
+    module_function :memory_out, :virtual_memory_out, :total_memory_out
+    module_function :memory, :virtual_memory, :total_memory
+  end
+end

data/lib/most/helpers/numeric.rb

@@ -0,0 +1,59 @@
+#    Most - Modular Open Software Tester.
+#    Copyright (C) 2009  Dmitrii Toksaitov
+#
+#    This file is part of Most.
+#
+#    Most is free software: you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation, either version 3 of the License, or
+#    (at your option) any later version.
+#
+#    Most is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with Most. If not, see <http://www.gnu.org/licenses/>.
+
+class Numeric
+  def milliseconds()
+    self / 100.0
+  end
+
+  def seconds()
+    self
+  end
+
+  def minutes()
+    self * 60
+  end
+
+  def hours()
+    self * 3600
+  end
+
+  def bits()
+    self * 8
+  end
+
+  def bytes()
+    self
+  end
+
+  def kilobytes()
+    self * 1024
+  end
+
+  def megabytes()
+    self * 1048576
+  end
+
+  def gigabytes()
+    self * 1073741824
+  end
+
+  def petabytes()
+    self * 1099511627776
+  end
+end

data/lib/most/helpers/object.rb

@@ -0,0 +1,65 @@
+#    Most - Modular Open Software Tester.
+#    Copyright (C) 2009  Dmitrii Toksaitov
+#
+#    This file is part of Most.
+#
+#    Most is free software: you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation, either version 3 of the License, or
+#    (at your option) any later version.
+#
+#    Most is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with Most. If not, see <http://www.gnu.org/licenses/>.
+
+class Object
+  def valid?(item, *args, &block)
+    result = item.nil? ? false : true
+
+    if result
+      args.each do |objects|
+        unless objects
+          result = false; break;
+        end
+      end
+
+      yield block if block_given?
+    end
+
+    result
+  end
+
+  def first_valid(item, *items)
+    result = item
+
+    if result.nil?
+      items.each do |object|
+        unless object.nil?
+          result = object; break
+        end
+      end
+    end
+
+    result
+  end
+
+  def try(method_name, *args, &block)
+    send(method_name, *args, &block) if respond_to?(method_name, true)
+  end
+
+  unless method_defined? :intern
+    define_method(:intern) do
+      result = self
+
+      unless is_a?(Symbol)
+        result.to_s().intern()
+      end
+
+      result
+    end
+  end
+end