lizarb 1.0.1 → 1.0.2

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

@@ -1,29 +1,59 @@
-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
+class DevSystem::FileShell < DevSystem::Shell
 
+  def self._raise_if_blank path
+    raise ArgumentError, "Path is required" if path.nil? || path.to_s.empty?
   end
+
+  def self._raise_if_not_exists path
+    raise ArgumentError, "File does not exist at '#{path}'" unless exist? path
+  end
+
+  #
+
+  def self.exist? path
+    log :normal, "Checking if file exists at '#{path}'"
+    _raise_if_blank path
+
+    File.exist? path
+  end
+
+  def self.size path
+    log :normal, "Getting size of file at '#{path}'"
+    _raise_if_not_exists path
+
+    File.size path
+  end
+
+  #
+
+  def self.directory? path
+    log :normal, "Checking if '#{path}' is a directory"
+    _raise_if_blank path
+
+    File.directory? path
+  end
+
+  def self.file? path
+    log :normal, "Checking if '#{path}' is a file"
+    _raise_if_blank path
+
+    File.file? path
+  end
+
+  #
+
+  def self.touch path
+    log :normal, "Touching '#{path}'"
+    _raise_if_blank path
+
+    dir = File.dirname(path)
+    DevSystem::DirShell.create dir
+
+    FileUtils.touch path
+  end
+
+  def self.gitkeep path
+    touch "#{path}/.gitkeep"
+  end
+
 end

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

@@ -1,14 +1,150 @@
-class DevSystem
-  class FileShellTest < ShellTest
+class DevSystem::FileShellTest < DevSystem::ShellTest
 
-    test :subject_class do
-      assert subject_class == DevSystem::FileShell
+  # before do
+  #   puts tmp.to_s.magenta
+  # end
+
+  def tmp_dir
+    @tmp_dir ||= begin
+      name = self.class.name.split("::").map(&:snakefy).join "_"
+      time = Time.now.strftime "%Y%m%d_%H%M%S"
+      random = SecureRandom.hex 4
+      ret = Pathname.new(Dir.pwd).join "tmp/test_#{App.mode}_#{name}_#{time}_#{random}"
+      FileUtils.mkdir_p ret
+      log "Created tmp_dir: #{ret}"
+      ret
+    end
+  end
+
+  after do
+    # NOTE: @tmp_dir does not create a new directory for each test
+    if @tmp_dir
+      FileUtils.rm_rf @tmp_dir
+      log "Removed tmp_dir: #{@tmp_dir}"
+    end
+  end
+
+  #
+
+  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
+
+  #
+
+  test :subject_class, :exist?, :true do
+    assert subject_class.exist? __FILE__
+  end
+
+  test :subject_class, :exist?, :false do
+    refute subject_class.exist? "does_not_exist_#{rand 999}"
+  end
+
+  test :subject_class, :exist?, :raise do
+    assert_raises ArgumentError do
+      subject_class.exist? nil
+    end
+
+    assert_raises ArgumentError do
+      subject_class.exist? ""
+    end
+  end
+
+  #
+
+  test :subject_class, :size, true do
+    assert subject_class.size(__FILE__).positive?
+  end
+
+  test :subject_class, :size, :raise do
+    assert_raises ArgumentError do
+      subject_class.size nil
+    end
+
+    assert_raises ArgumentError do
+      subject_class.size ""
+    end
+
+    assert_raises ArgumentError do
+      subject_class.size "does_not_exist_#{rand 999}"
+    end
+  end
+
+  #
+
+  test :subject_class, :directory?, true do
+    assert subject_class.directory? Dir.pwd
+  end
+
+  test :subject_class, :directory?, false do
+    refute subject_class.directory? __FILE__
+    refute subject_class.directory? "does_not_exist"
+  end
+
+  test :subject_class, :directory?, :raise do
+    assert_raises ArgumentError do
+      subject_class.directory? nil
+    end
+
+    assert_raises ArgumentError do
+      subject_class.directory? ""
+    end
+  end
+
+  test :subject_class, :file?, true do
+    assert subject_class.file? __FILE__
+  end
+
+  test :subject_class, :file?, false do
+    refute subject_class.file? Dir.pwd
+    refute subject_class.file? "does_not_exist_#{rand 999}"
+  end
+
+  test :subject_class, :file?, :raise do
+    assert_raises ArgumentError do
+      subject_class.file? nil
     end
 
