gloo 0.4.0 → 0.5.0

data/lib/gloo/objs/ror/erb.rb

@@ -57,6 +57,7 @@ module Gloo
 
         body = find_child PARAMS
         body.children.each do |child|
+          child = Gloo::Objs::Alias.resolve_alias( child )
           h[ child.name ] = child.value
         end
 

data/lib/gloo/objs/system/file_handle.rb

@@ -3,6 +3,7 @@
 #
 # An object that points to a file in the system.
 #
+require 'tty-pager'
 
 module Gloo
   module Objs
@@ -33,9 +34,45 @@ module Gloo
       # Get a list of message names that this object receives.
       #
       def self.messages
-        return super + %w[read write check_exists check_is_file check_is_dir]
+        basic = %w[read write]
+        checks = %w[check_exists check_is_file check_is_dir]
+        show = %w[show page open]
+        return super + basic + show + checks
       end
 
+      #
+      # Open the file in the default application for the file type.
+      #
+      def msg_open
+        return unless value && File.exist?( value )
+
+        cmd = Gloo::Core::GlooSystem.open_for_platform
+        cmd_with_param = "#{cmd} \"#{value}\""
+        `#{cmd_with_param}`
+      end
+
+      #
+      # Show the contents of the file, paginated.
+      #
+      def msg_page
+        return unless value && File.file?( value )
+
+        pager = TTY::Pager.new
+        pager.page( path: value )
+      end
+
+      #
+      # Show the contents of the file.
+      #
+      def msg_show
+        return unless value && File.file?( value )
+
+        puts File.read( value )
+      end
+
+      #
+      # Read the contents of the file into the object.
+      #
       def msg_read
         return unless value && File.file?( value )
 
@@ -49,6 +86,9 @@ module Gloo
         end
       end
 
+      #
+      # Write the given data out to the file.
+      #
       def msg_write
         data = ''
         return unless value
@@ -60,19 +100,25 @@ module Gloo
         File.write( value, data )
       end
 
+      #
       # Check to see if the file exists.
+      #
       def msg_check_exists
         result = File.exist? value
         $engine.heap.it.set_to result
       end
 
+      #
       # Check to see if the file is a file.
+      #
       def msg_check_is_file
         result = File.file? value
         $engine.heap.it.set_to result
       end
 
+      #
       # Check to see if the file is a directory.
+      #
       def msg_check_is_dir
         result = File.directory? value
         $engine.heap.it.set_to result
@@ -104,6 +150,9 @@ module Gloo
               If the <into.obj> is not specified, the data will be in <it>.
             write <from.obj> - Write the data in the <from.object> into
               the file.
+            show - Show the contents of the file.
+            page - Show the contents of the file, paginated
+            open - Open the file with the default application for the type.
             check_exists - Check to see if the file exists.
               <It> will be true or false.
             check_is_file - Check to see if the file specified is a

data/lib/gloo/objs/web/http_get.rb

@@ -6,6 +6,7 @@
 require 'net/http'
 require 'uri'
 require 'json'
+require 'openssl'
 
 module Gloo
   module Objs
@@ -16,6 +17,7 @@ module Gloo
       URL = 'uri'.freeze
       PARAMS = 'params'.freeze
       RESULT = 'result'.freeze
+      SKIP_SSL_VERIFY = 'skip_ssl_verify'.freeze
 
       #
       # The name of the object type.
@@ -42,6 +44,16 @@ module Gloo
         return uri.value
       end
 
+      #
+      # Should we skip SSL verification during the request?
+      #
+      def skip_ssl_verify?
+        skip = find_child SKIP_SSL_VERIFY
+        return false unless skip
+
+        return skip.value
+      end
+
       #
       # Set the result of the API call.
       #
@@ -61,6 +73,8 @@ module Gloo
         params.children.each do |child|
           p << ( p.empty? ? '?' : '&' )
 
