eac_tools 0.3.0 → 0.6.0

data/sub/eac_ruby_utils/lib/eac_ruby_utils/byte.rb

@@ -0,0 +1,105 @@
+# frozen_string_literal: true
+
+require 'eac_ruby_utils/bit'
+require 'eac_ruby_utils/bit_array'
+require 'eac_ruby_utils/patches/module/compare_by'
+
+module EacRubyUtils
+  class Byte
+    ASSEMBLY_HEXADECIMAL_PREFIX = '$'
+    BIT_COUNT = 8
+    BIT_INDEX_RANGE = (0..7).freeze
+    VALUE_RANGE = (0..255).freeze
+
+    class << self
+      def assert(obj)
+        return obj if obj.is_a?(self)
+
+        new(obj.to_i)
+      end
+
+      def from_bit_array(bit_array, big_endian = false)
+        bit_array = ::EacRubyUtils::BitArray.assert(bit_array)
+        raise ::ArgumentError, "Wrong bit array size: #{bit_array.size}" if
+        bit_array.size != BIT_COUNT
+
+        bit_array = bit_array.reverse if big_endian
+        bit_array.each_with_index.inject(new(0)) do |a, e|
+          a.bit_set(e[1], e[0])
+        end
+      end
+
+      def valid_bit_index?(value)
+        value.is_a?(::Integer) && BIT_INDEX_RANGE.include?(value)
+      end
+
+      def validate_bit_index(value)
+        return value if valid_bit_index?(value)
+
+        raise(::ArgumentError, "Invalid bit index: #{value} (Range: #{BIT_INDEX_RANGE})")
+      end
+
+      def valid_value?(value)
+        value.is_a?(::Integer) && VALUE_RANGE.include?(value)
+      end
+
+      def validate_value(value)
+        return value if valid_value?(value)
+
+        raise(::ArgumentError, "Invalid byte value: #{value} (Range: #{VALUE_RANGE})")
+      end
+    end
+
+    attr_reader :value
+    compare_by :value
+
+    def initialize(value)
+      self.value = value
+    end
+
+    # @param bit_index [Integer]
+    # @return [EacRubyUtils::Bit]
+    def [](bit_index)
+      bit_get(bit_index)
+    end
+
+    # @param bit_index [Integer]
+    # @return [EacRubyUtils::Bit]
+    def bit_get(bit_index)
+      self.class.validate_bit_index(bit_index)
+
+      ::EacRubyUtils::Bit.new((value & (1 << bit_index)) >> bit_index)
+    end
+
+    def bit_set(bit_index, bit_value)
+      self.class.validate_bit_index(bit_index)
+      bit = ::EacRubyUtils::Bit.assert(bit_value)
+      mask = (1 << bit_index)
+      self.class.new(bit.zero? ? value & ~mask : value | mask)
+    end
+
+    # @return [EacRubyUtils::BitArray]
+    def to_bit_array(range = BIT_INDEX_RANGE)
+      ::EacRubyUtils::BitArray.new(range.map { |bit_index| self[bit_index] })
+    end
+
+    # @return [Integer]
+    def to_i
+      value
+    end
+
+    # @return [String]
+    def to_asm_hex
+      ASSEMBLY_HEXADECIMAL_PREFIX + to_hex
+    end
+
+    # @return [String]
+    def to_hex
+      value.to_s(16).upcase.rjust(2, '0')
+    end
+
+    private
+
+    attr_writer :value
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/byte_array.rb

@@ -0,0 +1,36 @@
+# frozen_string_literal: true
+
+require 'eac_ruby_utils/byte'
+require 'eac_ruby_utils/patches/module/compare_by'
+
+module EacRubyUtils
+  class ByteArray
+    delegate :to_a, :size, :count, :length, :[], :fetch, :map, to: :values_array
+    compare_by :values_array
+
+    def initialize(values = [])
+      values.each { |value| push(value) }
+    end
+
+    def <<(value)
+      push(value)
+    end
+
+    # @param value [EacRubyUtils::Byte]
+    # @return [EacRubyUtils::Byte]
+    def push(value)
+      values_array.push(::EacRubyUtils::Byte.assert(value))
+    end
+
+    # @return [Array<Integer>]
+    def to_int_array
+      values_array.map(&:to_i)
+    end
+
+    private
+
+    def values_array
+      @values_array ||= []
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/common_concern/class_setup.rb

