gloo 0.7.6 → 1.0.0

data/lib/gloo/expr/l_boolean.rb

@@ -1,36 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An Expression that can be evaluated.
-#
-
-module Gloo
-  module Expr
-    class LBoolean < Gloo::Core::Literal
-
-      #
-      # Is the given token a boolean?
-      #
-      def self.boolean?( token )
-        return Gloo::Objs::Boolean.boolean? token
-      end
-
-      #
-      # Set the value, converting to an boolean.
-      #
-      def set_value( value )
-        @value = Gloo::Objs::Boolean.coerse_to_bool value
-      end
-
-      #
-      # Get string representation
-      #
-      def to_s
-        return 'false' unless @value
-
-        return @value.to_s
-      end
-
-    end
-  end
-end

data/lib/gloo/expr/l_decimal.rb

@@ -1,39 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# A literal decimal value.
-#
-
-module Gloo
-  module Expr
-    class LDecimal < Gloo::Core::Literal
-
-      #
-      # Is the given token a decimal?
-      #
-      def self.decimal?( token )
-        return true if token.is_a? Numeric
-
-        s = token.strip
-        return s.to_f.to_s == s
-      end
-
-      #
-      # Set the value, converting to an integer.
-      #
-      def set_value( value )
-        value = value.to_s if value.is_a? Numeric
-
-        @value = value.to_f
-      end
-
-      #
-      # Get string representation
-      #
-      def to_s
-        return self.value.to_s
-      end
-
-    end
-  end
-end

data/lib/gloo/expr/l_integer.rb

@@ -1,37 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An Expression that can be evaluated.
-#
-
-module Gloo
-  module Expr
-    class LInteger < Gloo::Core::Literal
-
-      #
-      # Is the given token an integer?
-      #
-      def self.integer?( token )
-        return true if token.is_a? Integer
-
-        s = token.strip
-        return s.to_i.to_s == s
-      end
-
-      #
-      # Set the value, converting to an integer.
-      #
-      def set_value( value )
-        @value = value.to_i
-      end
-
-      #
-      # Get string representation
-      #
-      def to_s
-        return self.value.to_s
-      end
-
-    end
-  end
-end

data/lib/gloo/expr/l_string.rb

@@ -1,58 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An Expression that can be evaluated.
-#
-
-module Gloo
-  module Expr
-    class LString < Gloo::Core::Literal
-
-      #
-      # Set the value, triming opening and closing
-      # quotations if necessary.
-      #
-      def set_value( value )
-        @value = value
-        return unless value
-
-        @value = LString.strip_quotes( @value )
-      end
-
-      #
-      # Is the given token a string?
-      #
-      def self.string?( token )
-        return false unless token.is_a? String
-        return true if token.start_with?( '"' )
-        return true if token.start_with?( "'" )
-
-        return false
-      end
-
-      #
-      # Given a string with leading and trailing quotes,
-      # strip them out.
-      #
-      def self.strip_quotes( str )
-        if str.start_with?( '"' )
-          str = str[ 1..-1 ]
-          str = str[ 0..-2 ] if str.end_with?( '"' )
-          return str
-        elsif str.start_with?( "'" )
-          str = str[ 1..-1 ]
-          str = str[ 0..-2 ] if str.end_with?( "'" )
-          return str
-        end
-      end
-
-      #
-      # Get string representation
-      #
-      def to_s
-        return self.value
-      end
-
-    end
-  end
-end

data/lib/gloo/expr/op_div.rb

@@ -1,22 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# Division operator.
-#
-
-module Gloo
-  module Expr
-    class OpDiv < Gloo::Core::Op
-
-      #
-      # Perform the operation and return the result.
-      #
-      def perform( left, right )
-        return left / right.to_i if left.is_a? Integer
-
-        return left / right.to_f if left.is_a? Numeric
-      end
-
-    end
-  end
-end

data/lib/gloo/expr/op_minus.rb

@@ -1,22 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# Subtraction operator.
-#
-
-module Gloo
-  module Expr
-    class OpMinus < Gloo::Core::Op
-
-      #
-      # Perform the operation and return the result.
-      #
-      def perform( left, right )
-        return left - right.to_i if left.is_a? Integer
-
-        return left - right.to_f if left.is_a? Numeric
-      end
-
-    end
-  end
-end

data/lib/gloo/expr/op_mult.rb

@@ -1,22 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# Multiplication operator.
-#
-
-module Gloo
-  module Expr
-    class OpMult < Gloo::Core::Op
-
-      #
-      # Perform the operation and return the result.
-      #
-      def perform( left, right )
-        return left * right.to_i if left.is_a? Integer
-
-        return left * right.to_f if left.is_a? Numeric
-      end
-
-    end
-  end
-end