-    test :settings do
-      assert subject_class.log_level == :normal
-      assert subject_class.log_color == :green
+    assert_raises ArgumentError do
+      subject_class.file? ""
     end
+  end
+
+  #
+
+  test :subject_class, :touch, true do
+    path = tmp_dir.join "touch_#{Time.now.to_i}"
+    refute subject_class.exist? path
 
+    assert subject_class.touch path
+    assert subject_class.exist? path
   end
+
+  test :subject_class, :touch, :raise do
+    assert_raises ArgumentError do
+      subject_class.touch nil
+    end
+
+    assert_raises ArgumentError do
+      subject_class.touch ""
+    end
+  end
+
+  #
+
+  test :subject_class, :gitkeep do
+    path = tmp_dir.join "gitkeep_#{Time.now.to_i}"
+    refute subject_class.exist? path
+
+    assert subject_class.gitkeep path
+    assert subject_class.exist? path
+  end
+
+  #
+
 end

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

@@ -0,0 +1,23 @@
+class DevSystem::TextShell < DevSystem::FileShell
+    
+  set :create_dir, true
+  
+  def self.read path
+    log "Reading #{path}"
+    _raise_if_blank path
+    _raise_if_not_exists path
+
+    File.read path
+  end
+  
+  def self.write path, content, create_dir: nil
+    log "Writing #{content.to_s.size} characters (#{content.encoding}) to #{path}"
+    _raise_if_blank path
+
+    create_dir = get :create_dir if create_dir.nil?
+    DevSystem::DirShell.create File.dirname path if create_dir
+
+    File.write path, content
+  end
+
+end

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

@@ -0,0 +1,84 @@
+class DevSystem::TextShellTest < DevSystem::FileShellTest
+
+  test :subject_class do
+    assert subject_class == DevSystem::TextShell
+  end
+
+  test :settings do
+    assert subject_class.log_level == :normal
+    assert subject_class.log_color == :green
+  end
+
+  #
+
+  test :subject_class, :read, true do
+    assert subject_class.read(__FILE__).size.positive?
+  end
+
+  test :subject_class, :read, :raise do
+    assert_raises ArgumentError do
+      subject_class.read nil
+    end
+
+    assert_raises ArgumentError do
+      subject_class.read ""
+    end
+
+    assert_raises ArgumentError do
+      subject_class.read "does_not_exist_#{rand 999}"
+    end
+  end
+
+  #
+
+  test :subject_class, :write, :raise do
+    assert_raises ArgumentError do
+      subject_class.write nil, "content"
+    end
+
+    assert_raises ArgumentError do
+      subject_class.write "", "content"
+    end
+  end
+
+  test :subject_class, :write, true do
+    path = tmp_dir.join "write_#{Time.now.to_i}"
+    
+    refute subject_class.exist? path
+    assert subject_class.write path, "content"
+    
+    assert subject_class.exist? path
+    assert subject_class.read(path) == "content"
+  end
+
+  test :subject_class, :write, :encoding do
+    path = tmp_dir.join "write_#{Time.now.to_i}"
+    s1 = "content"
+
+    refute subject_class.exist? path
+    assert subject_class.write path, s1
+
+    s2 = subject_class.read path
+    assert_equality s1, s2
+    assert_equality s1.encoding, s2.encoding
+
+    assert_equality s1.encoding, Encoding::UTF_8
+    assert_equality s2.encoding, Encoding::UTF_8
+  end
+
+  test :subject_class, :write, :create_dir do
+    path = tmp_dir.join "write_dir_#{Time.now.to_i}/a/b/c"
+    
+    refute subject_class.exist? path
+
+    assert_raises Errno::ENOENT do
+      assert subject_class.write path, "content", create_dir: false
+    end
+
+    assert subject_class.write path, "content", create_dir: true
+
+    assert subject_class.exist? path
+    assert subject_class.read(path) == "content"
+  end
+
+end

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

