ntl-actor 0.3.1 → 0.4.0.pre1

data/lib/actor/controls/statistics/elapsed_time/maximum.rb

@@ -1,21 +0,0 @@
-module Actor
-  module Controls
-    module Statistics
-      module ElapsedTime
-        module Maximum
-          def self.configure_timer receiver
-            ElapsedTime.configure_timer receiver, elapsed_times
-          end
-
-          def self.elapsed_times
-            [1, 11, 111]
-          end
-
-          def self.value
-            111
-          end
-        end
-      end
-    end
-  end
-end

data/lib/actor/controls/statistics/elapsed_time/minimum.rb

@@ -1,21 +0,0 @@
-module Actor
-  module Controls
-    module Statistics
-      module ElapsedTime
-        module Minimum
-          def self.configure_timer receiver
-            ElapsedTime.configure_timer receiver, elapsed_times
-          end
-
-          def self.elapsed_times
-            [111, 11, 1]
-          end
-
-          def self.value
-            1
-          end
-        end
-      end
-    end
-  end
-end

data/lib/actor/controls/statistics/elapsed_time/standard_deviation.rb

@@ -1,38 +0,0 @@
-# See https://rosettacode.org/wiki/Standard_deviation
-module Actor
-  module Controls
-    module Statistics
-      module ElapsedTime
-        module StandardDeviation
-          def self.configure_timer receiver
-            ElapsedTime.configure_timer receiver, elapsed_times
-          end
-
-          def self.elapsed_times
-            [2, 4, 4, 4, 5, 5, 7, 9]
-          end
-
-          def self.average
-            5
-          end
-
-          def self.maximum
-            7
-          end
-
-          def self.minimum
-            3
-          end
-
-          def self.percent
-            40.0
-          end
-
-          def self.value
-            2
-          end
-        end
-      end
-    end
-  end
-end

data/lib/actor/controls/statistics/elapsed_time.rb

@@ -1,15 +0,0 @@
-module Actor
-  module Controls
-    module Statistics
-      module ElapsedTime
-        def self.configure_timer receiver, elapsed_times
-          timer = Timer.example elapsed_times
-
-          receiver.timer = timer
-
-          elapsed_times.count
-        end
-      end
-    end
-  end
-end

data/lib/actor/controls/statistics/timer.rb

@@ -1,19 +0,0 @@
-module Actor
-  module Controls
-    module Statistics
-      module Timer
-        def self.example elapsed_times=nil
-          elapsed_times ||= [Controls::Time::ElapsedTime.example]
-
-          steps = elapsed_times.flat_map do |elapsed_time|
-            [elapsed_time, 0]
-          end
-
-          timer = ::Actor::Statistics::Timer.new
-          timer.clock = Time::Clock.build steps
-          timer
-        end
-      end
-    end
-  end
-end

data/lib/actor/controls/statistics.rb

@@ -1,21 +0,0 @@
-module Actor
-  module Controls
-    module Statistics
-      def self.example executions=nil
-        executions ||= 1
-
-        statistics = ::Actor::Statistics.new
-
-        executions.times do
-          timer = Controls::Statistics::Timer.example
-          statistics.timer = timer
-
-          statistics.executing_action
-          statistics.action_executed
-        end
-
-        statistics
-      end
-    end
-  end
-end

data/lib/actor/controls/time/clock.rb

@@ -1,31 +0,0 @@
-module Actor
-  module Controls
-    module Time
-      class Clock
-        attr_reader :step_function
-        attr_accessor :time
-
-        def initialize time, step_function
-          @time = time
-          @step_function = step_function
-        end
-
-        def self.build steps
-          time = Time.reference
-
-          step_function = steps.cycle
-
-          new time, step_function
-        end
-
-        def now
-          now = time
-
-          self.time += step_function.next
-
-          now
-        end
-      end
-    end
-  end
-end

data/lib/actor/controls/time.rb

@@ -1,24 +0,0 @@
-module Actor
-  module Controls
-    module Time
-      def self.example offset=nil
-        offset ||= 0
-        offset = ElapsedTime.example offset
-
-        reference + offset
-      end
-
-      def self.reference
-        ::Time.new 2000, 1, 1, 11, 11, 11, -3600
-      end
-
-      module ElapsedTime
-        def self.example scalar=nil
-          scalar ||= 1
-
-          Rational(scalar, 1000)
-        end
-      end
-    end
-  end
-end

data/lib/actor/message.rb

@@ -1,23 +0,0 @@
-module Actor
-  module Message
-    Pause = Class.new { include Message }
-    Resume = Class.new { include Message }
-    Stop = Class.new { include Message }
-
-    class RecordStatus
-      include Message
-
-      attr_reader :reply_address
-      attr_reader :status
-
-      def initialize reply_address
-        @reply_address = reply_address
-        @status = Status.new
-      end
-    end
-
-    class Status < OpenStruct
-      include Message
-    end
-  end
-end

