gloo 4.7.0 → 5.0.1

data/lib/gloo/objs/data/sqlite.rb

@@ -1,174 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# A Sqlite3 database connection.
-#
-# https://www.rubydoc.info/gems/sqlite3/1.3.11
-# https://www.devdungeon.com/content/ruby-sqlite-tutorial
-#
-# db.results_as_hash = true
-#   Set results to return as Hash object.
-#   This is slower but offers a huge convenience.
-#   Consider turning it off for high performance situations.
-#   Each row will have the column name as the hash key.
-#
-# # Alternatively, to only get one row and discard the rest,
-# replace `db.query()` with `db.get_first_value()`.
-#
-require 'sqlite3'
-
-module Gloo
-  module Objs
-    class Sqlite < Gloo::Core::Obj
-
-      KEYWORD = 'sqlite'.freeze
-      KEYWORD_SHORT = 'sqlite'.freeze
-
-      DB = 'database'.freeze
-      DEFAULT_DB = 'test.db'.freeze
-
-      DB_REQUIRED_ERR = 'The database name is required!'.freeze
-      DB_NOT_FOUND_ERR = 'The database file was not found!'.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 DB, DEFAULT_DB, self
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + [ 'verify' ]
-      end
-
-      #
-      # Verify access to the Sqlite database specified.
-      #
-      def msg_verify
-        name = db_value
-        if name.empty?
-          @engine.err DB_REQUIRED_ERR
-          @engine.heap.it.set_to false
-          return
-        end
-
-        unless File.exist? name
-          @engine.err DB_NOT_FOUND_ERR
-          @engine.heap.it.set_to false
-          return
-        end
-
-        return unless connects?
-
-        @engine.heap.it.set_to true
-      end
-
-      # ---------------------------------------------------------------------
-      #    DB functions (all database connections)
-      # ---------------------------------------------------------------------
-
-      #
-      # Open a connection and execute the SQL statement.
-      # Return the resulting data.
-      #
-      def query( sql, params = nil )
-        name = db_value
-        unless name
-          @engine.err DB_REQUIRED_ERR
-          return
-        end
-
-        db = SQLite3::Database.open name
-        # db.results_as_hash = true
-        results = db.query( sql, params )
-
-        return results
-      end
-
-      # 
-      # Based on the result set, build a QueryResult object.
-      # 
-      def get_query_result( result )
-        rows = []        
-        while ( row = result.next ) do
-          rows << row
-        end
-
-        return QueryResult.new( result.columns, rows )
-      end
-
-
-      # ---------------------------------------------------------------------
-      #    Private functions
-      # ---------------------------------------------------------------------
-
-      private
-
-      #
-      # Get the Database file from the child object.
-      # Returns nil if there is none.
-      #
-      def db_value
-        o = find_child DB
-        return nil unless o
-
-        return o.value
-      end
-
-      #
-      # Try the connection and make sure it works.
-      # Returns true if we can connect and do a query.
-      #
-      def connects?
-        begin
-          db = SQLite3::Database.open db_value
-          sql = "SELECT COUNT(name) FROM sqlite_master WHERE type='table'"
-          db.get_first_value sql
-        rescue => e
-          @engine.log_exception e
-          @engine.heap.it.set_to false
-          return false
-        end
-        return true
-      end
-
-    end
-  end
-end

data/lib/gloo/objs/data/table.rb

