lizarb 1.0.0 → 1.0.1

data/lib/dev_system/dev/controllers/bench_dsl_main_part.rb

@@ -0,0 +1,60 @@
+class DevSystem
+  class BenchDslMainPart < Liza::Part
+
+    insertion do
+
+      def self.call args
+        log :higher, "Called #{self}.#{__method__} with args #{args}"
+
+        # https://rubyapi.org/3.1/o/benchmark
+        require "benchmark"
+
+        if @setup_bl
+          log "Setting up..."
+          instance_exec &@setup_bl
+          log "Set up"
+        end
+
+        log "Benchmarking #{marks.count} Ruby Blocks"
+        puts
+
+        length = marks.keys.map(&:length).max
+
+        marks.each do |label, bl|
+          log "Benchmarking #{label}"
+          marks[label] = Benchmark.measure label, &bl
+        end
+
+        puts
+
+        log "#{"Reporting".ljust_blanks(length + 17)} App CPU Time   Kernel CPU Time    Total CPU Time"
+        puts
+
+        sorted = marks.sort_by { |_k, tms| tms.total }.to_h
+
+        sorted.each.with_index do |(label, tms), i|
+          tms = tms.format "%10.6u     %10.6y         %10.6t"
+          s = "[#{i.next.to_s.rjust_zeroes 2}/#{marks.count.to_s.rjust_zeroes 2}]      #{label.rjust_blanks length}   #{tms}"
+
+          s = s.green if i == 0
+          s = s.red if i == marks.count-1
+          log s
+        end
+        puts
+        log "Done"
+      end
+
+      #
+
+      def self.marks()= @marks ||= {}
+
+      def self.mark(label, &block)= marks[label] = block
+
+      def self.setup &block
+        @setup_bl = block if block_given?
+      end
+
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/bench_test.rb

@@ -0,0 +1,14 @@
+class DevSystem
+  class BenchTest < Liza::ControllerTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::Bench
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/command/bench_command.rb

@@ -0,0 +1,24 @@
+class DevSystem
+  class BenchCommand < Command
+
+    def self.call args
+      # 1. LOG
+
+      log :higher, "args: #{args}"
+      puts
+
+      # 2. FIND bench
+
+      bench = args[0]
+
+      log({bench:})
+
+      bench_klass = Liza.const "#{bench}_bench"
+
+      # 3. CALL
+
+      bench_klass.call args[1..-1]
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/command/bench_command_test.rb

@@ -0,0 +1,14 @@
+class DevSystem
+  class BenchCommandTest < CommandTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::BenchCommand
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/command/dev_command.rb

@@ -2,17 +2,22 @@ class DevSystem
   class DevCommand < Command
 
     def self.call args
-      log :higher, "Called #{self} with args #{args}"
+      # 1. LOG
 
-      # https://github.com/ruby/ruby/blob/master/lib/irb.rb
-      require "irb"
+      log :higher, "args: #{args}"
+      puts
 
-      IRB.setup(nil)
-      workspace = IRB::WorkSpace.new(binding)
-      irb = IRB::Irb.new(workspace)
-      IRB.conf[:MAIN_CONTEXT] = irb.context
+      # 2. FIND terminal
 
-      irb.eval_input
+      terminal = args[0] || "irb"
+
+      log({terminal:})
+
+      terminal_klass = Liza.const "#{terminal}_terminal"
+
+      # 3. CALL
+
+      terminal_klass.call Array(args[1..-1])
     end
 
   end

data/lib/dev_system/dev/controllers/command/generate_command.rb

@@ -0,0 +1,23 @@
+class DevSystem
+  class GenerateCommand < Command
+
+    def self.call args
+      # 1. LOG
+
+      log :higher, "args: #{args}"
+      puts
+
+      # 2. FIND generator
+
+      generator = args[0]
+
+      log({generator:})
+
+      generator_klass = Liza.const "#{generator}_generator"
+
+      # 3. CALL
+
+      generator_klass.call args[1..-1]
+    end
+  end
+end

data/lib/dev_system/dev/controllers/command/generate_command_test.rb

@@ -0,0 +1,14 @@
+class DevSystem
+  class GenerateCommandTest < CommandTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::GenerateCommand
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/generator.rb

@@ -0,0 +1,11 @@
+class DevSystem
+  class Generator < Liza::Controller
+
+    # DSLS
+
+    def self.main_dsl
+      part :"generator_dsl_main", system: :dev
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/generator_dsl_main_part.rb

@@ -0,0 +1,54 @@
+class DevSystem
+  class GeneratorDslMainPart < Liza::Part
+
+    insertion do
+
+      def self.call args
+        log :higher, "Called #{self}.#{__method__} with args #{args}"
+
+        name = args.shift || raise("args[0] should contain NAME")
+        name = name.downcase
+
+        memo.each do |label, bl|
+          log "Generating #{label}"
+          g = new label, name, args
+          g.instance_exec &bl
+          g.call
+        end
+
+        puts
+        log "done"
+      end
+
+      def self.memo()= @memo ||= {}
+
+      def self.generate(label, &block)= memo[label] = block
+
+      attr_reader :label, :name, :args
+
+      def initialize label, name, args
+        @label, @name, @args = label, name, args
+      end
+
+      def call
+        FileShell.write folder, filename, content
+      end
+
+      %w|folder filename content|.each do |s|
+        class_eval <<-CODE, __FILE__, __LINE__ + 1
+          attr_reader :#{s}
+
+          def #{s} #{s} = nil
+            if #{s}
+              @#{s} = #{s}
+            else
+              @#{s}
+            end
+          end
+        CODE
+      end
+
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/generator_test.rb