data/lib/gloo/expr/op_plus.rb

@@ -1,24 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# Addition operator.
-#
-
-module Gloo
-  module Expr
-    class OpPlus < Gloo::Core::Op
-
-      #
-      # Perform the operation and return the result.
-      #
-      def perform( left, right )
-        return left + right.to_s if left.is_a? String
-
-        return left + right.to_i if left.is_a? Integer
-
-        return left + right.to_f if left.is_a? Numeric
-      end
-
-    end
-  end
-end

data/lib/gloo/objs/basic/alias.rb

@@ -1,78 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# A String.
-#
-
-module Gloo
-  module Objs
-    class Alias < Gloo::Core::Obj
-
-      KEYWORD = 'alias'.freeze
-      KEYWORD_SHORT = 'ln'.freeze
-      ALIAS_REFERENCE = '*'.freeze
-
-      #
-      # The name of the object type.
-      #
-      def self.typename
-        return KEYWORD
-      end
-
-      #
-      # The short name of the object type.
-      #
-      def self.short_typename
-        return KEYWORD_SHORT
-      end
-
-      #
-      # Set the value with any necessary type conversions.
-      #
-      def set_value( new_value )
-        self.value = new_value.to_s
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + %w[resolve]
-      end
-
-      #
-      # Check to see if the referenced object exists.
-      #
-      def msg_resolve
-        pn = Gloo::Core::Pn.new( self.value )
-        s = pn.exists?
-        $engine.heap.it.set_to s
-        return s
-      end
-
-      # ---------------------------------------------------------------------
-      #    Resolve
-      # ---------------------------------------------------------------------
-
-      #
-      # Is the object an alias  If so, then resolve it.
-      # The ref_name is the name used to refer to the object.
-      # If it ends with the * then we won't resolve the alias since
-      # we are trying to refer to the alias itself.
-      #
-      def self.resolve_alias( obj, ref_name = nil )
-        return nil unless obj
-        return obj unless obj.type_display == Gloo::Objs::Alias.typename
-        return obj if ref_name&.end_with?( ALIAS_REFERENCE )
-
-        ln = Gloo::Core::Pn.new( obj.value )
-        return ln.resolve
-      end
-
-    end
-  end
-end

data/lib/gloo/objs/basic/boolean.rb

@@ -1,120 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An object with an boolean value.
-#
-
-module Gloo
-  module Objs
-    class Boolean < Gloo::Core::Obj
-
-      KEYWORD = 'boolean'.freeze
-      KEYWORD_SHORT = 'bool'.freeze
-      TRUE = 'true'.freeze
-      FALSE = 'false'.freeze
-
-      #
-      # The name of the object type.
-      #
-      def self.typename
-        return KEYWORD
-      end
-
-      #
-      # The short name of the object type.
-      #
-      def self.short_typename
-        return KEYWORD_SHORT
-      end
-
-      #
-      # Set the value with any necessary type conversions.
-      #
-      def set_value( new_value )
-        self.value = Gloo::Objs::Boolean.coerse_to_bool( new_value )
-      end
-
-      #
-      # Coerse the new value to a boolean value.
-      #
-      def self.coerse_to_bool( new_value )
-        return false if new_value.nil?
-
-        # I should be able to use this:
-        # if new_value.kind_of?( String )
-        # but it doesn't work.  I don't know why.
-        if new_value.class.name == 'String'
-          return true if new_value.strip.downcase == TRUE
-          return false if new_value.strip.downcase == FALSE
-          return true if new_value.strip.downcase == 't'
-          return false if new_value.strip.downcase == 'f'
-        elsif new_value.class.name == 'Integer'
-          return new_value.zero? ? false : true
-        end
-
-        return new_value == true
-      end
-
-      #
-      # Is the given token a boolean?
-      #
-      def self.boolean?( token )
-        return true if token == true
-        return true if token == false
-
-        if token.class.name == 'String'
-          return true if token.strip.downcase == TRUE
-          return true if token.strip.downcase == FALSE
-        end
-        return false
-      end
-
-      #
-      # Get the value for display purposes.
-      #
-      def value_display
-        return value ? TRUE : FALSE
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + %w[not true false]
-      end
-
-      #
-      # Set the value to the opposite of what it is.
-      #
-      def msg_not
-        v = !value
-        set_value v
-        $engine.heap.it.set_to v
-        return v
-      end
-
-      #
-      # Set the value to true.
-      #
-      def msg_true
-        set_value true
-        $engine.heap.it.set_to true
-        return true
-      end
-
-      #
-      # Set the value to false.
-      #
-      def msg_false
-        set_value false
-        $engine.heap.it.set_to false
-        return false
-      end
-
-    end
-  end
-end

