lizarb 1.0.4 → 1.0.5

data/{app_new → examples/command/app}/dev/commands/narrative_method_command_test.rb

@@ -1,12 +1,11 @@
-class NarrativeMethodCommandTest < Liza::CommandTest
+class NarrativeMethodCommandTest < DevSystem::CommandTest
 
   test :subject_class do
     assert subject_class == NarrativeMethodCommand
   end
 
   test :settings do
-    assert subject_class.log_level == :normal
-    assert subject_class.log_color == :green
+    assert subject_class.log_level == 0
   end
 
   test :validate, :not_implemented do

data/{app_new → examples/command/app}/dev/commands/quadratic_command.rb

@@ -35,7 +35,7 @@ class QuadraticCommand < NarrativeMethodCommand
 
     @result = self.class.quadratic(@a, @b, @c)
     log "RESULT: #{@result}"
-    log render "success.txt"
+    log render(:success, format: :txt)
   end
 
 end

data/{app_new → examples/command/app}/dev/commands/quadratic_command_test.rb

@@ -5,8 +5,7 @@ class QuadraticCommandTest < NarrativeMethodCommandTest
   end
 
   test :settings do
-    assert subject_class.log_level == :normal
-    assert subject_class.log_color == :green
+    assert subject_class.log_level == 0
   end
 
   test :subject_class, :quadratic do

data/examples/command/app/dev_box.rb

@@ -0,0 +1,3 @@
+class DevBox < Liza::DevBox
+
+end

data/examples/log/app/dev/logs/logger_log.rb

@@ -0,0 +1,8 @@
+class LoggerLog < DevSystem::Log
+
+  # TODO: https://rubyapi.org/3.1/o/logger
+  def self.call(env)
+    #
+  end
+  
+end

data/examples/log/app/dev/logs/logger_log_test.rb

@@ -0,0 +1,16 @@
+class LoggerLogTest < DevSystem::LogTest
+
+  test :subject_class do
+    assert subject_class == LoggerLog
+  end
+
+  test_methods_defined do
+    on_self :call
+    on_instance
+  end
+
+  test :settings do
+    assert_equality subject_class.log_level, 0
+  end
+  
+end

data/examples/new/app/dev_box.rb

@@ -0,0 +1,67 @@
+class DevBox < DevSystem::DevBox
+
+  # Configure your bench panel
+
+  configure :bench do
+    
+  end
+
+  # Configure your command panel
+
+  configure :command do
+    short :b, :bench
+    short :g, :generate
+    short :i, :irb
+    short :l, :log
+    short :p, :pry
+    short :s, :shell
+    short :t, :test
+
+    # rescue_from declarations are checked bottom to top
+
+    # rescue_from(Exception)      { |rescuer| binding.irb } if $coding
+    # rescue_from(StandardError)  { |rescuer| binding.irb } if $coding
+
+    # uncomment below to override default setting to call NotFoundCommand
+    # rescue_from(CommandPanel::NotFoundError) { |rescuer| binding.irb } if $coding
+  end
+
+  # Configure your generator panel
+
+  configure :generator do
+    # rescue_from declarations are checked bottom to top
+
+    # rescue_from(Exception)      { |rescuer| binding.irb } if $coding
+    # rescue_from(StandardError)  { |rescuer| binding.irb } if $coding
+
+    # uncomment below to override default setting to call NotFoundGenerator
+    # rescue_from(GeneratorPanel::NotFoundError) { |rescuer| binding.irb } if $coding
+  end
+
+  # Configure your log panel
+
+  configure :log do
+    # handlers
+    handler :output
+
+    # rescue_from declarations are checked bottom to top
+
+    # rescue_from(Exception)      { |rescuer| binding.irb } if $coding
+    # rescue_from(StandardError)  { |rescuer| binding.irb } if $coding
+  end
+
+  # Configure your shell panel
+
+  configure :shell do
+    # formatters
+    formatter :html
+    formatter :html, :xml
+
+    # converters
+    converter :html, :md
+    converter :html, :haml
+    converter :js,   :coffee
+    converter :css,  :scss
+  end
+
+end

data/examples/new/app.rb

