gloo 0.8.0 → 1.0.0

data/lib/gloo/core/obj_finder.rb

@@ -1,30 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# Utility used to find objects.
-#
-
-module Gloo
-  module Core
-    class ObjFinder
-
-      #
-      # Find all objects in the given container that have
-      # the given name.
-      # If the container isn't provided, root will be used.
-      #
-      def self.by_name( name, container = nil )
-        container = $engine.heap.root if container.nil?
-        arr = []
-
-        container.children.each do |o|
-          arr << o if o.name == name
-          arr += by_name( name, o ) if o.child_count.positive?
-        end
-
-        return arr
-      end
-
-    end
-  end
-end

data/lib/gloo/core/op.rb

@@ -1,40 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An Operator; part of an expression.
-# A static helper class.
-#
-
-module Gloo
-  module Core
-    class Op
-
-      #
-      # Is the token an operator?
-      #
-      def self.op?( token )
-        return [ '+', '-', '*', '/' ].include?( token.strip )
-      end
-
-      #
-      # Create the operator for the given token.
-      #
-      def self.create_op( token )
-        return Gloo::Expr::OpMinus.new if token == '-'
-        return Gloo::Expr::OpMult.new if token == '*'
-        return Gloo::Expr::OpDiv.new if token == '/'
-        return Gloo::Expr::OpPlus.new if token == '+'
-
-        return default_op
-      end
-
-      #
-      # Get the default operator (+).
-      #
-      def self.default_op
-        return Gloo::Expr::OpPlus.new
-      end
-
-    end
-  end
-end

data/lib/gloo/core/parser.rb

@@ -1,59 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# The Parser.
-# Can parse single line commands or files.
-#
-
-module Gloo
-  module Core
-    class Parser
-
-      #
-      # Set up the parser.
-      #
-      def initialize
-        $log.debug 'parser intialized...'
-      end
-
-      #
-      # Parse a command from the immediate execution context.
-      #
-      def parse_immediate( cmd )
-        cmd, params = split_params cmd
-        params = Gloo::Core::Tokens.new( params ) if params
-        tokens = Gloo::Core::Tokens.new( cmd )
-        dic = Gloo::Core::Dictionary.instance
-        verb = dic.find_verb( tokens.verb )
-        return verb.new( tokens, params ) if verb
-
-        $log.error "Verb '#{tokens.verb}' was not found."
-        return nil
-      end
-
-      #
-      # If additional params were provided, split them out
-      # from the token list.
-      #
-      def split_params( cmd )
-        params = nil
-        i = cmd.rindex( '(' )
-        if i && cmd.strip.end_with?( ')' )
-          pstr = cmd[ i + 1..-1 ]
-          params = pstr.strip[ 0..-2 ] if pstr
-          cmd = cmd[ 0, i - 1 ]
-        end
-        return cmd, params
-      end
-
-      #
-      # Parse a command and then run it if it parsed correctly.
-      #
-      def run( cmd )
-        v = parse_immediate( cmd )
-        Gloo::Exec::Runner.go( v ) if v
-      end
-
-    end
-  end
-end

data/lib/gloo/core/pn.rb

