gloo 0.7.6 → 1.0.0

data/lib/gloo/persist/file_loader.rb

@@ -1,191 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# Helper class used to load a file and create objects in the heap.
-#
-
-module Gloo
-  module Persist
-    class FileLoader
-
-      BEGIN_BLOCK = 'BEGIN'.freeze
-      END_BLOCK = 'END'.freeze
-      SPACE_CNT = 2
-
-      attr_reader :obj
-
-      #
-      # Set up a file storage for an object.
-      #
-      def initialize( pn )
-        @pn = pn
-        @tabs = 0
-        @obj = nil
-        @in_multiline = false
-        @exiting_multiline = false
-        @in_block = false
-        @block_value = ''
-        @debug = false
-      end
-
-      #
-      # Load the objects from the file.
-      #
-      def load
-        unless File.exist?( @pn )
-          $log.error "File '#{@pn}' does not exist."
-          return
-        end
-
-        $log.debug "Loading file '#{@pn}'"
-        @tabs = 0
-        @parent_stack = []
-        @parent = $engine.heap.root
-        @parent_stack.push @parent
-        f = File.open( @pn, 'r' )
-        f.each_line do |line|
-          next if skip_line? line
-
-          handle_one_line line
-        end
-      end
-
-      #
-      # Process one one of the file we're loading.
-      #
-      def handle_one_line( line )
-        if line.strip.end_with? BEGIN_BLOCK
-          @in_block = true
-          @save_line = line
-        elsif @in_block
-          if line.strip == END_BLOCK
-            @in_block = false
-            determine_indent @save_line
-            process_line @save_line
-          else
-            @block_value << line
-          end
-        else
-          determine_indent line
-          process_line line
-        end
-      end
-
-      #
-      # Is this line a comment or a blank line?
-      # If so we'll skip it.
-      #
-      def skip_line?( line )
-        line = line.strip
-        return true if line.empty?
-        return true if line[ 0 ] == '#'
-
-        return false
-      end
-
-      #
-      # Determine the relative indent level for the line.
-      #
-      def determine_indent( line )
-        tabs = tab_count( line )
-        @indent = 0 # same level as prior line
-        if tabs > @tabs # indent
-          # TODO:  What if indent is more than one more level?
-          @tabs = tabs
-          @indent = 1
-        elsif tabs < @tabs # outdent
-          diff = @tabs - tabs
-          @tabs -= diff
-          @indent -= diff
-        end
-        puts "tabs: #{@tabs}, indent: #{@indent}, line: #{line}" if @debug
-      end
-
-      #
-      # Process one line and add objects.
-      #
-      def process_line( line )
-        # reset multiline unless we're actually indented
-        if @in_multiline && @multi_indent > @indent
-          puts "Done multiline mi: #{@multi_indent}, i: #{@indent}" if @debug
-          @in_multiline = false
-          @exiting_multiline = true
-        end
-
-        if @in_multiline
-          @last.add_line line
-        else
-          setup_process_obj_line
-          process_obj_line line
-        end
-      end
-
-      #
-      # Setup and get ready to process an object line.
-      #
-      def setup_process_obj_line
-        if @exiting_multiline
-          @exiting_multiline = false
-          @indent += 1
-        end
-
-        if @indent.positive?
-          @parent = @last
-          @parent_stack.push @parent
-        elsif @indent.negative?
-          @indent.abs.times do
-            @parent_stack.pop
-            @parent = @parent_stack.last
-          end
-        end
-      end
-
-      #
-      # Process one line and add objects.
-      #
-      def process_obj_line( line )
-        name, type, value = split_line( line )
-        unless @block_value == ''
-          value = @block_value
-          @block_value = ''
-        end
-        params = { name: name, type: type, value: value, parent: @parent }
-        @last = $engine.factory.create( params )
-
-        if value.empty? && @last&.multiline_value?
-          @multi_indent = 0
-          @in_multiline = true
-          puts "*** Start multiline. multi_indent: #{@multi_indent}" if @debug
-        end
-
-        @obj = @last if @obj.nil?
-      end
-
-      #
-      # Get the number of leading tabs.
-      #
-      def tab_count( line )
-        i = 0
-
-        if line[ i ] == ' '
-          i += 1 while line[ i ] == ' '
-          tab_equiv = ( i / SPACE_CNT ).to_i
-          puts "Found #{i} spaces => #{tab_equiv}" if @debug
-          return tab_equiv
-        end
-
-        i += 1 while line[ i ] == "\t"
-        return i
-      end
-
-      #
-      # Split the line into 3 parts.
-      #
-      def split_line( line )
-        o = LineSplitter.new( line, @tabs )
-        return o.split
-      end
-
-    end
-  end
-end

