gloo 0.8.0 → 1.0.0

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

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

@@ -1,99 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# A Script.
-# A set of commands to be run.
-#
-
-module Gloo
-  module Objs
-    class Script < Gloo::Core::Obj
-
-      KEYWORD = 'script'.freeze
-      KEYWORD_SHORT = 'cmd'.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
-
-      #
-      # Set the value as an array.
-      #
-      def set_array_value( arr )
-        self.value = arr
-      end
-
-      #
-      # Add a line (cmd) to the script.
-      #
-      def add_line( line )
-        if self.value_string?
-          first = self.value
-          self.set_array_value []
-          self.value << first unless first.empty?
-        elsif self.value_is_blank?
-          self.set_array_value []
-        end
-        self.value << line.strip
-      end
-
-      #
-      # Does this object support multi-line values?
-      # Initially only true for scripts.
-      #
-      def multiline_value?
-        return true
-      end
-
-      #
-      # Get the number of lines in this script.
-      #
-      def line_count
-        return self.value.count if self.value_is_array?
-
-        if self.value_string?
-          return self.value.strip.empty? ? 0 : 1
-        end
-
-        return 0
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + [ 'run' ]
-      end
-
-      #
-      # Send the object the unload message.
-      #
-      def msg_run
-        s = Gloo::Exec::Script.new self
-        s.run
-      end
-
-    end
-  end
-end

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

@@ -1,77 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# A String.
-#
-
-module Gloo
-  module Objs
-    class String < Gloo::Core::Obj
-
-      KEYWORD = 'string'.freeze
-      KEYWORD_SHORT = 'str'.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[up down size]
-      end
-
-      #
-      # Get the size of the string.
-      #
-      def msg_size
-        s = value.size
-        $engine.heap.it.set_to s
-        return s
-      end
-
-      #
-      # Convert string to upper case
-      #
-      def msg_up
-        s = value.upcase
-        set_value s
-        $engine.heap.it.set_to s
-        return s
-      end
-
-      #
-      # Convert string to lower case
-      #
-      def msg_down
-        s = value.downcase
-        set_value s
-        $engine.heap.it.set_to s
-        return s
-      end
-
-    end
-  end
-end

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

@@ -1,87 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# A [multiline] block of text.
-#
-require 'tty-editor'
-require 'tty-pager'
-
-module Gloo
-  module Objs
-    class Text < Gloo::Core::Obj
-
-      KEYWORD = 'text'.freeze
-      KEYWORD_SHORT = 'txt'.freeze
-      DEFAULT_TMP_FILE = 'tmp.txt'.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
-
-      #
-      # Does this object support multi-line values?
-      # Initially only true for scripts.
-      #
-      def multiline_value?
-        return false
-      end
-
-      #
-      # Get the number of lines of text.
-      #
-      def line_count
-        return value.split( "\n" ).count
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + %w[edit page]
-      end
-
-      #
-      # Show the contents of the file, paginated.
-      #
-      def msg_page
-        return unless value
-
-        # pager = TTY::Pager::SystemPager.new command: 'less -R'
-        pager = TTY::Pager.new
-        pager.page( value )
-      end
-
-      #
-      # Edit the text in the default editor.
-      #
-      def msg_edit
-        tmp = File.join( $settings.tmp_path, DEFAULT_TMP_FILE )
-        File.open( tmp, 'w' ) { |file| file.write( self.value ) }
-        TTY::Editor.open( tmp )
-        set_value File.read( tmp )
-      end
-
-    end
-  end
-end

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

@@ -1,41 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An Untyped Object.
-#
-
-module Gloo
-  module Objs
-    class Untyped < Gloo::Core::Obj
-
-      KEYWORD = 'untyped'.freeze
-      KEYWORD_SHORT = 'un'.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 # + [ "run" ]
-      end
-
-    end
-  end
-end