+          child = Gloo::Objs::Alias.resolve_alias( child )
+
           # TODO: Quote URL params for safety
           p << "#{child.name}=#{child.value}"
         end
@@ -112,7 +126,8 @@ module Gloo
       def msg_run
         url = full_url_value
         $log.debug url
-        update_result Gloo::Objs::HttpGet.invoke_request url
+        r = Gloo::Objs::HttpGet.invoke_request( url, self.skip_ssl_verify? )
+        update_result r
       end
 
       # ---------------------------------------------------------------------
@@ -120,10 +135,13 @@ module Gloo
       # ---------------------------------------------------------------------
 
       # Post the content to the endpoint.
-      def self.invoke_request( url )
+      def self.invoke_request( url, skip_ssl_verify = false )
         uri = URI( url )
-        use_ssl = uri.scheme.downcase.equal?( 'https' )
-        Net::HTTP.start( uri.host, uri.port, :use_ssl => use_ssl ) do |http|
+        params = { use_ssl: uri.scheme == 'https' }
+
+        params[ :verify_mode ] = ::OpenSSL::SSL::VERIFY_NONE if skip_ssl_verify
+
+        Net::HTTP.start( uri.host, uri.port, params ) do |http|
           request = Net::HTTP::Get.new uri
           response = http.request request # Net::HTTPResponse object
           return response.body
@@ -154,6 +172,8 @@ module Gloo
             result - string
               The result of the request.  Whatever was returned from
               the HTTP Get call.
+            skip_ssl_verify - boolean (optional)
+              Skip the SSL verification as part of the request.
 
           MESSAGES
             run - Run the HTTP Get and update the result.

data/lib/gloo/objs/web/http_post.rb

@@ -50,6 +50,7 @@ module Gloo
 
         body = find_child BODY
         body.children.each do |child|
+          child = Gloo::Objs::Alias.resolve_alias( child )
           h[ child.name ] = child.value
         end
 

data/lib/gloo/objs/web/json.rb

@@ -0,0 +1,155 @@
+# Author::    Eric Crane  (mailto:eric.crane@mac.com)
+# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
+#
+# JSON data.
+#
+require 'json'
+
+module Gloo
+  module Objs
+    class Json < Gloo::Core::Obj
+
+      KEYWORD = 'json'.freeze
+      KEYWORD_SHORT = 'json'.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[get parse]
+      end
+
+      #
+      # Get a value from the JSON data.
+      # The additional parameter is the path to the value.
+      #
+      def msg_get
+        if @params&.token_count&.positive?
+          expr = Gloo::Expr::Expression.new( @params.tokens )
+          data = expr.evaluate
+        end
+        return unless data
+
+        h = JSON.parse( self.value )
+        field = h[ data ]
+        $engine.heap.it.set_to field
+        return field
+      end
+
+      #
+      # Parse the JSON data and put it in objects.
+      # The additional parameter is the path to the destination
+      # for the parsed objects.
+      #
+      def msg_parse
+        if @params&.token_count&.positive?
+          pn = Gloo::Core::Pn.new @params.tokens.first
+          unless pn&.exists?
+            $engine.err 'Destination path for parsed objects does not exist'
+            return
+          end
+        else
+          $engine.err 'Destination path for parsed objects is required'
+          return
+        end
+        parent = pn.resolve
+
+        json = JSON.parse( self.value )
+        self.handle_json( json, parent )
+      end
+
+      #
+      # Handle JSON, creating objects and setting values.
+      # Note that this is a recursive function.
+      #
+      def handle_json( json, parent )
+        if json.class == Hash
+          json.each do |k, v|
+            if v.class == Array
+              o = parent.find_add_child( k, 'can' )
+              handle_json( v, o )
+            else
+              o = parent.find_add_child( k, 'untyped' )
+              o.set_value v
+            end
+          end
+        elsif json.class == Array
+          json.each_with_index do |o, index|
+            child = parent.find_add_child( index.to_s, 'can' )
+            handle_json( o, child )
+          end
+        end
+      end
+
+      # ---------------------------------------------------------------------
+      #    Help
+      # ---------------------------------------------------------------------
+
+      #
+      # Get help for this object type.
+      #
+      def self.help
+        return <<~TEXT
+          JSON OBJECT TYPE
+            NAME: json
+            SHORTCUT: json
+
+          DESCRIPTION
+            JSON data in a text string.
+
+          CHILDREN
+            None
+
+          MESSAGES
+            get - get a value from the JSON data
+              Example: tell myjson to get ("title")
+              The additional parameter is the path to the value.
+            parse - parse the JSON data and put values in the
+              object specified by the additional parameter
+              Example: tell myjson to parse ("path.to.objects")
+        TEXT
+      end
+
+    end
+  end
+end