@@ -1,19 +1,31 @@
-class DevSystem
-  class Shell < Liza::Controller
-    def windows?
-      RUBY_PLATFORM =~ /win32/
-    end
+class DevSystem::Shell < Liza::Controller
 
-    def unix?
-      linux? || mac?
-    end
+  # Check if the current platform is Windows
+  def self.windows?
+    @windows || Gem.win_platform?
+  end
+
+  # Check if the current platform is Unix or Unix-like
+  def self.unix?
+    @unix || !windows?
+  end
 
-    def linux?
-      RUBY_PLATFORM =~ /linux/
-    end
+  # Check if the current platform is Linux
+  def self.linux?
+    @linux || (unix? && RbConfig::CONFIG['host_os'].include?("linux"))
+  end
 
-    def mac?
-      RUBY_PLATFORM =~ /darwin/
-    end
+  # Check if the current platform is Mac OS
+  def self.mac?
+    @mac || (unix? && RbConfig::CONFIG['host_os'].include?("darwin"))
   end
+
+  # Return the current operating system as a symbol
+  def self.os
+    return :windows if windows?
+    return :linux   if linux?
+    return :mac     if mac?
+    :unix
+  end
+
 end

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

@@ -1,13 +1,46 @@
-class DevSystem
-  class ShellTest < Liza::ControllerTest
+class DevSystem::ShellTest < Liza::ControllerTest
 
-    test :subject_class do
-      assert subject_class == DevSystem::Shell
-    end
+  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
+
+  #
+
+  test :subject_class, :windows? do
+    original = subject_class.windows?
+    subject_class.instance_variable_set(:@windows, true)
+    assert subject_class.windows?
+  ensure
+    subject_class.instance_variable_set(:@windows, original)
+  end
 
-    test :settings do
-      assert subject_class.log_level == :normal
-      assert subject_class.log_color == :green
-    end
+  test :subject_class, :unix? do
+    original = subject_class.unix?
+    subject_class.instance_variable_set(:@unix, true)
+    assert subject_class.unix?
+  ensure
+    subject_class.instance_variable_set(:@unix, original)
   end
+
+  test :subject_class, :linux? do
+    original = subject_class.linux?
+    subject_class.instance_variable_set(:@linux, true)
+    assert subject_class.linux?
+  ensure
+    subject_class.instance_variable_set(:@linux, original)
+  end
+
+  test :subject_class, :mac? do
+    original = subject_class.mac?
+    subject_class.instance_variable_set(:@mac, true)
+    assert subject_class.mac?
+  ensure
+    subject_class.instance_variable_set(:@mac, original)
+  end
+
 end

data/lib/dev_system/dev/panels/command_panel.rb

@@ -2,9 +2,29 @@ class DevSystem
   class CommandPanel < Liza::Panel
 
     def call args
-      command_klass = Liza.const "#{args[0]}_command"
+      # 1. LOG
+
+      log "call #{args}"
+
+      # 2. FIND command
+
+      return call_not_found args if args.none?
+
+      command = args[0]
+
+      log({command:})
+
+      command_klass = Liza.const "#{command}_command"
+
+      # 3. CALL
+
       command_klass.call args[1..-1]
+    rescue Liza::ConstNotFound
+      call_not_found args
     end
 
+    def call_not_found args
+      Liza::NotFoundCommand.call args
+    end
   end
 end

data/lib/dev_system/dev/panels/log_panel.rb

@@ -3,7 +3,7 @@ class DevSystem
 
     # https://rubyapi.org/3.1/o/logger
     def call string
-      puts string
+      puts "lizarb #{Lizarb.thread_id.to_s.rjust_zeroes 3} #{string}"
     end
 
   end

data/lib/lerb.rb