@@ -0,0 +1,41 @@
+# This is a LizaRB Application
+# Learn more: http://lizarb.org/
+
+# ENV["VERBOSE"] ||= "1"
+
+class App
+
+  # Choose your Application Directory
+
+  folder "app"
+
+  # Choose your level of log opacity
+
+  # log_boot :highest
+  # log_boot :higher
+  # log_boot :high
+  # log_boot :normal # default
+  # log_boot :low
+  # log_boot :lower
+  # log_boot :lowest
+
+  # Choose your level of log opacity
+
+  # log_level :highest
+  # log_level :higher
+  # log_level :high
+  # log_level :normal # default
+  # log_level :low
+  # log_level :lower
+  # log_level :lowest
+  
+  # Your mode is where you get global environment variables from
+
+  # mode :code # default
+  # mode :demo
+
+  # Systems help you organize your application's dependencies and RAM memory usage.
+
+  system :dev # default
+
+end

data/examples/shell/app/dev/shells/bash_adapter_shell.rb

@@ -0,0 +1,25 @@
+class BashAdapterShell < DevSystem::Shell
+  # class Error < Liza::Error; end
+  # class CustomError < Error; end
+
+  def self.query_something(args)
+    log "args = #{args.inspect}"
+    output = nil
+
+    output = KernelShell.call_backticks("echo '#{args.size}'")
+    log "output = #{output.inspect}"
+    
+    output
+  end
+
+  def self.execute_something(args)
+    log "args = #{args.inspect}"
+    it_worked = nil
+
+    it_worked = KernelShell.call_system("echo '#{args.size}'")
+    log "it_worked = #{it_worked.inspect}"
+    
+    it_worked
+  end
+
+end

data/examples/shell/app/dev/shells/bash_adapter_shell_test.rb

@@ -0,0 +1,23 @@
+class BashAdapterShellTest < DevSystem::ShellTest
+
+  test :subject_class do
+    assert_equality subject_class, BashAdapterShell
+  end
+
+  test :settings do
+    assert_equality subject_class.log_level, 0
+  end
+
+  test :query_something do
+    a = subject_class.query_something "some args"
+    b = "9\n"
+    assert_equality a, b
+  end
+
+  test :execute_something do
+    a = subject_class.execute_something "same args"
+    b = true
+    assert_equality a, b
+  end
+
+end

data/examples/shell/app/dev/shells/business_logic_shell.rb

@@ -0,0 +1,42 @@
+class BusinessLogicShell < DevSystem::Shell
+  # class Error < Liza::Error; end
+  # class CustomError < Error; end
+
+  # BusinessLogicShell.metric_bmi 70, 180
+
+  def self.metric_bmi(kilograms, centimenters)
+    log "kilograms = #{kilograms.inspect}"
+    log "centimenters = #{centimenters.inspect}"
+    bmi = nil
+
+    bmi = kilograms / ((centimenters / 100.0) ** 2)
+    log "bmi = #{bmi.inspect}"
+    
+    bmi
+  end
+
+  # BusinessLogicShell.imperial_bmi 154, 70
+
+  def self.imperial_bmi(pounds, inches)
+    log "pounds = #{pounds.inspect}"
+    log "inches = #{inches.inspect}"
+
+    kilograms = pounds_to_kilograms pounds
+    centimenters = inches_to_centimeters inches
+
+    metric_bmi kilograms, centimenters
+  end
+
+  # BusinessLogicShell.pounds_to_kilograms 154
+
+  def self.pounds_to_kilograms(pounds)
+    pounds * 0.45
+  end
+
+  # BusinessLogicShell.inches_to_centimeters 70
+
+  def self.inches_to_centimeters(inches)
+    inches * 2.54
+  end
+  
+end

data/examples/shell/app/dev/shells/business_logic_shell_test.rb

@@ -0,0 +1,39 @@
+class BusinessLogicShellTest < DevSystem::ShellTest
+
+  test :subject_class do
+    assert_equality subject_class, BusinessLogicShell
+  end
+
+  test :settings do
+    assert_equality subject_class.log_level, 0
+  end
+
+  #
+
+  test :metric_bmi do
+    a = subject_class.metric_bmi 100, 193
+    b = 26.85
+    assert_equality a.round(2), b
+  end
+
+  test :imperial_bmi do
+    a = subject_class.imperial_bmi 222, 76
+    b = 26.81
+    assert_equality a.round(2), b
+  end
+
+  #
+
+  test :pounds_to_kilograms do
+    a = subject_class.pounds_to_kilograms 222
+    b = 100
+    assert_equality a.round(0), b
+  end
+
+  test :inches_to_centimeters do
+    a = subject_class.inches_to_centimeters 76
+    b = 193
+    assert_equality a.round(0), b
+  end
+
+end

data/examples/shell/app/dev/shells/gem_adapter_shell.rb

