gloo-lang 0.9.4 → 0.9.7

data/lib/gloo_lang/objs/cli/banner.rb

@@ -1,108 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# Show a large-text banner.
-#
-require 'tty-font'
-require 'pastel'
-
-module GlooLang
-  module Objs
-    class Banner < GlooLang::Core::Obj
-
-      KEYWORD = 'banner'.freeze
-      KEYWORD_SHORT = 'ban'.freeze
-      TEXT = 'text'.freeze
-      STYLE = 'style'.freeze
-      COLOR = 'color'.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
-
-      #
-      # Get the banner text from the child object.
-      #
-      def text_value
-        o = find_child TEXT
-        return '' unless o
-
-        return o.value
-      end
-
-      #
-      # Get the banner style from the child object.
-      #
-      def style_value
-        o = find_child STYLE
-        return '' unless o
-
-        return o.value
-      end
-
-      #
-      # Get the banner color from the child object.
-      #
-      def color_value
-        o = find_child COLOR
-        return '' unless o
-
-        return o.value
-      end
-
-      # ---------------------------------------------------------------------
-      #    Children
-      # ---------------------------------------------------------------------
-
-      # Does this object have children to add when an object
-      # is created in interactive mode?
-      # This does not apply during obj load, etc.
-      def add_children_on_create?
-        return true
-      end
-
-      # Add children to this object.
-      # This is used by containers to add children needed
-      # for default configurations.
-      def add_default_children
-        fac = $engine.factory
-        fac.create_string TEXT, '', self
-        fac.create_string STYLE, '', self
-        fac.create_string COLOR, '', self
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + %w[show]
-      end
-
-      #
-      # Show the banner bar
-      #
-      def msg_show
-        font = TTY::Font.new self.style_value
-        t = font.write( self.text_value )
-        pastel = ::Pastel.new
-        c = self.color_value.split( ' ' ).map( &:to_sym )
-        puts pastel.decorate( t, *c )
-      end
-
-    end
-  end
-end

data/lib/gloo_lang/objs/cli/bar.rb

@@ -1,133 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# Show a CLI progress bar.
-#
-require 'tty-progressbar'
-
-module GlooLang
-  module Objs
-    class Bar < GlooLang::Core::Obj
-
-      KEYWORD = 'bar'.freeze
-      KEYWORD_SHORT = 'bar'.freeze
-      NAME = 'name'.freeze
-      TOTAL = 'total'.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
-
-      #
-      # Get the bar's name from the child object.
-      #
-      def name_value
-        o = find_child NAME
-        return '' unless o
-
-        return o.value
-      end
-
-      #
-      # Get the bar's total from the child object.
-      #
-      def total_value
-        o = find_child TOTAL
-        return 100 unless o
-
-        return o.value
-      end
-
-      # ---------------------------------------------------------------------
-      #    Children
-      # ---------------------------------------------------------------------
-
-      # Does this object have children to add when an object
-      # is created in interactive mode?
-      # This does not apply during obj load, etc.
-      def add_children_on_create?
-        return true
-      end
-
-      # Add children to this object.
-      # This is used by containers to add children needed
-      # for default configurations.
-      def add_default_children
-        fac = $engine.factory
-        fac.create_string NAME, '', self
-        fac.create_int TOTAL, 100, self
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + %w[start advance stop run]
-      end
-
-      #
-      # Start the progress bar.
-      #
-      def msg_start
-        msg = "#{name_value} [:bar] :percent"
-        @bar = TTY::ProgressBar.new( msg, total: total_value )
-      end
-
-      #
-      # Finish the progress bar.
-      #
-      def msg_stop
-        @bar.finish
-      end
-
-      #
-      # Advance the progress bar.
-      #
-      def msg_advance
-        x = 1
-        if @params&.token_count&.positive?
-          expr = GlooLang::Expr::Expression.new( @params.tokens )
-          x = expr.evaluate.to_i
-        end
-
-        @bar.advance x
-      end
-
-      #
-      # Run for the given number of seconds advancing
-      # the bar to the end.
-      #
-      def msg_run
-        msg_start
-
-        x = 1
-        if @params&.token_count&.positive?
-          expr = GlooLang::Expr::Expression.new( @params.tokens )
-          x = expr.evaluate.to_i
-        end
-
-        100.times do
-          sleep ( 0.0 + x ) / 100.0
-          @bar.advance 1
-        end
-
-        msg_stop
-      end
-
-    end
-  end
-end

data/lib/gloo_lang/objs/cli/colorize.rb