@@ -0,0 +1,106 @@
+# frozen_string_literal: true
+
+# https://docs.ruby-lang.org/en/3.2/ERB.html
+require "erb"
+
+class LERB < ERB
+  class Error < StandardError; end
+  class BuildError < Error; end
+  class ExecutionError < Error; end
+
+  # loaders
+
+  def self.load path_radical
+    load_from_folder(path_radical) + load_from_file("#{path_radical}.rb")
+  end
+
+  def self.load_from_file path
+    ret = []
+
+    fname = path
+    return ret unless File.exist? path
+
+    lines = File.readlines fname
+
+    lineno = lines.index "__END__\n"
+    return ret if lineno.nil?
+
+    content = lines[lineno+1..-1].join
+    array = content.split(/^# (\w*).(\w*).(\w*)$/)
+    # => ["", "a", "html", "erb", "\n<html>\n<a></a>\n</html>\n", "b", "html", "erb", "\n<html>\n<b></b>\n</html>"]
+
+    while (chunk = array.pop 4; chunk.size == 4)
+      # => ["b", "html", "erb", "\n<html>\n<b></b>\n</html>"]
+      # => ["a", "html", "erb", "\n<html>\n<a></a>\n</html>\n"]
+      key = "#{chunk[0]}.#{chunk[1]}.#{chunk[2]}"
+      content = chunk[3]
+      ret.push new :file, key, content, fname, lineno
+    end
+
+    ret
+  end
+
+  def self.load_from_folder path
+    ret = []
+
+    lineno = 0
+    fnames = Dir.glob "#{path}/*.*.erb"
+    fnames.map do |fname|
+      key = fname.split("/").last
+      content = File.read fname
+      ret.push new :folder, key, content, fname, lineno
+    end
+
+    ret
+  end
+
+  # format
+
+  TAG_FORMATS = %w|xml html|
+
+  def tags?
+    TAG_FORMATS.include? format
+  end
+
+  # source
+
+  SOURCES = %i|file folder|
+
+  def file?
+    @source == :file
+  end
+
+  def folder?
+    @source == :folder
+  end
+
+  # constructor
+
+  TRIM_MODE = "<>-"
+
+  attr_reader :source, :key, :name, :format
+
+  def initialize source, key, content, filename, lineno
+    raise BuildError, "source :#{source} must be one of #{SOURCES}" unless SOURCES.include? source
+
+    segments = key.split("/").last.split(".")
+    name, format = segments[0..1]
+
+    # raise BuildError, "key '#{key}' must be formatted as <name>.<format>.erb" unless segments.count == 3
+    # raise BuildError, "key '#{key}' must be formatted as <name>.<format>.erb" unless segments[2] == "erb"
+    raise BuildError, "key '#{key}' has an invalid format '#{format}'" unless format.gsub(/[^a-z0-9]/, "") == format
+
+    super content, trim_mode: TRIM_MODE
+    @source, @key, @name, @format, self.filename, self.lineno = source, key, name, format, filename, lineno
+  end
+
+  # result
+
+  def result the_binding, receiver=:unset
+    super the_binding
+  rescue NameError => e
+    raise unless e.receiver == receiver
+    message = "ERB template for a #{e.receiver.class} instance could not find method '#{e.name}'"
+    raise ExecutionError, message, [e.backtrace[0]]
+  end
+end

data/lib/liza/base/controller.rb

@@ -1,5 +1,7 @@
 module Liza
   class Controller < Unit
+    part :controller_renderer
+
     inherited_explicitly_sets_system
 
     def self.on_connected box_klass, panel

data/lib/liza/base/panel.rb

@@ -18,20 +18,21 @@ module Liza
       @name = name
     end
 
-    def log string
+    def log log_level = :normal, string
+      raise "invalid log_level `#{log_level}`" unless LOG_LEVELS.keys.include? log_level
+      return unless log_level? log_level
+
       source = box.to_s
 
       x = source.size
-
       source = source.bold.colorize log_color
 
       y = source.size
-
       source = "#{source}.#{@name}".ljust(LOG_JUST+y-x)
 
       string = "#{source} #{string}"
-
-      super string
+      
+      DevBox.logs.call string
     end
 
   end