@@ -0,0 +1,52 @@
+# frozen_string_literal: true
+
+require 'active_support/concern'
+require 'eac_ruby_utils/simple_cache'
+require 'eac_ruby_utils/patches/object/if_present'
+
+module EacRubyUtils
+  class CommonConcern
+    class ClassSetup
+      include ::EacRubyUtils::SimpleCache
+      attr_reader :a_class, :module_setup, :include_method
+
+      def initialize(module_setup, a_class, include_method)
+        @module_setup = module_setup
+        @a_class = a_class
+        @include_method = include_method
+      end
+
+      def run
+        %w[class_methods instance_methods after_callback].each do |suffix|
+          send("setup_#{suffix}")
+        end
+      end
+
+      def setup_class_methods
+        class_methods_module.if_present { |v| a_class.extend v }
+      end
+
+      def setup_instance_methods
+        instance_methods_module.if_present { |v| a_class.send(include_method, v) }
+      end
+
+      def setup_after_callback
+        module_setup.common_concern.after_callback.if_present do |v|
+          a_class.instance_eval(&v)
+        end
+      end
+
+      def class_methods_module_uncached
+        module_setup.a_module.const_get(CLASS_METHODS_MODULE_NAME)
+      rescue NameError
+        nil
+      end
+
+      def instance_methods_module_uncached
+        module_setup.a_module.const_get(INSTANCE_METHODS_MODULE_NAME)
+      rescue NameError
+        nil
+      end
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/common_concern/module_setup.rb

@@ -0,0 +1,41 @@
+# frozen_string_literal: true
+
+require 'active_support/concern'
+require 'eac_ruby_utils/common_concern/class_setup'
+require 'eac_ruby_utils/simple_cache'
+require 'eac_ruby_utils/patches/object/if_present'
+
+module EacRubyUtils
+  class CommonConcern
+    class ModuleSetup
+      include ::EacRubyUtils::SimpleCache
+      attr_reader :a_module, :common_concern
+
+      def initialize(common_concern, a_module)
+        @common_concern = common_concern
+        @a_module = a_module
+      end
+
+      def run
+        a_module.extend(::ActiveSupport::Concern)
+        include_or_prepend(:included, :include)
+        include_or_prepend(:prepended, :prepend)
+      end
+
+      private
+
+      def include_or_prepend(module_method, class_setup_method)
+        setup = self
+        a_module.send(module_method, *a_module_method_args(module_method)) do
+          ::EacRubyUtils::CommonConcern::ClassSetup.new(setup, self, class_setup_method).run
+        end
+      end
+
+      def a_module_method_args(module_method)
+        method_arity = a_module.method(module_method).arity
+        method_arity = -method_arity - 1 if method_arity.negative?
+        method_arity.times.map { |_n| a_module }
+      end
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/common_concern.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+require 'eac_ruby_utils/common_concern/module_setup'
+
+module EacRubyUtils
+  class CommonConcern
+    CLASS_METHODS_MODULE_NAME = 'ClassMethods'
+    INSTANCE_METHODS_MODULE_NAME = 'InstanceMethods'
+
+    attr_reader :after_callback
+
+    def initialize(&after_callback)
+      @after_callback = after_callback
+    end
+
+    def setup(a_module)
+      ::EacRubyUtils::CommonConcern::ModuleSetup.new(self, a_module).run
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/common_constructor/class_initialize.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+require 'eac_ruby_utils/common_constructor/instance_initialize'
+require 'eac_ruby_utils/common_constructor/super_args'
+
+module EacRubyUtils
+  class CommonConstructor
+    class ClassInitialize
+      attr_reader :common_constructor, :klass
+
+      def initialize(common_constructor, klass)
+        @common_constructor = common_constructor
+        @klass = klass
+      end
+
+      def run
+        class_initialize = self
+        klass.send(:define_method, :initialize) do |*args|
+          ::EacRubyUtils::CommonConstructor::InstanceInitialize.new(
+            class_initialize.common_constructor, args, self
+          ).run
+          super(*::EacRubyUtils::CommonConstructor::SuperArgs.new(
+            class_initialize, args, self
+          ).result)
+        end
+      end
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/common_constructor/instance_initialize.rb