@@ -1,188 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An object path name.
-# Path and name elements are separated by periods.
-#
-
-module Gloo
-  module Core
-    class Pn < Baseo
-
-      ROOT = 'root'.freeze
-      IT = 'it'.freeze
-      ERROR = 'error'.freeze
-
-      attr_reader :src, :elements
-
-      #
-      # Set up the object given a source string,
-      # ie: the full path and name.
-      #
-      def initialize( src )
-        set_to src
-      end
-
-      #
-      # Reference to the root object path.
-      #
-      def self.root
-        return Pn.new( ROOT )
-      end
-
-      #
-      # Reference to it.
-      #
-      def self.it
-        return Pn.new( IT )
-      end
-
-      #
-      # Reference to the error message.
-      #
-      def self.error
-        return Pn.new( ERROR )
-      end
-
-      #
-      # Does the pathname reference refer to the root?
-      #
-      def root?
-        return @src.downcase == ROOT
-      end
-
-      #
-      # Does the pathname reference refer to it?
-      #
-      def it?
-        return @src.downcase == IT
-      end
-
-      #
-      # Does the pathname reference refer to error?
-      #
-      def error?
-        return @src.downcase == ERROR
-      end
-
-      #
-      # Does the pathname reference refer to the gloo system object?
-      #
-      def gloo_sys?
-        return false unless @elements&.count&.positive?
-
-        o = @elements.first.downcase
-        return true if o == Gloo::Core::GlooSystem.typename
-        return true if o == Gloo::Core::GlooSystem.short_typename
-
-        return false
-      end
-
-      #
-      # Get the string representation of the pathname.
-      #
-      def to_s
-        return @src
-      end
-
-      #
-      # Set the object pathname to the given value.
-      #
-      def set_to( value )
-        @src = value.nil? ? nil : value.strip
-        @elements = @src.nil? ? [] : @src.split( '.' )
-      end
-
-      #
-      # Convert the raw string to a list of segments.
-      #
-      def segments
-        return @elements
-      end
-
-      #
-      # Get the name element.
-      #
-      def name
-        return '' unless self.named?
-
-        return @elements.last
-      end
-
-      #
-      # Does the value include path elements?
-      #
-      def named?
-        return @elements.count.positive?
-      end
-
-      #
-      # Does the value include a name?
-      #
-      def includes_path?
-        return @elements.count > 1
-      end
-
-      #
-      # Get the parent that contains the object referenced.
-      #
-      def get_parent
-        o = $engine.heap.root
-
-        if self.includes_path?
-          @elements[ 0..-2 ].each do |e|
-            o = o.find_child( e )
-            if o.nil?
-              $log.error "Object '#{e}' was not found."
-              return nil
-            end
-          end
-        end
-
-        return o
-      end
-
-      #
-      # Does the object at the path exist?
-      #
-      def exists?
-        return true if self.root?
-        return true if self.it?
-        return true if self.error?
-
-        parent = self.get_parent
-        return false unless parent
-
-        return parent.contains_child? name
-      end
-
-      #
-      # Is the reference to a color?
-      #
-      def named_color?
-        colors = %w[red blue green white black yellow]
-        return true if colors.include?( @src.downcase )
-      end
-
-      #
-      # Resolve the pathname reference.
-      # Find the object referenced or return nil if it is not found.
-      #
-      def resolve
-        return $engine.heap.root if self.root?
-        return $engine.heap.it if self.it?
-        return $engine.heap.error if self.error?
-        return Gloo::Core::GlooSystem.new( self ) if self.gloo_sys?
-
-        Here.expand_here( self ) if Here.includes_here_ref?( @elements )
-
-        parent = self.get_parent
-        return nil unless parent
-
-        obj = parent.find_child( self.name )
-        return Gloo::Objs::Alias.resolve_alias( obj, self.src )
-      end
-
-    end
-  end
-end

data/lib/gloo/core/tokens.rb

@@ -1,165 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An ordered list of tokens.
-# The list of tokens makes up a command.
-#
-
-module Gloo
-  module Core
-    class Tokens
-
-      attr_reader :cmd, :tokens
-
-      # ---------------------------------------------------------------------
-      #    Constructor
-      # ---------------------------------------------------------------------
-
-      #
-      # Set up the tokens.
-      # The command string is parsed into tokens during creation.
-      #
-      def initialize( cmd_string )
-        @cmd = cmd_string
-        @tokens = []
-        tokenize @cmd
-      end
-
-      # ---------------------------------------------------------------------
-      #    Public functions
-      # ---------------------------------------------------------------------
-
-      #
-      # Get the number of tokens
-      #
-      def token_count
-        return @tokens.size
-      end
-
-      #
-      # Get the verb (the first word)
-      #
-      def verb
-        return first
-      end
-
-      #
-      # Get all tokens except the first.
-      #
-      def params
-        return @tokens[ 1..-1 ]
-      end
-
-      #
-      # Get the first token.
-      #
-      def first
-        return @tokens.first if @tokens
-      end
-
-      #
-      # Get the last token.
-      #
-      def last
-        return @tokens.last if @tokens
-      end
-
-      #
-      # Get the second token.
-      #
-      def second
-        return @tokens[ 1 ] if @tokens&.size&.positive?
-      end
-
-      #
-      # Get the token at the the requested index.
-      #
-      def at( index )
-        return @tokens[ index ] if @tokens && @tokens.size >= index
-      end
-
-      #
-      # Get the index of the given token.
-      #
-      def index_of( token )
-        return nil unless @tokens
-
-        return @tokens.find_index { |o| o.casecmp( token ).zero? }
-      end
-
-      #
-      # Get the list of tokens after the given token
-      #
-      def tokens_after( token )
-        i = index_of token
-        return @tokens[ i + 1..-1 ] if i && @tokens && @tokens.size > ( i + 1 )
-
-        return nil
-      end
-
-      #
-      # Get the expression after the given token
-      #
-      def expr_after( token )
-        str = ''
-        tokens_after( token ).each do |t|
-          str << ' ' unless str.empty?
-          str << t.to_s
-        end
-        return str
-      end
-
-      #
-      # Get the item after a given token.
-      #
-      def after_token( token )
-        i = index_of token
-        return @tokens[ i + 1 ] if i && @tokens && @tokens.size > ( i + 1 )
-
-        return nil
-      end
-
-      #
-      # Get the item after a given token.
-      #
-      def before_token( token )
-        i = index_of token
-        return @tokens[ 0..i - 1 ] if i && @tokens && @tokens.size >= i
-
-        return nil
-      end
-
-      # ---------------------------------------------------------------------
-      #    Private functions
-      # ---------------------------------------------------------------------
-
-      private
-
-      #
-      # Create a list of token from the given string.
-      #
-      def tokenize( str )
-        if str.index( '"' )
-          i = str.index( '"' )
-          j = str.index( '"', i + 1 )
-          j ||= str.length
-
-          tokenize( str[ 0..i - 1 ] ) if i > 1
-          @tokens << str[ i..j ]
-          tokenize( str[ j + 1..-1 ] ) if j + 1 < str.length
-        elsif str.index( "'" )
-          i = str.index( "'" )
-          j = str.index( "'", i + 1 )
-          j ||= str.length
-
-          tokenize( str[ 0..i - 1 ] ) if i > 1
-          @tokens << str[ i..j ]
-          tokenize( str[ j + 1..-1 ] ) if j + 1 < str.length
-        else
-          str.strip.split( ' ' ).each { |t| @tokens << t }
-        end
-      end
-
-    end
-  end
-end

