lizarb 1.0.0 → 1.0.2

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
+        TextShell.write "#{folder}/#{filename}", "#{content}\n"
+      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,96 @@
+class DevSystem
+  class AppGenerator < Generator
+
+    def self.call args
+      log :higher, "Called #{self}.#{__method__} with args #{args}"
+      new.call args
+    end
+
+    def call 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 -b main`
+
+      # extra
+
+      puts
+
+      FileShell.gitkeep "#{to}/lib"
+      FileShell.gitkeep "#{to}/tmp"
+
+      DirShell.create "#{to}/app"
+
+      # systems
+
+      # App.systems.keys.each { |system_name| copy to, system_name }
+      copy to, :dev
+
+      FileUtils.rm "#{to}/app/dev/commands/new_command.rb"
+      FileUtils.rm "#{to}/app/dev/commands/new_command_test.rb"
+
+      `rm -rf #{to}/app/dev/generators/record_generator*`
+      `rm -rf #{to}/app/dev/generators/request_generator*`
+
+      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
+      TextShell.write "#{to}/app.rb", render("app.rb")
+      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 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
+
+__END__
+
+# app.rb.erb
+App.call ARGV do
+
+  # Systems help you organize your application's dependencies and RAM memory usage.
+  # Learn more: http://guides.lizarb.org/systems.html
+
+  system :dev
+
+  # Modes help you organize your application's behavior and settings.
+  # Learn more: http://guides.lizarb.org/modes.html
+
+  mode :code
+  mode :demo
+
+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/generators/generator_generator/generator.rb.erb

@@ -0,0 +1,18 @@
+class <%= name.camelize %>Generator < Liza::Generator
+  main_dsl
+
+  FOLDER = "app/dev/<%= name %>s"
+
+  generate :controller do
+    folder FOLDER
+    filename "#{name}_<%= name %>.rb"
+    content render "<%= name %>.rb"
+  end
+
+  generate :controller_test do
+    folder FOLDER
+    filename "#{name}_<%= name %>_test.rb"
+    content render "<%= name %>_test.rb"
+  end
+
+end

data/lib/dev_system/dev/controllers/generators/generator_generator/generator_test.rb.erb

@@ -0,0 +1,12 @@
+class <%= name.camelize %>GeneratorTest < Liza::GeneratorTest
+
+  test :subject_class do
+    assert subject_class == <%= name.camelize %>Generator
+  end
+
+  test :settings do
+    assert subject_class.log_level == :normal
+    assert subject_class.log_color == :green
+  end
+
+end

data/lib/dev_system/dev/controllers/generators/generator_generator/template.rb.erb

@@ -0,0 +1,9 @@
+class <%%= name.camelize %><%= name.camelize %> < Liza::<%= name.camelize %>
+
+end
+
+__END__
+
+# text.txt.erb
+Called <%%%= self %>.<%%%= __method__ %>
+@args: <%%%= @args %>

data/lib/dev_system/dev/controllers/generators/generator_generator/template_test.rb.erb

@@ -0,0 +1,12 @@
+class <%%= name.camelize %><%= name.camelize %>Test < Liza::<%= name.camelize %>Test
+
+  test :subject_class do
+    assert subject_class == <%%= name.camelize %><%= name.camelize %>
+  end
+
+  test :settings do
+    assert subject_class.log_level == :normal
+    assert subject_class.log_color == :green
+  end
+
+end

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

@@ -0,0 +1,30 @@
+class DevSystem::GeneratorGenerator < Liza::Generator
+  main_dsl
+
+  FOLDER = "app/dev/generators"
+
+  generate :controller do
+    folder FOLDER
+    filename "#{name}_generator.rb"
+    content render "generator.rb"
+  end
+
+  generate :controller_test do
+    folder FOLDER
+    filename "#{name}_generator_test.rb"
+    content render "generator_test.rb"
+  end
+
+  generate :template do
+    folder "#{FOLDER}/#{name}_generator"
+    filename "#{name}.rb.erb"
+    content render "template.rb"
+  end
+
+  generate :template_test do
+    folder "#{FOLDER}/#{name}_generator"
+    filename "#{name}_test.rb.erb"
+    content render "template_test.rb"
+  end
+
+end

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

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

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