@@ -1,267 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# A data table.
-# The table container headers and data.
-#
-
-module Gloo
-  module Objs
-    class Table < Gloo::Core::Obj
-
-      KEYWORD = 'table'.freeze
-      KEYWORD_SHORT = 'tbl'.freeze
-      HEADERS = 'headers'.freeze
-      DATA = 'data'.freeze
-      CELLS = 'cells'.freeze
-      STYLES = 'styles'.freeze
-      ALWAYS_ROWS = 'always_rows'.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 list of headers.
-      # Returns nil if there is none.
-      #
-      def headers
-        o = find_child HEADERS
-        return [] unless o
-
-        return o.children.map( &:value )
-      end
-
-      #
-      # Always show rows, even if only 1 row is found.
-      #
-      def always_rows
-        o = find_child ALWAYS_ROWS
-
-        return false unless o
-        return o.value
-      end
-
-      #
-      # Get the list of column names.
-      # Returns nil if there is none.
-      #
-      def columns
-        o = find_child HEADERS
-        return [] unless o
-
-        return o.children.map( &:name )
-      end
-
-      #
-      # Get the list of data elements.
-      #
-      def data
-        o = find_child DATA
-        return [] unless o
-        
-        o = Gloo::Objs::Alias.resolve_alias( @engine, o )
-        return [] unless o
-        
-        if o.is_a? Gloo::Objs::Query
-          @engine.log.debug "Table getting data from query."
-          begin
-            result = o.run_query
-            return result
-          rescue => e
-            @engine.log_exception e
-            return nil
-          end
-        else
-          cols = self.columns
-
-          if o.children&.first.children.empty?
-            # It is a simgle row table.
-            rows = [ cols.map { |h| o.find_child( h )&.value } ]
-          else
-            rows = o.children.map do |e|
-              cols.map { |h| e.find_child( h )&.value }
-            end
-          end
-
-          return [ cols, rows ]
-        end
-      end
-
-      # 
-      # Get the styles for the table, if any.
-      # 
-      def styles
-        style_h = {} 
-        o = find_child STYLES
-        return style_h unless o
-        o = Gloo::Objs::Alias.resolve_alias( @engine, o )
-
-        o.children.each do |c|
-          style_h[ c.name ] = c.value
-        end
-
-        return style_h
-      end
-
-      # 
-      # Get cell renderer hash keyed by column name.
-      # 
-      def cell_renderers
-        h = {}
-        o = find_child CELLS
-        return h unless o
-
-        o.children.each do |c|
-          h[ c.name ] = c.value
-        end
-
-        return h
-      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_can HEADERS, self
-        fac.create_can DATA, self
-      end
-
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        return super + %w[show render]
-      end
-
-      #
-      # Show the table in the CLI.
-      #
-      def msg_show
-        title = self.value
-        @engine.platform.table.show headers, data[1], title
-      end
-
-      def msg_render
-        return render
-      end
-
-
-      # ---------------------------------------------------------------------
-      #    Render
-      # ---------------------------------------------------------------------
-
-      # 
-      # Render the table.
-      # The render_ƒ is 'render_html', 'render_text', 'render_json', etc.
-      # 
-      def render render_ƒ
-        begin
-          result = self.data
-          head = self.headers 
-          head = result[0] if head.empty?
-          rows = result[1]
-
-          columns = build_columns result[0]
-
-          params = { 
-            head: head, 
-            cols: result[0],
-            columns: columns,
-            rows: rows,
-            styles: self.styles,
-            cell_renderers: self.cell_renderers
-          }
-
-          if self.always_rows
-            params[ :always_rows ] = true
-          end
-
-          helper = Gloo::WebSvr::TableRenderer.new( @engine )
-          return helper.data_to_table params
-        rescue => e
-          @engine.log_exception e
-          return nil
-        end
-      end
-
-      # 
-      # Build the column list based on the result data and
-      # the headers defined in the table object.
-      # 
-      def build_columns result_data
-        head_children = find_child HEADERS
-        cell_renderers = find_child CELLS
-
-        columns = []
-        return columns unless result_data
-        
-        result_data.each_with_index do |c,index|
-          visible = true
-          name = c
-          title = c
-          display_index = index
-
-          if head_children
-            child = head_children.find_child c
-            if child
-              title = child.value
-              display_index = head_children.child_index( c )
-            else
-              visible = false
-            end
-          end
-
-          cell_renderer = nil
-          if cell_renderers
-            this_cr = cell_renderers.find_child( c )
-            cell_renderer = this_cr.value if this_cr
-          end
-
-          columns << { 
-            name: name, 
-            title: title, 
-            visible: visible, 
-            data_index: index,
-            display_index: display_index,
-            cell_renderer: cell_renderer
-          }
-        end
-        return columns.sort_by { |hsh| hsh[ :display_index ] }
-      end
-
-    end
-  end
-end

data/lib/gloo/objs/dev/git.rb