@@ -0,0 +1,14 @@
+class DevSystem
+  class GeneratorTest < Liza::ControllerTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::Generator
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/generators/app_generator.rb

@@ -0,0 +1,71 @@
+class DevSystem
+  class AppGenerator < Generator
+
+    def self.call args
+      log :higher, "Called #{self}.#{__method__} with args #{args}"
+
+      # setup
+
+      name = args.shift || "app_1"
+
+      from = "#{Lizarb::APP_DIR}/app_new"
+      to = name
+
+      return log "Directory #{to.light_green} already exists." if Dir.exist? to
+
+      log "Liza Application initializing at `#{to}`"
+
+      # init
+
+      require "fileutils"
+      FileUtils.cp_r from, to, verbose: true
+
+      `cd #{to}; git init .`
+
+      # extra
+
+      puts
+
+      FileShell.gitkeep "#{to}/lib"
+      FileShell.gitkeep "#{to}/tmp"
+
+      FileShell.create_folder "#{to}/app"
+
+      # systems
+
+      App.systems.keys.each { |system_name| copy to, system_name }
+
+      FileUtils.rm "#{to}/app/dev/commands/new_command.rb"
+      FileUtils.rm "#{to}/app/dev/commands/new_command_test.rb"
+
+      FileUtils.cp_r "#{Lizarb::APP_DIR}/.ruby-version", "#{to}/.ruby-version", verbose: true
+      FileUtils.cp_r "#{Lizarb::APP_DIR}/README.md", "#{to}/README.md", verbose: true
+      FileUtils.cp_r "#{Lizarb::APP_DIR}/app.rb", "#{to}/app.rb", verbose: true
+      FileUtils.cp_r "#{Lizarb::APP_DIR}/app.env", "#{to}/app.env", verbose: true
+      FileUtils.cp_r "#{Lizarb::APP_DIR}/app.code.env", "#{to}/app.code.env", verbose: true
+
+      puts
+
+      log "Liza Application initialized at `#{to}`"
+    end
+
+    def self.copy name, system_name
+      from = "#{Lizarb::APP_DIR}/app/#{system_name}_box.rb"
+      to = "#{name}/app"
+      if File.exist? from
+        FileUtils.cp_r from, to, verbose: true
+      else
+        puts "file not found #{from}"
+      end
+
+      from = "#{Lizarb::APP_DIR}/app/#{system_name}"
+      to = "#{name}/app"
+      if File.exist? from
+        FileUtils.cp_r from, to, verbose: true
+      else
+        puts "file not found #{from}"
+      end
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/generators/app_generator_test.rb

@@ -0,0 +1,14 @@
+class DevSystem
+  class AppGeneratorTest < GeneratorTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::AppGenerator
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/shell/file_shell.rb

@@ -0,0 +1,29 @@
+class DevSystem
+  class FileShell < Shell
+    require "fileutils"
+
+    def self.create_folder folder, write_log = true
+      log "Creating folder #{folder}" if write_log
+      FileUtils.mkdir_p folder
+    end
+
+    def self.write folder, filename, content
+      create_folder folder, false
+      fname = "#{folder}/#{filename}"
+      log "Writing #{fname} with #{content.size} bytes"
+      File.write fname, content
+    end
+
+    def self.touch folder, filename
+      create_folder folder, false
+      fname = "#{folder}/#{filename}"
+      log "Touching #{fname}"
+      FileUtils.touch fname
+    end
+
+    def self.gitkeep folder
+      touch folder, ".gitkeep"
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/shell/file_shell_test.rb

@@ -0,0 +1,14 @@
+class DevSystem
+  class FileShellTest < ShellTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::FileShell
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/shell.rb

@@ -0,0 +1,19 @@
+class DevSystem
+  class Shell < Liza::Controller
+    def windows?
+      RUBY_PLATFORM =~ /win32/
+    end
+
+    def unix?
+      linux? || mac?
+    end
+
+    def linux?
+      RUBY_PLATFORM =~ /linux/
+    end
+
+    def mac?
+      RUBY_PLATFORM =~ /darwin/
+    end
+  end
+end

data/lib/dev_system/dev/controllers/shell_test.rb

@@ -0,0 +1,13 @@
+class DevSystem
+  class ShellTest < Liza::ControllerTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::Shell
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+  end
+end

data/lib/dev_system/dev/controllers/terminal/irb_terminal.rb