data/lib/gloo/persist/file_saver.rb

@@ -1,49 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# Helper class used to save an object to a file..
-#
-
-module Gloo
-  module Persist
-    class FileSaver
-
-      #
-      # Set up a file storage for an object.
-      #
-      def initialize( pn, obj )
-        @pn = pn
-        @obj = obj
-      end
-
-      #
-      # Save the object to the file.
-      #
-      def save
-        data = get_obj( @obj )
-        File.write( @pn, data )
-      end
-
-      #
-      # Get string of tabs for indentation.
-      #
-      def tabs( indent = 0 )
-        return "\t" * indent
-      end
-
-      #
-      # Convert an object to textual representation.
-      # This is a recursive function.
-      #
-      def get_obj( obj, indent = 0 )
-        t = tabs( indent )
-        str = "#{t}#{obj.name} [#{obj.type_display}] : #{obj.value_display}\n"
-        obj.children.each do |child|
-          str << get_obj( child, indent + 1 )
-        end
-        return str
-      end
-
-    end
-  end
-end

data/lib/gloo/persist/file_storage.rb

@@ -1,45 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# Helper class takes an object and writes it to a file.
-#
-
-module Gloo
-  module Persist
-    class FileStorage
-
-      attr_reader :obj, :pn
-
-      #
-      # Set up a file storage for an object.
-      #
-      def initialize( pn, obj = nil )
-        @obj = obj
-        @pn = pn
-      end
-
-      #
-      # Save the object to the file.
-      #
-      def save
-        fs = FileSaver.new @pn, @obj
-        fs.save
-      end
-
-      #
-      # Load the object from the file.
-      #
-      def load
-        fl = FileLoader.new @pn
-        fl.load
-        @obj = fl.obj
-        if @obj
-          $log.debug "Loaded object: #{@obj.name}"
-        else
-          $log.error "Error loading file at #{@pn}"
-        end
-      end
-
-    end
-  end
-end

data/lib/gloo/persist/line_splitter.rb

@@ -1,81 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# Helper class used as part of file loading.
-# It is responsible for splitting a line into components.
-#
-
-module Gloo
-  module Persist
-    class LineSplitter
-
-      BEGIN_BLOCK = 'BEGIN'.freeze
-      END_BLOCK = 'END'.freeze
-
-      attr_reader :obj
-
-      #
-      # Set up a line splitter
-      #
-      def initialize( line, tabs )
-        @line = line
-        @tabs = tabs
-      end
-
-      #
-      # Split the line into 3 parts.
-      #
-      def split
-        detect_name
-        detect_type
-        detect_value
-
-        return @name, @type, @value
-      end
-
-      #
-      # Detect the object name.
-      #
-      def detect_name
-        @line = @line.strip
-        @idx = @line.index( ' ' )
-        @name = @line[ 0..@idx - 1 ]
-      end
-
-      #
-      # Detect the object type.
-      #
-      def detect_type
-        @line = @line[ @idx + 1..-1 ]
-        @idx = @line.index( ' ' )
-
-        if @line[ 0 ] == ':'
-          @type = 'untyped'
-          return
-        end
-
-        @type = @line[ 0..( @idx ? @idx - 1 : -1 ) ]
-        @type = @type[ 1..-1 ] if @type[ 0 ] == '['
-        @type = @type[ 0..-2 ] if @type[ -1 ] == ']'
-      end
-
-      #
-      # Detect the object value.
-      # Use nil if there is no value specified.
-      #
-      def detect_value
-        if @idx
-          @value = @line[ @idx + 1..-1 ]
-          if @value[ 0..1 ] == ': '
-            @value = @value[ 2..-1 ]
-          elsif @value[ 0 ] == ':'
-            @value = @value[ 1..-1 ]
-          end
-        else
-          @value = nil
-        end
-      end
-
-    end
-  end
-end