data/lib/actor/messaging/address.rb

@@ -1,40 +0,0 @@
-module Actor
-  module Messaging
-    class Address
-      attr_reader :id
-      attr_reader :queue
-
-      def initialize id, queue
-        @id = id
-        @queue = queue
-      end
-
-      def self.build
-        id = SecureRandom.uuid
-        queue = Queue.new
-
-        new id, queue
-      end
-
-      def reader_count
-        queue.reader_count
-      end
-
-      def inspect
-        %{#<#{self.class.name} id=#{id.inspect}, queue=#{queue_tail}..#{queue_head}, readers=#{reader_count}>}
-      end
-
-      def queue_head
-        queue.head
-      end
-
-      def queue_tail
-        queue.tail
-      end
-
-      def queue_size
-        queue.size
-      end
-    end
-  end
-end

data/lib/actor/messaging/reader/substitute.rb

@@ -1,40 +0,0 @@
-module Actor
-  module Messaging
-    class Reader
-      class Substitute
-        attr_accessor :stopped
-
-        def call wait: nil
-          message = messages.shift
-
-          return message if message
-
-          if wait
-            raise Wait, "Next message has not yet been written"
-          end
-        end
-
-        def stop
-          self.stopped = true
-        end
-
-        def stopped?
-          stopped
-        end
-
-        def add_message message
-          messages << message
-        end
-
-        def messages
-          @messages ||= []
-        end
-
-        Wait = Class.new StandardError
-
-        # Eventide compatibility
-        singleton_class.send :alias_method, :build, :new
-      end
-    end
-  end
-end

data/lib/actor/messaging/reader.rb

@@ -1,31 +0,0 @@
-module Actor
-  module Messaging
-    class Reader
-      attr_reader :queue_reader
-
-      def initialize queue_reader
-        @queue_reader = queue_reader
-      end
-
-      def self.build address
-        queue = address.queue
-
-        queue_reader = Queue::Reader.build queue
-
-        new queue_reader
-      end
-
-      def call wait: nil
-        queue_reader.read wait: wait
-      end
-
-      def stop
-        queue_reader.stop
-      end
-
-      def stopped?
-        queue_reader.stopped?
-      end
-    end
-  end
-end

data/lib/actor/messaging/writer.rb

@@ -1,26 +0,0 @@
-module Actor
-  module Messaging
-    class Writer
-      attr_reader :queue
-
-      def initialize queue
-        @queue = queue
-      end
-
-      def self.build address
-        queue = address.queue
-
-        new queue
-      end
-
-      def self.call message, address
-        instance = build address
-        instance.(message)
-      end
-
-      def call message
-        queue.write message
-      end
-    end
-  end
-end

data/lib/actor/queue/assertions.rb

@@ -1,13 +0,0 @@
-module Actor
-  class Queue
-    module Assertions
-      def contains? object
-        if list.find object then true else false end
-      end
-
-      def empty?
-        size.zero?
-      end
-    end
-  end
-end

data/lib/actor/queue/reader.rb

@@ -1,57 +0,0 @@
-module Actor
-  class Queue
-    class Reader
-      attr_reader :queue
-      attr_accessor :position
-      attr_accessor :stopped
-
-      def initialize queue, position
-        @queue = queue
-        @position = position
-      end
-
-      def self.build queue
-        position = queue.reader_started
-
-        new queue, position
-      end
-
-      def self.start queue, &block
-        instance = build queue
-
-        begin
-          block.(instance)
-          return instance
-        ensure
-          instance.stop
-        end
-      end
-
-      def read wait: nil
-        if stopped?
-          raise Stopped, "Reader has stopped"
-        end
-
-        object = queue.read position, wait: wait
-
-        return nil if object.nil?
-
-        self.position = position.next
-
-        object
-      end
-
-      def stop
-        self.stopped = true
-
-        queue.reader_stopped position
-      end
-
-      def stopped?
-        stopped
-      end
-
-      Stopped = Class.new StandardError
-    end
-  end
-end

data/lib/actor/queue.rb

@@ -1,122 +0,0 @@
-module Actor
-  class Queue
-    attr_reader :blocked_threads
-    attr_reader :reader_positions
-    attr_reader :list
-    attr_reader :mutex
-    attr_reader :write_queue
-    attr_accessor :tail
-
-    def initialize
-      @blocked_threads = Set.new
-      @reader_positions = Hash.new 0
-      @list = []
-      @mutex = Mutex.new
-      @write_queue = ::Queue.new
-      @tail = 0
-    end
-
-    def head
-      tail + size
-    end
-
-    def read position, wait: nil
-      mutex.synchronize do
-        relative_position = position - tail
-
-        loop do
-          flush_write_queue
-
-          break if list.count > relative_position
-
-          return nil unless wait
-
-          blocked_threads << Thread.current
-          mutex.sleep
-          blocked_threads.delete Thread.current
-        end
-
-        object = list[relative_position]
-
-        up position.next
-        down position
-
-        object
-      end
-    end
-
-    def reader_started position=nil
-      mutex.synchronize do
-        position ||= tail
-
-        up position
-
-        position
-      end
-    end
-
-    def readers?
-      reader_positions.any?
-    end
-
-    def reader_count
-      return 0 unless readers?
-
-      reader_positions.values.reduce &:+
-    end
-
-    def reader_stopped position
-      mutex.synchronize do
-        down position
-      end
-    end
-
-    def size
-      list.size + write_queue.size
-    end
-
-    def write object
-      return unless readers?
-
-      write_queue << object
-
-      blocked_threads.each &:wakeup
-    end
-
-    # These command methods are highly unsafe to call without owning the mutex;
-    # therefore, they are marked as private.
-    private
-
-    def down position
-      ref_count = reader_positions[position] - 1
-
-      if ref_count.zero?
-        reader_positions.delete position
-      else
-        reader_positions[position] = ref_count
-      end
-
-      if ref_count.zero?
-        if readers? and position == tail
-          new_tail = reader_positions.keys.min
-
-          expired_objects = new_tail - tail
-
-          list.slice! 0, expired_objects
-
-          self.tail = new_tail
-        end
-      end
-
-      ref_count
-    end
-
-    def flush_write_queue
-      list << write_queue.deq until write_queue.empty?
-    end
-
-    def up position
-      reader_positions[position] += 1
-    end
-  end
-end

data/lib/actor/statistics/copy.rb

@@ -1,19 +0,0 @@
-module Actor
-  class Statistics
-    module Copy
-      def self.call target, statistics
-        target.average_elapsed_time = statistics.average_elapsed_time
-        target.elapsed_time = statistics.elapsed_time
-        target.executions = statistics.executions
-        target.last_execution_time = statistics.last_execution_time
-        target.minimum_elapsed_time = statistics.minimum_elapsed_time
-        target.maximum_elapsed_time = statistics.maximum_elapsed_time
-        target.start_time = statistics.start_time
-
-        deviation, _, _, percent = statistics.standard_deviation
-        target.standard_deviation_amount = deviation
-        target.standard_deviation_percent = percent
-      end
-    end
-  end
-end

data/lib/actor/statistics/timer.rb

@@ -1,26 +0,0 @@
-module Actor
-  class Statistics
-    class Timer
-      attr_writer :clock
-      attr_accessor :start_time
-      attr_accessor :stop_time
-
-      def clock
-        @clock ||= Time
-      end
-
-      def reset
-        self.stop_time = nil
-        self.start_time = clock.now
-
-        start_time
-      end
-
-      def stop
-        self.stop_time = stop_time = clock.now
-
-        return start_time, stop_time
-      end
-    end
-  end
-end

data/lib/actor/statistics.rb

@@ -1,75 +0,0 @@
-module Actor
-  class Statistics
-    attr_accessor :elapsed_time
-    attr_accessor :executions
-    attr_accessor :last_execution_time
-    attr_accessor :maximum_elapsed_time
-    attr_accessor :minimum_elapsed_time
-    attr_accessor :start_time
-    attr_accessor :sum_elapsed_time_squared
-    attr_writer :timer
-
-    def initialize
-      @executions = 0
-      @elapsed_time = 0
-      @sum_elapsed_time_squared = 0
-    end
-
-    def self.build actor
-      instance = new
-      actor.add_observer instance
-      instance
-    end
-
-    def executing_action
-      now = timer.reset
-
-      self.start_time ||= now
-    end
-
-    def action_executed
-      start_time, stop_time = timer.stop
-
-      elapsed_time = stop_time - start_time
-
-      self.elapsed_time += elapsed_time
-      self.executions += 1
-      self.last_execution_time = stop_time
-      self.maximum_elapsed_time = [elapsed_time, maximum_elapsed_time].compact.max
-      self.minimum_elapsed_time = [elapsed_time, minimum_elapsed_time].compact.min
-      self.sum_elapsed_time_squared += elapsed_time ** 2
-    end
-
-    def average_elapsed_time
-      return nil if executions.zero?
-
-      Rational elapsed_time, executions
-    end
-
-    def standard_deviation
-      return nil if executions.zero?
-
-      average_elapsed_time = self.average_elapsed_time
-
-      deviation = Math.sqrt(
-        [
-          0,
-          Rational(sum_elapsed_time_squared, executions) - average_elapsed_time ** 2
-        ].max
-      )
-
-      min = average_elapsed_time - deviation
-      max = average_elapsed_time + deviation
-
-      unless average_elapsed_time.zero?
-        percent = Rational(deviation * 100, average_elapsed_time)
-      end
-
-      return deviation, min, max, percent
-    end
-
-    def timer
-      @timer ||= Timer.new
-    end
-  end
-end