@@ -0,0 +1,19 @@
+class DevSystem
+  class IrbTerminal < Terminal
+
+    def self.call args
+      log :higher, "Called #{self}.#{__method__} with args #{args}"
+
+      # https://github.com/ruby/ruby/blob/master/lib/irb.rb
+      require "irb"
+
+      IRB.setup(nil)
+      workspace = IRB::WorkSpace.new(binding)
+      irb = IRB::Irb.new(workspace)
+      IRB.conf[:MAIN_CONTEXT] = irb.context
+
+      irb.eval_input
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/terminal/irb_terminal_test.rb

@@ -0,0 +1,14 @@
+class DevSystem
+  class IrbTerminalTest < TerminalTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::IrbTerminal
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/terminal/pry_terminal.rb

@@ -0,0 +1,12 @@
+class DevSystem
+  class PryTerminal < Terminal
+
+    def self.call args
+      log :higher, "Called #{self}.#{__method__} with args #{args}"
+
+      require "pry"
+      Pry.start
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/terminal/pry_terminal_test.rb

@@ -0,0 +1,14 @@
+class DevSystem
+  class PryTerminalTest < TerminalTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::PryTerminal
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+
+  end
+end

data/lib/dev_system/dev/controllers/terminal.rb

@@ -0,0 +1,19 @@
+class DevSystem
+  class Terminal < Liza::Controller
+
+    # def self.call args
+    #   new.call args
+    # end
+
+    # def initialize args
+    #   @args = args
+    # end
+
+    # attr_reader :args
+
+    # def call args
+    #
+    # end
+
+  end
+end

data/lib/dev_system/dev/controllers/terminal_test.rb

@@ -0,0 +1,14 @@
+class DevSystem
+  class TerminalTest < Liza::ControllerTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::Terminal
+    end
+
+    test :settings do
+      assert subject_class.log_level == :normal
+      assert subject_class.log_color == :green
+    end
+
+  end
+end

data/lib/dev_system/dev/dev_box.rb

@@ -2,6 +2,9 @@ class DevSystem
   class DevBox < Liza::Box
     has_panel :command, :commands
     has_controller :command, :commands
+    has_controller :shell, :commands
+    has_controller :bench, :commands
+    has_controller :terminal, :commands
 
     has_panel :log, :logs
 

data/lib/liza/test_parts/test_subject_part.rb

@@ -3,7 +3,12 @@ module Liza
 
     insertion do
       def self.subject_class
-        @subject_class ||= Liza::const name[0..-5]
+        @subject_class ||=
+          if first_namespace == "Liza"
+            Liza.const_get last_namespace[0..-5]
+          else
+            Object.const_get name[0..-5]
+          end
       end
 
       def subject_class

data/lib/liza.rb

@@ -13,22 +13,50 @@ module Liza
 
   #
 
-  # After checking the top-level namespace, looks up the Liza namespace
+  # Checks Object, each system, then Liza for Liza::Unit classes
   def const name
-    name = name.to_s.camelize
+    name = name.to_s.camelize.to_sym
 
-    return Object.const_get name if Object.const_defined? name
+    k = const_check_object name
+    return k if k
 
-    const_get name
+    k = const_check_systems name
+    return k if k
+
+    k = const_get name
+    return k if k
+
+    nil
   end
 
-  # constants missing from Liza will be looked up in all systems
+  # Checks each system, then Liza for Liza::Unit classes
   def const_missing name
+    k = const_check_systems name
+    return k if k
+
+    super
+  end
+
+  def const_check_object name
+    return if not Object.const_defined? name
+    kk = Object.const_get name
+    return kk if is_unit? kk
+
+    nil
+  end
+
+  def const_check_systems name
     for k in App.systems.values.reverse
-      return k.const_get(name) if k.const_defined? name
+      next if not k.const_defined? name.to_sym
+      kk = k.const(name) if k.constants.include? name
+      return kk if is_unit? kk
     end
 
-    super
+    nil
+  end
+
+  def is_unit? kk
+    kk && kk < Liza::Unit
   end
 
 end

data/lib/lizarb/ruby/class.rb

@@ -1,6 +1,8 @@
 # frozen_string_literal: true
 
 class Class
+  public :eval
+
   def descendants
     ObjectSpace.each_object(Class).select { |klass| klass < self }
   end

data/lib/lizarb/ruby/proc.rb

@@ -0,0 +1,12 @@
+# frozen_string_literal: true
+
+class Proc
+  def relative_source
+    absolute_source.gsub "#{Lizarb::APP_DIR}/", ""
+  end
+
+  def absolute_source
+    sl = source_location
+    "#{sl[0]}:#{sl[1]}"
+  end
+end

data/lib/lizarb/ruby/string.rb

@@ -6,4 +6,20 @@ class String
   def camelize
     split("_").map { |s| "#{s[0].upcase}#{s[1..-1]}" }.join("")
   end
+
+  def rjust_blanks length
+    rjust length, " "
+  end
+
+  def rjust_zeroes length
+    rjust length, "0"
+  end
+
+  def ljust_blanks length
+    ljust length, " "
+  end
+
+  def ljust_zeroes length
+    ljust length, "0"
+  end
 end

data/lib/lizarb/version.rb

@@ -1,5 +1,5 @@
 # frozen_string_literal: true
 
 module Lizarb
-  VERSION = "1.0.0"
+  VERSION = "1.0.1"
 end