@@ -0,0 +1,53 @@
+# frozen_string_literal: true
+
+module EacRubyUtils
+  class CommonConstructor
+    class InstanceInitialize
+      attr_reader :common_constructor, :args, :object
+
+      def initialize(common_constructor, args, object)
+        @common_constructor = common_constructor
+        @args = args
+        @object = object
+      end
+
+      def run
+        validate_args_count
+        object.run_callbacks :initialize do
+          object_attributes_set
+          object_after_callback
+        end
+      end
+
+      private
+
+      def arg_value(arg_name)
+        arg_index = common_constructor.args.index(arg_name)
+        if arg_index < args.count
+          args[arg_index]
+        else
+          common_constructor.default_values[arg_index - common_constructor.args_count_min]
+        end
+      end
+
+      def object_after_callback
+        return unless common_constructor.after_set_block
+
+        object.instance_eval(&common_constructor.after_set_block)
+      end
+
+      def object_attributes_set
+        common_constructor.args.each do |arg_name|
+          object.send("#{arg_name}=", arg_value(arg_name))
+        end
+      end
+
+      def validate_args_count
+        return if common_constructor.args_count.include?(args.count)
+
+        raise ArgumentError, "#{object.class}.initialize: wrong number of arguments" \
+          " (given #{args.count}, expected #{common_constructor.args_count})"
+      end
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/common_constructor/super_args.rb

@@ -0,0 +1,54 @@
+# frozen_string_literal: true
+
+require 'active_support/core_ext/module/delegation'
+
+module EacRubyUtils
+  class CommonConstructor
+    class SuperArgs
+      attr_reader :class_initialize, :args, :object
+      delegate :common_constructor, to: :class_initialize
+
+      def initialize(class_initialize, args, object)
+        @class_initialize = class_initialize
+        @args = args
+        @object = object
+      end
+
+      def auto_result
+        r = []
+        sub_args.each do |name, value|
+          i = super_arg_index(name)
+          r[i] = value if i
+        end
+        r
+      end
+
+      def result
+        result_from_options || auto_result
+      end
+
+      def result_from_options
+        return unless common_constructor.super_args
+
+        object.instance_exec(&common_constructor.super_args)
+      end
+
+      def sub_args
+        common_constructor.args.each_with_index.map do |name, index|
+          [name, args[index]]
+        end.to_h
+      end
+
+      def super_arg_index(name)
+        super_method.parameters.each_with_index do |arg, index|
+          return index if arg[1] == name
+        end
+        nil
+      end
+
+      def super_method
+        class_initialize.klass.superclass&.instance_method(:initialize)
+      end
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/common_constructor.rb

@@ -0,0 +1,89 @@
+# frozen_string_literal: true
+
+require 'active_support/callbacks'
+require 'eac_ruby_utils/arguments_consumer'
+require 'eac_ruby_utils/common_constructor/class_initialize'
+require 'ostruct'
+
+module EacRubyUtils
+  class CommonConstructor
+    attr_reader :args, :options, :after_set_block
+
+    class << self
+      def parse_args_options(args)
+        result = ::OpenStruct.new(args: [], options: {})
+        options_reached = false
+        args.each do |arg|
+          raise "Options reached and there is more arguments (Arguments: #{args})" if
+          options_reached
+
+          options_reached = parse_arg_options_process_arg(result, arg)
+        end
+        result
+      end
+
+      private
+
+      def parse_arg_options_process_arg(result, arg)
+        if arg.is_a?(::Hash)
+          result.options = arg
+          true
+        else
+          result.args << arg
+          false
+        end
+      end
+    end
+
+    def initialize(*args, &after_set_block)
+      args_processed = self.class.parse_args_options(args)
+      @args = args_processed.args
+      @options = args_processed.options
+      @after_set_block = after_set_block
+    end
+
+    def args_count
+      (args_count_min..args_count_max)
+    end
+
+    def args_count_min
+      args.count - default_values.count
+    end
+
+    def args_count_max
+      args.count
+    end
+
+    def default_values
+      options[:default] || []
+    end
+
+    def setup_class(klass)
+      setup_class_attr_readers(klass)
+      setup_class_attr_writers(klass)
+      setup_class_initialize(klass)
+
+      klass
+    end
+
+    def setup_class_attr_readers(klass)
+      klass.send(:attr_reader, *args)
+      klass.send(:public, *args) if args.any?
+    end
+
+    def setup_class_attr_writers(klass)
+      klass.send(:attr_writer, *args)
+      klass.send(:private, *args.map { |a| "#{a}=" }) if args.any?
+    end
+
+    def setup_class_initialize(klass)
+      klass.include(::ActiveSupport::Callbacks)
+      klass.define_callbacks :initialize
+      ::EacRubyUtils::CommonConstructor::ClassInitialize.new(self, klass).run
+    end
+
+    def super_args
+      options[:super_args]
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/compact.rb