@@ -0,0 +1,29 @@
+class DevSystem
+  class NotFoundGenerator < Generator
+
+    def self.call args
+      # 1. LOG
+
+      log :higher, "Called #{self}.#{__method__} with args #{args}"
+      puts
+
+      # 2. FIND generators
+
+      App.eager_load_all
+      generators = Liza::Generator.descendants
+
+      log "Liza comes with #{generators.count} generators you can use."
+      puts
+
+      log "Here they are:"
+      puts
+
+      # 3. LIST generators
+
+      keys = generators.map { |k| k.last_namespace.snakecase[0..-11] }.sort
+      keys.reject! { |s| s == "not_found" }
+      keys.each { |s| log "liza generate #{s}" }
+    end
+
+  end
+end

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

@@ -0,0 +1,14 @@
+class DevSystem
+  class NotFoundGeneratorTest < GeneratorTest
+
+    test :subject_class do
+      assert subject_class == DevSystem::NotFoundGenerator
+    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/bin_shell.rb

@@ -0,0 +1,22 @@
+class DevSystem::BinShell < DevSystem::FileShell
+
+  set :create_dir, true
+
+  def self.read path
+    log "Reading #{path}"
+    _raise_if_blank path
+    _raise_if_not_exists path
+
+    File.binread path
+  end
+
+  def self.write path, content, create_dir: nil
+    log "Writing #{content&.size.to_i} bytes (#{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.binwrite path, content
+  end
+end

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

@@ -0,0 +1,87 @@
+class DevSystem::BinShellTest < DevSystem::FileShellTest
+
+  test :subject_class do
+    assert subject_class == DevSystem::BinShell
+  end
+
+  test :settings do
+    assert subject_class.log_level == :normal
+    assert subject_class.log_color == :green
+  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, :read, true do
+    assert subject_class.read(__FILE__).size.positive?
+  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
+    refute_equality s1.encoding, s2.encoding
+
+    assert_equality s1.encoding, Encoding::UTF_8
+    assert_equality s2.encoding, Encoding::ASCII_8BIT
+  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
+
+    refute subject_class.exist? path
+    
+    refute_raises Errno::ENOENT do
+      assert subject_class.write path, "content", create_dir: true
+    end
+    
+    assert subject_class.exist? path
+  end
+
+end

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

@@ -0,0 +1,27 @@
+class DevSystem::DirShell < DevSystem::FileShell
+
+  # OVERRIDES
+
+  def self.exist? path
+    log :normal, "Checking if directory exists at '#{path}'"
+
+    directory? path
+  end
+
+  def self.size path
+    log :normal, "Getting size of directory at '#{path}'"
+    _raise_if_not_exists path
+
+    Pathname.new(path).children.inject(0) { |sum, f| sum + f.size }
+  end
+
+  # CUSTOM
+
+  def self.create path
+    log :normal, "Creating directory at '#{path}'"
+    _raise_if_blank path
+
+    Pathname.new(path).mkpath
+  end
+
+end

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

@@ -0,0 +1,73 @@
+class DevSystem::DirShellTest < DevSystem::FileShellTest
+
+  test :subject_class do
+    assert subject_class == DevSystem::DirShell
+  end
+
+  test :settings do
+    assert subject_class.log_level == :normal
+    assert subject_class.log_color == :green
+  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, :exist?, true do
+    assert subject_class.exist? Dir.pwd
+    assert subject_class.exist? Liza::Shell.source_location_radical
+  end
+
+  test :subject_class, :exist?, false do
+    refute subject_class.exist? "does_not_exist"
+    refute subject_class.exist? Liza::DirShell.source_location_radical
+  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"
+    end
+  end
+
+  test :subject_class, :size, true do
+    assert subject_class.size(Dir.pwd).positive?
+    assert subject_class.size(Liza::Shell.source_location_radical).positive?
+  end
+
+  #
+
+  test :subject_class, :create, :raise do
+    assert_raises ArgumentError do
+      subject_class.create nil
+    end
+
+    assert_raises ArgumentError do
+      subject_class.create ""
+    end
+  end
+
+  test :subject_class, :create, true do
+    path = tmp_dir.join "create_#{Time.now.to_i}"
+    refute subject_class.exist? path
+
+    subject_class.create path
+    assert subject_class.exist? path
+  end
+
+end

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

@@ -0,0 +1,59 @@
+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