@@ -0,0 +1,33 @@
+class GemAdapterShell < DevSystem::Shell
+  # class Error < Liza::Error; end
+  # class CustomError < Error; end
+
+  # GemAdapterShell.do_something "some args"
+
+  def self.do_something(args)
+    log "args = #{args.inspect}"
+    result = nil
+
+    # require "some_gem"
+    # result = SomeGem.do_something args
+    result = [:some, :result]
+    log "result = #{result.inspect}"
+    
+    result
+  end
+
+  # GemAdapterShell.do_something_else "some args"
+
+  def self.do_something_else(args)
+    log "args = #{args.inspect}"
+    result = nil
+
+    # require "some_gem"
+    # result = SomeGem.do_something_else args
+    result = {:some=>{:other=>:result}}
+    log "result = #{result.inspect}"
+    
+    result
+  end
+
+end

data/examples/shell/app/dev/shells/gem_adapter_shell_test.rb

@@ -0,0 +1,23 @@
+class GemAdapterShellTest < DevSystem::ShellTest
+
+  test :subject_class do
+    assert_equality subject_class, GemAdapterShell
+  end
+
+  test :settings do
+    assert_equality subject_class.log_level, 0
+  end
+
+  test :do_something do
+    a = subject_class.do_something "some args"
+    b = [:some, :result]
+    assert_equality a, b
+  end
+
+  test :do_something_else do
+    a = subject_class.do_something_else "same args"
+    b = {some: {other: :result}}
+    assert_equality a, b
+  end
+
+end

data/exe/liza

@@ -1,3 +1,8 @@
 #!/usr/bin/env ruby
 
-load "#{__dir__}/lizarb"
+is_mother_project = File.exist? "exe/lizarb"
+
+load \
+  is_mother_project \
+    ? "#{Dir.pwd}/exe/lizarb"
+    : "#{__dir__}/lizarb"

data/exe/lizarb

@@ -16,4 +16,4 @@ Lizarb.call
 
 App.call ARGV
 
-Lizarb.exit verbose: true
+Lizarb.exit

data/lib/app.rb

@@ -1,61 +1,69 @@
 class App
   class Error < StandardError; end
-  class SystemNotFound < Error; end
 
   #
 
   def self.log s
-    puts s.bold
-  end
-
-  def self.logv s
-    log s if $VERBOSE
+    puts s
   end
 
   # called from exe/lizarb
   def self.call argv
+    log "#{$boot_time.diff}s to boot" if defined? $log_boot_high
     puts
-    Liza[:DevBox][:command].call argv
+    args = argv.dup
+    argv.clear
+    Liza[:DevBox].command args
     puts
   end
 
-  def self.root
+  def self.cwd
     Pathname Dir.pwd
   end
 
-  # loaders
+  @root = cwd
 
-  @loaders = []
-  @mutex = Mutex.new
+  def self.root
+    @root
+  end
 
-  def self.loaders
-    @loaders
+  def self.filename
+    root.join "#{$APP}.rb"
   end
 
-  def self.reload &block
-    @mutex.synchronize do
-      @loaders.map &:reload
-      yield if block_given?
-    end
+  # folder
 
-    true
+  def self.folder folder = nil
+    raise "locked" if @locked
+    if folder
+      @folder = folder
+      @relative_path = Pathname(folder)
+      @path = Pathname("#{Lizarb::APP_DIR}/#{folder}")
+    else
+      @folder
+    end
   end
 
-  def self.load_all
-    Lizarb.load_all
+  def self.path
+    @path
   end
 
-  # modes
+  def self.relative_path
+    @relative_path or raise "@relative_path not set"
+  end
 
-  @modes = []
+  # mode
 
   def self.mode mode = nil
-    return $MODE if mode.nil?
-    @modes << mode.to_sym
+    if mode
+      @mode = mode.to_sym
+    else
+      @mode ||= (ENV["MODE"] || :code).to_sym
+    end
   end
 
-  def self.modes
-    @modes
+  def self.coding?
+    mode == :code
   end
 
   # systems
@@ -71,66 +79,55 @@ class App
     @systems
   end
 
-  def self.require_system key
-    t = Time.now
-    logv "App.system :#{key}"
-    require key
-    logv "App.system :#{key} takes #{t.diff}s"
-  rescue LoadError => e
-    def e.backtrace; []; end
-    raise SystemNotFound, "FILE #{key}.rb not found on $LOAD_PATH", []
-  end
+  # settings
 
-  # parts
-
-  def self.connect_part part_klass, key, system
-    t = Time.now
-    string = "CONNECTING PART #{part_klass.to_s.rjust 25}.part :#{key}"
-    logv string
-
-    klass = if system.nil?
-              Liza.const "#{key}_part"
-            else
-              Liza.const("#{system}_system")
-                  .const "#{key}_part"
-            end
+  def self.settings
+    @settings ||= {}
+  end
 