@@ -0,0 +1,22 @@
+# frozen_string_literal: true
+
+module EacRubyUtils
+  class Compact
+    attr_reader :object, :attributes
+
+    def initialize(object, attributes)
+      @object = object
+      @attributes = attributes
+    end
+
+    # @return [Array]
+    def to_a
+      attributes.map { |attr| object.send(attr) }
+    end
+
+    # @return [Hash]
+    def to_h
+      attributes.map { |attr| [attr.to_sym, object.send(attr)] }.to_h
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/compare_by.rb

@@ -0,0 +1,28 @@
+# frozen_string_literal: true
+
+require 'eac_ruby_utils/common_concern/module_setup'
+
+module EacRubyUtils
+  class CompareBy
+    attr_reader :fields
+
+    def initialize(fields)
+      @fields = fields
+    end
+
+    def apply(klass)
+      pself = self
+      klass.include(::Comparable)
+      %i[<=> eql?].each do |cmp_method|
+        klass.define_method(cmp_method) do |other|
+          pself.object_values(self).send(cmp_method, pself.object_values(other))
+        end
+      end
+      klass.define_method(:hash) { pself.object_values(self).hash }
+    end
+
+    def object_values(object)
+      fields.map { |field| object.send(field) }
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/context.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module EacRubyUtils
+  class Context
+    delegate :any?, to: :stack
+
+    def current
+      optional_current || raise('No elements in context')
+    end
+
+    def optional_current
+      stack.last
+    end
+
+    delegate :pop, to: :stack
+    delegate :push, to: :stack
+
+    def on(obj)
+      push(obj)
+      begin
+        yield
+      ensure
+        pop
+      end
+    end
+
+    private
+
+    def stack
+      @stack ||= []
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/contextualizable.rb

@@ -0,0 +1,21 @@
+# frozen_string_literal: true
+
+require 'eac_ruby_utils/context'
+
+module EacRubyUtils
+  module Contextualizable
+    common_concern
+
+    module ClassMethods
+      def context
+        @context ||= ::EacRubyUtils::Context.new
+      end
+    end
+
+    module InstanceMethods
+      def context
+        self.class.context
+      end
+    end
+  end
+end

data/sub/eac_ruby_utils/lib/eac_ruby_utils/core_ext.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+require 'eac_ruby_utils/locales/from_all_gems'
+require 'eac_ruby_utils/patches'
+require 'active_support/dependencies/autoload'
+require 'active_support/core_ext'
+require 'active_support/json'

data/sub/eac_ruby_utils/lib/eac_ruby_utils/custom_format.rb

@@ -0,0 +1,53 @@
+# frozen_string_literal: true
+
+module EacRubyUtils
+  # A formatter like [String.sprintf].
+  class CustomFormat
+    TYPE_PATTERN = /[a-zA-Z]/.freeze
+    SEQUENCE_PATTERN = /(?<!%)%(#{TYPE_PATTERN})/.freeze
+
+    attr_reader :mapping
+
+    def initialize(mapping)
+      @mapping = mapping.transform_keys(&:to_sym).freeze
+    end
+
+    def format(string)
+      ::EacRubyUtils::CustomFormat::String.new(self, string)
+    end
+
+    class String
+      attr_reader :format, :string
+
+      def initialize(format, string)
+        @format = format
+        @string = string
+      end
+
+      def mapping
+        @mapping ||= format.mapping.select do |k, _v|
+          sequences.include?(k)
+        end
+      end
+
+      def sequences
+        @sequences ||= string.scan(SEQUENCE_PATTERN).map(&:first).uniq.map(&:to_sym)
+      end
+
+      def source_object_value(object, method)
+        return object.send(method) if object.respond_to?(method)
+        return object[method] if object.respond_to?('[]')
+
+        raise ::ArgumentError, "Methods \"#{method}\" or \"[]\" not found for #{object}"
+      end
+
+      def with(source_object)
+        r = string
+        mapping.each do |key, method|
+          r = r.gsub(/%#{::Regexp.quote(key)}/, source_object_value(source_object, method).to_s)
+        end
+        r.gsub('%%', '%')
+      end
+    end
+  end
+end