data/lib/gloo/core/verb.rb

@@ -1,86 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An abstract base verb.
-# Derives from the Baseo object.
-# It is a special type of object in that it can be run
-# and can perform an action.
-#
-
-module Gloo
-  module Core
-    class Verb < Baseo
-
-      attr_reader :tokens, :params
-
-      #
-      # Set up the verb.
-      #
-      def initialize( tokens, params = [] )
-        @tokens = tokens
-        @params = params
-      end
-
-      #
-      # Register verbs when they are loaded.
-      #
-      def self.inherited( subclass )
-        Dictionary.instance.register_verb( subclass )
-      end
-
-      #
-      # Run the verb.
-      #
-      # We'll mark the application as not running and let the
-      # engine stop gracefully next time through the loop.
-      #
-      def run
-        raise 'this method should be overriden'
-      end
-
-      #
-      # Get the Verb's keyword.
-      #
-      # The keyword will be in lower case only.
-      # It is used by the parser.
-      #
-      def self.keyword
-        raise 'this method should be overriden'
-      end
-
-      #
-      # Get the Verb's keyword shortcut.
-      #
-      def self.keyword_shortcut
-        raise 'this method should be overriden'
-      end
-
-      #
-      # The object type, suitable for display.
-      #
-      def type_display
-        return self.class.keyword
-      end
-
-      #
-      # Generic function to get display value.
-      # Can be used for debugging, etc.
-      #
-      def display_value
-        return self.class.keyword
-      end
-
-      # ---------------------------------------------------------------------
-      #    Help
-      # ---------------------------------------------------------------------
-
-      #
-      # Get help for this verb.
-      #
-      def self.help
-        return 'No help found.'
-      end
-
-    end
-  end
-end

data/lib/gloo/exec/action.rb

@@ -1,48 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# An action is a message sent to an object with optional parameters.
-#
-
-module Gloo
-  module Exec
-    class Action
-
-      attr_accessor :msg, :to, :params
-
-      #
-      # Set up the action.
-      #
-      def initialize( msg, to, params = nil )
-        @msg = msg
-        @to = to
-        @params = params
-      end
-
-      #
-      # The action is valid if the object can receive
-      # the message specified.
-      #
-      def valid?
-        return @to.can_receive_message?( @msg )
-      end
-
-      #
-      # Execute the action.
-      # Dispatch the message to the object.
-      #
-      def dispatch
-        @to.send_message @msg, @params
-      end
-
-      #
-      # Generic function to get display value.
-      # Can be used for debugging, etc.
-      #
-      def display_value
-        return "#{@msg} -> #{@to.pn}"
-      end
-
-    end
-  end
-end

data/lib/gloo/exec/dispatch.rb

@@ -1,40 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# Central Message Dispatch.
-# Responsible for sending message to objects.
-# All object messaging goes through here so we can uniformly
-# manage things like checking to make sure object can
-# receive the messages sent, handling errors, etc.
-#
-
-module Gloo
-  module Exec
-    class Dispatch
-
-      #
-      # Dispatch the given message to the given object.
-      #
-      def self.message( msg, to_obj, params = nil )
-        $log.debug "Dispatch message #{msg} to #{to_obj.name}"
-        a = Gloo::Exec::Action.new msg, to_obj, params
-        Gloo::Exec::Dispatch.action a
-      end
-
-      #
-      # Dispatch an action.
-      #
-      def self.action( action )
-        unless action.valid?
-          $log.warn "Object #{action.to.name} does not respond to #{action.msg}"
-        end
-
-        $engine.exec_env.push_action action
-        $log.debug "Sending message #{action.msg} to #{action.to.name}"
-        action.dispatch
-        $engine.exec_env.pop_action
-      end
-
-    end
-  end
-end