data/lib/gloo/objs/basic/container.rb

@@ -1,76 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An object that contains a collection of other objects.
-#
-require 'tty-table'
-require 'pastel'
-
-module Gloo
-  module Objs
-    class Container < Gloo::Core::Obj
-
-      KEYWORD = 'container'.freeze
-      KEYWORD_SHORT = 'can'.freeze
-
-      #
-      # The name of the object type.
-      #
-      def self.typename
-        return KEYWORD
-      end
-
-      #
-      # The short name of the object type.
-      #
-      def self.short_typename
-        return KEYWORD_SHORT
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + %w[count delete_children show_key_value_table]
-      end
-
-      #
-      # Count the number of children in the container.
-      #
-      def msg_count
-        i = child_count
-        $engine.heap.it.set_to i
-        return i
-      end
-
-      #
-      # Delete all children in the container.
-      #
-      def msg_delete_children
-        self.delete_children
-      end
-
-      #
-      # Show the given table data.
-      #
-      def msg_show_key_value_table
-        data = self.children.map { |o| [ o.name, o.value ] }
-        pastel = ::Pastel.new
-        table = TTY::Table.new rows: data
-        pad = [ 0, 1, 0, 1 ]
-        rendered = table.render( :ascii, indent: 2, padding: pad ) do |r|
-          r.border.style = :blue
-          r.filter = proc do |val, _row_index, col_index|
-            col_index.zero? ? pastel.blue( val ) : pastel.white( val )
-          end
-        end
-        puts "\n  #{rendered}\n\n"
-      end
-
-    end
-  end
-end

data/lib/gloo/objs/basic/decimal.rb

@@ -1,76 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# An object with a decimal value.
-#
-
-module Gloo
-  module Objs
-    class Decimal < Gloo::Core::Obj
-
-      KEYWORD = 'decimal'.freeze
-      KEYWORD_SHORT = 'num'.freeze
-
-      #
-      # The name of the object type.
-      #
-      def self.typename
-        return KEYWORD
-      end
-
-      #
-      # The short name of the object type.
-      #
-      def self.short_typename
-        return KEYWORD_SHORT
-      end
-
-      #
-      # Set the value with any necessary type conversions.
-      #
-      def set_value( new_value )
-        if new_value.nil?
-          self.value = 0.0
-          return
-        end
-
-        unless new_value.is_a? Numeric
-          self.value = $engine.converter.convert( new_value, 'Decimal', 0.0 )
-          return
-        end
-
-        self.value = new_value.to_f
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + %w[round]
-      end
-
-      #
-      # Round the value to a whole value.
-      # If a parameter is included in the message,
-      # round to the precision given.
-      #
-      def msg_round
-        data = 0
-        if @params&.token_count&.positive?
-          expr = Gloo::Expr::Expression.new( @params.tokens )
-          data = expr.evaluate.to_i
-        end
-
-        i = self.value.round( data )
-        set_value i
-        $engine.heap.it.set_to i
-        return i
-      end
-
-    end
-  end
-end

data/lib/gloo/objs/basic/integer.rb

@@ -1,73 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An object with an integer value.
-#
-
-module Gloo
-  module Objs
-    class Integer < Gloo::Core::Obj
-
-      KEYWORD = 'integer'.freeze
-      KEYWORD_SHORT = 'int'.freeze
-
-      #
-      # The name of the object type.
-      #
-      def self.typename
-        return KEYWORD
-      end
-
-      #
-      # The short name of the object type.
-      #
-      def self.short_typename
-        return KEYWORD_SHORT
-      end
-
-      #
-      # Set the value with any necessary type conversions.
-      #
-      def set_value( new_value )
-        unless new_value.is_a? Numeric
-          self.value = $engine.converter.convert( new_value, 'Integer', 0 )
-          return
-        end
-
-        self.value = new_value.to_i
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + %w[inc dec]
-      end
-
-      #
-      # Increment the integer
-      #
-      def msg_inc
-        i = value + 1
-        set_value i
-        $engine.heap.it.set_to i
-        return i
-      end
-
-      #
-      # Decrement the integer
-      #
-      def msg_dec
-        i = value - 1
-        set_value i
-        $engine.heap.it.set_to i
-        return i
-      end
-
-    end
-  end
-end