data/lib/gloo/objs/web/uri.rb

@@ -0,0 +1,160 @@
+# Author::    Eric Crane  (mailto:eric.crane@mac.com)
+# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
+#
+# A URI (URL).
+#
+require 'uri'
+
+module Gloo
+  module Objs
+    class Uri < Gloo::Core::Obj
+
+      KEYWORD = 'uri'.freeze
+      KEYWORD_SHORT = 'url'.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
+
+      # ---------------------------------------------------------------------
+      #    Messages
+      # ---------------------------------------------------------------------
+
+      #
+      # Get a list of message names that this object receives.
+      #
+      def self.messages
+        basic = %w[open]
+        gets = %w[get_scheme get_host get_path]
+        more = %w[get_query get_fragment]
+        return super + basic + gets + more
+      end
+
+      #
+      # Get the URI fragment that comes after the '#'
+      # in the URL.  Might be used to scroll down in the page.
+      #
+      def msg_get_fragment
+        return unless value
+
+        o = URI( value ).fragment
+        $engine.heap.it.set_to o
+        return o
+      end
+
+      #
+      # Get the URI query parameters.
+      # Example:  id=121
+      #
+      def msg_get_query
+        return unless value
+
+        o = URI( value ).query
+        $engine.heap.it.set_to o
+        return o
+      end
+
+      #
+      # Get the URI path.
+      # Example:  /posts
+      #
+      def msg_get_path
+        return unless value
+
+        o = URI( value ).path
+        $engine.heap.it.set_to o
+        return o
+      end
+
+      #
+      # Get the URI host.
+      # Example:  google.com
+      #
+      def msg_get_host
+        return unless value
+
+        o = URI( value ).host
+        $engine.heap.it.set_to o
+        return o
+      end
+
+      #
+      # Get the URI Scheme.
+      # Example:  http
+      #
+      def msg_get_scheme
+        return unless value
+
+        o = URI( value ).scheme
+        $engine.heap.it.set_to o
+        return o
+      end
+
+      #
+      # Open the URI in the default browser.
+      #
+      def msg_open
+        return unless value
+
+        cmd = Gloo::Core::GlooSystem.open_for_platform
+        cmd_with_param = "#{cmd} \"#{value}\""
+        `#{cmd_with_param}`
+      end
+
+      # ---------------------------------------------------------------------
+      #    Help
+      # ---------------------------------------------------------------------
+
+      #
+      # Get help for this object type.
+      #
+      def self.help
+        return <<~TEXT
+          URI OBJECT TYPE
+            NAME: uri
+            SHORTCUT: url
+
+          DESCRIPTION
+            A URI or URL.
+
+          CHILDREN
+            None
+
+          MESSAGES
+            open - open the URL in the default browser
+            get_scheme - get the URI scheme; example:  http
+            get_host - get the URI host; example:  google.com
+            get_path - get the URI resource path; example:  /post
+            get_query - get the URI query parameterse; example:  id=121
+            get_fragment - get the URI fragment
+        TEXT
+      end
+
+    end
+  end
+end