@@ -1,73 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# Show colorized output.
-#
-require 'colorized_string'
-
-module GlooLang
-  module Objs
-    class Colorize < GlooLang::Core::Obj
-
-      KEYWORD = 'colorize'.freeze
-      KEYWORD_SHORT = 'color'.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
-
-      # ---------------------------------------------------------------------
-      #    Children
-      # ---------------------------------------------------------------------
-
-      # Does this object have children to add when an object
-      # is created in interactive mode?
-      # This does not apply during obj load, etc.
-      def add_children_on_create?
-        return true
-      end
-
-      # Add children to this object.
-      # This is used by containers to add children needed
-      # for default configurations.
-      def add_default_children
-        fac = $engine.factory
-        fac.create_string 'white', '', self
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + [ 'run' ]
-      end
-
-      #
-      # Run the colorize command.
-      #
-      def msg_run
-        msg = ''
-        children.each do |o|
-          msg += ColorizedString[ o.value_display ].colorize( o.name.to_sym )
-        end
-        $log.show msg
-        $engine.heap.it.set_to msg.to_s
-      end
-
-    end
-  end
-end

data/lib/gloo_lang/objs/cli/confirm.rb

@@ -1,96 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# Show a CLI confirmation prompt.
-#
-
-module GlooLang
-  module Objs
-    class Confirm < GlooLang::Core::Obj
-
-      KEYWORD = 'confirm'.freeze
-      KEYWORD_SHORT = 'confirm'.freeze
-      PROMPT = 'prompt'.freeze
-      DEFAULT_PROMPT = '> '.freeze
-      RESULT = 'result'.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
-
-      #
-      # Get the URI from the child object.
-      # Returns nil if there is none.
-      #
-      def prompt_value
-        o = find_child PROMPT
-        return nil unless o
-
-        return o.value
-      end
-
-      #
-      # Set the result of the system call.
-      #
-      def set_result( data )
-        r = find_child RESULT
-        return nil unless r
-
-        r.set_value data
-      end
-
-      # ---------------------------------------------------------------------
-      #    Children
-      # ---------------------------------------------------------------------
-
-      # Does this object have children to add when an object
-      # is created in interactive mode?
-      # This does not apply during obj load, etc.
-      def add_children_on_create?
-        return true
-      end
-
-      # Add children to this object.
-      # This is used by containers to add children needed
-      # for default configurations.
-      def add_default_children
-        fac = $engine.factory
-        fac.create_string PROMPT, DEFAULT_PROMPT, self
-        fac.create_bool RESULT, nil, self
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + [ 'run' ]
-      end
-
-      #
-      # Run the confirmation command.
-      #
-      def msg_run
-        prompt = prompt_value
-        return unless prompt
-
-        result = $prompt.yes?( prompt )
-        set_result result
-      end
-
-    end
-  end
-end

data/lib/gloo_lang/objs/cli/menu.rb