data/lib/gloo/persist/persist_man.rb

@@ -1,120 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2019 Eric Crane.  All rights reserved.
-#
-# The persistance manager.
-# Keeps a collection of object-file mappings, and then
-# uses mappings to know how/where to save updated objects.
-#
-
-module Gloo
-  module Persist
-    class PersistMan
-
-      attr_reader :maps
-
-      #
-      # Contructor for the persistence manager.
-      #
-      def initialize
-        @maps = []
-      end
-
-      #
-      # Save one object to the file.
-      #
-      def save( name = '' )
-        if name.nil? || name.strip.empty?
-          save_all
-        else
-          save_one name
-        end
-      end
-
-      #
-      # Save one object to the file.
-      #
-      def save_all
-        @maps.each( &:save )
-      end
-
-      #
-      # Save one object to the file.
-      #
-      def save_one( name )
-        ref = Gloo::Core::Pn.new name
-        obj = ref.resolve
-        pn = get_full_path_name name
-        fs = Gloo::Persist::FileStorage.new( pn, obj )
-        fs.save
-      end
-
-      #
-      # Load the object from the file.
-      #
-      def load( name )
-        pns = get_full_path_names name
-        return unless pns
-
-        pns.each do |pn|
-          $log.debug "Load file(s) at: #{pn}"
-          fs = Gloo::Persist::FileStorage.new( pn )
-          fs.load
-          @maps << fs
-          $engine.event_manager.on_load fs.obj
-        end
-      end
-
-      #
-      # Get the full path and name of the file.
-      #
-      def get_full_path_names( name )
-        return nil if name.strip.empty?
-
-        if name.strip[ -1 ] == '*'
-          pns = []
-          dir = File.join( $settings.project_path, name[ 0..-2 ] )
-          Dir.glob( "#{dir}*.gloo" ).each do |f|
-            pns << f
-          end
-          return pns
-        else
-          ext_path = File.expand_path( name )
-          return [ ext_path ] if self.gloo_file?( ext_path )
-
-          full_name = "#{name}#{file_ext}"
-          return [ File.join( $settings.project_path, full_name ) ]
-        end
-      end
-
-      #
-      # Check to see if a given path name refers to a gloo object file.
-      #
-      def gloo_file?( name )
-        return false unless name
-        return false unless File.exist?( name )
-        return false unless File.file?( name )
-        return false unless name.end_with?( self.file_ext )
-
-        return true
-      end
-
-      #
-      # Get the default file extention.
-      #
-      def file_ext
-        return '.gloo'
-      end
-
-      #
-      # Print out all object - persistance mappings.
-      # This is a debugging tool.
-      #
-      def show_maps
-        @maps.each do |o|
-          puts " \t #{o.pn} \t #{o.obj.name}"
-        end
-      end
-
-    end
-  end
-end

data/lib/gloo/utils/format.rb

@@ -1,21 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# Formatting utilities
-#
-
-module Gloo
-  module Utils
-    class Format
-
-      #
-      # Format number, adding comma separators.
-      # Ex: 1000 -> 1,000
-      #
-      def self.number( num )
-        return num.to_s.reverse.scan( /.{1,3}/ ).join( ',' ).reverse
-      end
-
-    end
-  end
-end

data/lib/gloo/utils/stats.rb