-    if klass.insertion
-      part_klass.class_exec(&klass.insertion)
-    end
+  def self.set key, value
+    settings[key] = value
+  end
 
-    if klass.extension
-      klass.const_set :Extension, Class.new(Liza::PartExtension)
-      klass::Extension.class_exec(&klass.extension)
-    end
-    logv "#{string} takes #{t.diff}s"
+  def self.get key
+    settings[key]
   end
 
-  # systems
+  # advanced settings
 
-  def self.connect_system key, system_klass
-    t = Time.now
+  DEFAULT_LOG_LEVEL = 4
 
-    color_system_klass = system_klass.to_s.colorize system_klass.log_color
+  LOG_LEVELS = {
+    :highest => 7,
+    :higher  => 6,
+    :high    => 5,
+    :normal  => 4,
+    :low     => 3,
+    :lower   => 2,
+    :lowest  => 1,
+  }
+  @log_boot = DEFAULT_LOG_LEVEL
+  set :log_level, DEFAULT_LOG_LEVEL
 
-    registrar_index = 0
-    system_klass.registrar.each do |string, target_block|
-      reg_type, _sep, reg_target = string.to_s.lpartition "_"
+  def self.log_boot level = nil
+    return @log_boot if level.nil?
+    level = LOG_LEVELS[level] if level.is_a? Symbol
+    raise Error, "invalid log level `#{level}`", caller unless LOG_LEVELS.values.include? level
 
-      registrar_index += 1
+    @log_boot = level
+  end
 
-      target_klass = Liza.const reg_target
+  def self.log_level level
+    level = LOG_LEVELS[level] if level.is_a? Symbol
+    raise Error, "invalid log level `#{level}`", caller unless LOG_LEVELS.values.include? level
 
-      if reg_type == "insertion"
-        target_klass.class_exec(&target_block)
-      else
-        raise "TODO: decide and implement system extension"
-      end
+    set :log_level, level
+  end
 
-      log "CONNECTING SYSTEM PART          #{color_system_klass}.#{reg_type} #{target_klass}"
+  # helpers
 
-    end
-    log "CONNECTING SYSTEM - #{t.diff}s for #{color_system_klass} to connect to #{registrar_index} system parts"
+  def self.global?
+    $APP == "app_global"
   end
 
 end

data/lib/art_system/art_box.rb

@@ -0,0 +1,5 @@
+class ArtSystem::ArtBox < Liza::Box
+  
+  #
+
+end

data/lib/art_system/art_box_test.rb

@@ -0,0 +1,8 @@
+class ArtSystem::ArtBoxTest < Liza::BoxTest
+  
+  test :subject_class, :subject do
+    assert_equality ArtSystem::ArtBox, subject_class
+    assert_equality ArtSystem::ArtBox, subject.class
+  end
+
+end

data/lib/art_system.rb

@@ -0,0 +1,8 @@
+class ArtSystem < Liza::System
+  class Error < Liza::Error; end
+
+  #
+
+  color :amethyst
+
+end

data/lib/crypto_system/crypto_box.rb

@@ -0,0 +1,5 @@
+class CryptoSystem::CryptoBox < Liza::Box
+  
+  #
+
+end

data/lib/crypto_system/crypto_box_test.rb

@@ -0,0 +1,8 @@
+class CryptoSystem::CryptoBoxTest < Liza::BoxTest
+  
+  test :subject_class, :subject do
+    assert_equality CryptoSystem::CryptoBox, subject_class
+    assert_equality CryptoSystem::CryptoBox, subject.class
+  end
+
+end

data/lib/crypto_system.rb

@@ -0,0 +1,8 @@
+class CryptoSystem < Liza::System
+  class Error < Liza::Error; end
+
+  #
+
+  color :jade
+
+end

data/lib/deep_system/deep_box.rb

@@ -0,0 +1,5 @@
+class DeepSystem::DeepBox < Liza::Box
+  
+  #
+
+end

data/lib/deep_system/deep_box_test.rb

@@ -0,0 +1,8 @@
+class DeepSystem::DeepBoxTest < Liza::BoxTest
+  
+  test :subject_class, :subject do
+    assert_equality DeepSystem::DeepBox, subject_class
+    assert_equality DeepSystem::DeepBox, subject.class
+  end
+
+end

data/lib/deep_system.rb

@@ -0,0 +1,8 @@
+class DeepSystem < Liza::System
+  class Error < Liza::Error; end
+
+  #
+
+  color :light_indigo
+
+end