@@ -1,140 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# An object that interacts with a git repository
-#
-
-module Gloo
-  module Objs
-    class Git < Gloo::Core::Obj
-
-      KEYWORD = 'git_repo'.freeze
-      KEYWORD_SHORT = 'git'.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 path to the git repo (locally).
-      #
-      def path_value
-        return value
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        actions = %w[validate commit get_branch review]
-        changes = %w[check_changes get_changes]
-        return super + changes + actions
-      end
-
-      #
-      # Get the current working branch.
-      #
-      def msg_get_branch
-        branch = ''
-        path = path_value
-        if path_is_dir?( path )
-          branch = `cd #{path}; git rev-parse --abbrev-ref HEAD`
-          branch = branch.strip
-        end
-
-        @engine.heap.it.set_to branch
-      end
-
-      #
-      # Review pending changes.
-      #
-      def msg_review
-        @engine.log.debug 'Reviewing pending changes'
-        cmd = "cd #{path_value}; git diff"
-        @engine.log.debug cmd
-        system cmd
-      end
-
-      #
-      # Commit pending changes.
-      #
-      def msg_commit
-        msg = 'Commit'
-        path = path_value
-        if path_is_dir?( path )
-          if @params&.token_count&.positive?
-            expr = Gloo::Expr::Expression.new( @engine, @params.tokens )
-            msg = expr.evaluate
-          end
-          branch = `cd #{path}; git rev-parse --abbrev-ref HEAD`
-          branch = branch.strip
-          add = 'git add .'
-          cmt = 'git commit -m '
-          psh = 'git push origin '
-          `cd #{path};#{add};#{cmt}"#{msg}";#{psh}#{branch}`
-        end
-        @engine.heap.it.set_to msg
-      end
-
-      #
-      # Get the pending changes.
-      #
-      def msg_get_changes
-        path = path_value
-        result = `cd #{path}; git status -s` if path_is_dir?( path )
-        result ||= ''
-        @engine.heap.it.set_to result
-      end
-
-      #
-      # Is the given path non nil and is it a directory?
-      #
-      def path_is_dir?( path )
-        return path && File.directory?( path )
-      end
-
-      #
-      # Check to see if the repo has changes.
-      #
-      def msg_check_changes
-        result = false
-        path = path_value
-        if path_is_dir?( path )
-          data = `cd #{path}; git status -s`
-          result = true unless data.strip.empty?
-        end
-
-        @engine.heap.it.set_to result
-      end
-
-      #
-      # Check to make sure this is a valide git repo.
-      #
-      def msg_validate
-        result = false
-        path = path_value
-        if path_is_dir?( path )
-          pn = File.join( path, '.git' )
-          result = File.exist? pn
-        end
-
-        @engine.heap.it.set_to result
-      end
-
-    end
-  end
-end

data/lib/gloo/objs/dev/stats.rb

@@ -1,123 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# Get statistics about a development project.
-#
-
-module Gloo
-  module Objs
-    class Stats < Gloo::Core::Obj
-
-      KEYWORD = 'stats'.freeze
-      KEYWORD_SHORT = 'stat'.freeze
-      FOLDER = 'folder'.freeze
-      TYPES = 'types'.freeze
-      SKIP = 'skip'.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 path to the git repo (locally).
-      #
-      def path_value
-        o = find_child FOLDER
-        return o ? o.value : nil
-      end
-
-      #
-      # The code file types to count.
-      #
-      def types_value
-        o = find_child TYPES
-        return o ? o.value : ''
-      end
-
-      #
-      # Get the list of files and folders to skip.
-      #
-      def skip_list
-        o = find_child SKIP
-        val = o ? o.value : ''
-        return val.split ' '
-      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_file FOLDER, '', self
-        fac.create_string TYPES, '', self
-        fac.create_can SKIP, self
-      end
-
-      # ---------------------------------------------------------------------
-      #    Messages
-      # ---------------------------------------------------------------------
-
-      #
-      # Get a list of message names that this object receives.
-      #
-      def self.messages
-        all = %w[show_all]
-        more = %w[show_busy_folders show_types]
-        return super + all + more
-      end
-
-      #
-      # Show all project stats.
-      #
-      def msg_show_all
-        o = Gloo::Utils::Stats.new(
-          @engine, path_value, types_value, skip_list )
-        o.show_all
-      end
-
-      #
-      # Show file types.
-      #
-      def msg_show_types
-        o = Gloo::Utils::Stats.new(
-          @engine, path_value, types_value, skip_list )
-        o.file_types
-      end
-
-      #
-      # Show busy folders: those with the most files.
-      #
-      def msg_show_busy_folders
-        o = Gloo::Utils::Stats.new(
-          @engine, path_value, types_value, skip_list )
-        o.busy_folders
-      end
-
-    end
-  end
-end