@@ -1,205 +0,0 @@
-# Author::    Eric Crane  (mailto:eric.crane@mac.com)
-# Copyright:: Copyright (c) 2020 Eric Crane.  All rights reserved.
-#
-# Utilities related to words (strings).
-#
-
-module Gloo
-  module Utils
-    class Stats
-
-      DIR_NOT_FOUND_ERR = 'The folder was not found!'.freeze
-
-      # ---------------------------------------------------------------------
-      #    Setup
-      # ---------------------------------------------------------------------
-
-      #
-      # Create a stats utility class for the given directory.
-      #
-      def initialize( dir, types, skip = [] )
-        @dir = dir
-        setup_loc types
-        @skip = skip
-      end
-
-      # ---------------------------------------------------------------------
-      #    Public Functions
-      # ---------------------------------------------------------------------
-
-      #
-      # Is the stats utility valid?
-      # Does it have a valid root directory.
-      #
-      def valid?
-        return true if @dir && File.directory?( @dir )
-
-        $engine.err DIR_NOT_FOUND_ERR
-        $engine.heap.it.set_to false
-
-        return false
-      end
-
-      #
-      # Show all stat data for the project.
-      #
-      def show_all
-        return unless valid?
-
-        generate
-        puts "Showing All stats for #{@dir}".white
-        puts "\n ** #{@dir_cnt} Total Folders ** "
-        puts " ** #{@file_cnt} Total Files ** "
-
-        busy_folders( 7 )
-        file_types
-        loc
-      end
-
-      #
-      # Get a list of the busiest folders.
-      # Count is how many results we want.
-      #
-      def busy_folders( count = 17 )
-        return unless valid?
-
-        generate
-        puts "\nBusy Folders:".yellow
-
-        @folders.sort! { |a, b| a[ :cnt ] <=> b[ :cnt ] }
-        @folders.reverse!
-        @folders[ 0..count ].each do |f|
-          puts "  #{f[ :cnt ]} - #{f[ :name ]}"
-        end
-      end
-
-      #
-      # Show file types and how many of each there are.
-      #
-      def file_types
-        return unless valid?
-
-        generate
-        puts "\nFiles by Type:".yellow
-
-        @types = @types.sort_by( &:last )
-        @types.reverse!
-        @types.each do |o|
-          puts "  #{o[ 1 ]} - #{o[ 0 ]}" unless o[ 0 ].empty?
-        end
-      end
-
-      #
-      # Show Lines of Code
-      #
-      def loc
-        return unless valid?
-
-        generate
-        total = 0
-
-        @loc.each do |k, v|
-          puts "\n #{k} Lines of Code".yellow
-          total += v[ :lines ]
-          formatted = Gloo::Utils::Format.number( v[ :lines ] )
-          puts " ** #{formatted} in #{v[ :files ].count} #{k} files ** "
-
-          puts "\n Busy #{k} files:".yellow
-          files = v[ :files ].sort! { |a, b| a[ :lines ] <=> b[ :lines ] }
-          files.reverse!
-          files[ 0..12 ].each do |f|
-            puts "  #{f[ :lines ]} - #{f[ :file ]}"
-          end
-        end
-
-        formatted = Gloo::Utils::Format.number( total )
-        puts "\n #{formatted} Total Lines of Code".white
-      end
-
-      # ---------------------------------------------------------------------
-      #    Private Functions
-      # ---------------------------------------------------------------------
-
-      #
-      # Setup counters for lines of code by file type.
-      def setup_loc( types )
-        @loc = {}
-
-        types.split( ' ' ).each do |t|
-          @loc[ t ] = { lines: 0, files: [] }
-        end
-      end
-
-      #
-      # Generate stat data unless we've already done so.
-      #
-      def generate
-        return if @folders
-
-        $log.debug 'Generating...'
-        @folders = []
-        @types = {}
-        @file_cnt = 0
-        @dir_cnt = 0
-
-        generate_for Pathname.new( @dir )
-      end
-
-      #
-      # Generate data for the given path.
-      # NOTE: this is a recursive function.
-      # It traverses all sub-direcctories.
-      #
-      def generate_for( path )
-        return if @skip.include?( File.basename( path ) )
-
-        cnt = 0
-        path.children.each do |f|
-          if f.directory?
-            @dir_cnt += 1
-            generate_for( f )
-          else
-            @file_cnt += 1
-            cnt += 1
-            handle_file( f )
-            inc_type( File.extname( f ) )
-          end
-        end
-        @folders << { name: path, cnt: cnt }
-      end
-
-      #
-      # Increment the file count.
-      #
-      def inc_type( type )
-        if @types[ type ]
-          @types[ type ] += 1
-        else
-          @types[ type ] = 1
-        end
-      end
-
-      #
-      # Consider code file types.
-      #
-      def handle_file( file )
-        ext = File.extname( file )
-        return unless ext
-
-        ext = ext[ 1..-1 ]
-        return unless @loc.key?( ext )
-
-        lines = count_lines( file )
-        @loc[ ext ][ :lines ] += lines
-        @loc[ ext ][ :files ] << { lines: lines, file: file }
-      end
-
-      #
-      # Count lines of code in file.
-      def count_lines( file )
-        return `wc -l #{file}`.split.first.to_i
-      end
-
-    end
-  end
-end