@@ -1,206 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# A CLI menu.
-# The menu contains a collection of menu items, a prompt
-# and an option to loop until done.
-#
-
-module GlooLang
-  module Objs
-    class Menu < GlooLang::Core::Obj
-
-      KEYWORD = 'menu'.freeze
-      KEYWORD_SHORT = 'menu'.freeze
-      PROMPT = 'prompt'.freeze
-      ITEMS = 'items'.freeze
-      LOOP = 'loop'.freeze
-      HIDE_ITEMS = 'hide_items'.freeze
-      BEFORE_MENU = 'before_menu'.freeze
-      DEFAULT = 'default'.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
-
-      #
-      # Get the value of the prompt child object.
-      # Returns nil if there is none.
-      #
-      def prompt_value
-        o = find_child PROMPT
-        return '' unless o
-
-        return o.value
-      end
-
-      #
-      # Get the value of the loop child object.
-      # Should we keep looping or should we stop?
-      #
-      def loop?
-        o = find_child LOOP
-        return false unless o
-
-        return o.value
-      end
-
-      # ---------------------------------------------------------------------
-      #    Children
-      # ---------------------------------------------------------------------
-
-      #
-      # Does this object have children to add when an object
-      # is created in interactive mode?
-      # This does not apply during obj load, etc.
-      #
-      def add_children_on_create?
-        return true
-      end
-
-      #
-      # Add children to this object.
-      # This is used by containers to add children needed
-      # for default configurations.
-      #
-      def add_default_children
-        fac = $engine.factory
-        fac.create_string PROMPT, '> ', self
-        fac.create_can ITEMS, self
-        fac.create_bool LOOP, true, self
-        fac.create_script DEFAULT, '', self
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + [ 'run' ]
-      end
-
-      #
-      # Show the menu options, and prompt for user input.
-      #
-      def msg_run
-        loop do
-          begin_menu
-          if prompt_value.empty?
-            dt = DateTime.now
-            d = dt.strftime( '%Y.%m.%d' )
-            t = dt.strftime( '%I:%M:%S' )
-            cmd = $prompt.ask( "#{d.yellow} #{t.white} >" )
-          else
-            cmd = $prompt.ask( prompt_value )
-          end
-          cmd ? run_command( cmd ) : run_default
-          break unless loop?
-        end
-      end
-
-      # ---------------------------------------------------------------------
-      #    Menu actions
-      # ---------------------------------------------------------------------
-
-      #
-      # Begin the menu execution.
-      # Run the before menu script if there is one,
-      # then show options unless we are hiding them by default.
-      #
-      def begin_menu
-        run_before_menu
-
-        # Check to see if we should show items at all.
-        o = find_child HIDE_ITEMS
-        return if o && o.value == true
-
-        show_options
-      end
-
-      #
-      # If there is a before menu script, run it now.
-      #
-      def run_before_menu
-        o = find_child BEFORE_MENU
-        return unless o
-
-        GlooLang::Exec::Dispatch.message 'run', o
-      end
-
-      #
-      # Show the list of menu options.
-      #
-      def show_options
-        o = find_child ITEMS
-        return unless o
-
-        o.children.each do |mitem|
-          mitem = GlooLang::Objs::Alias.resolve_alias( mitem )
-          puts "  #{mitem.shortcut_value} - #{mitem.description_value}"
-        end
-      end
-
-      #
-      # Find the command matching user input.
-      #
-      def find_cmd( cmd )
-        o = find_child ITEMS
-        return nil unless o
-
-        o.children.each do |mitem|
-          mitem = GlooLang::Objs::Alias.resolve_alias( mitem )
-          return mitem if mitem.shortcut_value.downcase == cmd.downcase
-        end
-
-        return nil
-      end
-
-      #
-      # Run the default option.
-      #
-      def run_default
-        obj = find_child DEFAULT
-        return unless obj
-
-        s = GlooLang::Exec::Script.new obj
-        s.run
-      end
-
-      #
-      # Run the selected command.
-      #
-      def run_command( cmd )
-        obj = find_cmd cmd
-
-        unless obj
-          if cmd == '?'
-            show_options
-          else
-            puts "#{cmd} is not a valid option"
-          end
-          return
-        end
-
-        script = obj.do_script
-        return unless script
-
-        s = GlooLang::Exec::Script.new script
-        s.run
-      end
-
-    end
-  end
-end

data/lib/gloo_lang/objs/cli/menu_item.rb

@@ -1,95 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# A CLI menu item.  One element in a CLI menu.
-#
-
-module GlooLang
-  module Objs
-    class MenuItem < GlooLang::Core::Obj
-
-      KEYWORD = 'menu_item'.freeze
-      KEYWORD_SHORT = 'mitem'.freeze
-      SHORTCUT = 'shortcut'.freeze
-      DESCRIPTION = 'description'.freeze
-      DO = 'do'.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
-
-      #
-      # Get the value of the menu item shortcut.
-      # Returns nil if there is none.
-      #
-      def shortcut_value
-        o = find_child SHORTCUT
-        return self.name unless o
-
-        return o.value
-      end
-
-      #
-      # Get the action's description.
-      # Returns nil if there is none.
-      #
-      def description_value
-        o = find_child DESCRIPTION
-        return self.value unless o
-
-        return o.value
-      end
-
-      #
-      # Get the action's script.
-      # Returns nil if there is none.
-      #
-      def do_script
-        return find_child DO
-      end
-
-      # ---------------------------------------------------------------------
-      #    Children
-      # ---------------------------------------------------------------------
-
-      # Does this object have children to add when an object
-      # is created in interactive mode?
-      # This does not apply during obj load, etc.
-      def add_children_on_create?
-        return true
-      end
-
-      # Add children to this object.
-      # This is used by containers to add children needed
-      # for default configurations.
-      def add_default_children
-        fac = $engine.factory
-        fac.create_string SHORTCUT, '', self
-        fac.create_string DESCRIPTION, '', self
-        fac.create_script DO, '', self
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super
-      end
-
-    end
-  end
-end