l43_open_object 0.2.9 → 0.4.0

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 7008cb448ef1b5ee3d8d07a1412f1edca5b90d9d3b1f6134208ff9534b985053
-  data.tar.gz: cd3867b8d7006c3b1cd76d8f76d48283625080ff13ca816e679037f95410b801
+  metadata.gz: 4de3a4790f943a126eec581676c8b3dfcfb19ee6a300baba9bc5d93a7e43d084
+  data.tar.gz: 7da96a9783f76cf20571dec4808dcf33e3690e399d20e320cc51e0445bee3860
 SHA512:
-  metadata.gz: 499291c4eddc3efc8467a57c4772b8fe3ebaa15dca640fd9ef429c0878ef71e3fbc53f24c7ca63c4f57e4d4840863d43a215998a960923c7621e2ca65fe7446c
-  data.tar.gz: ee82dcfc0e21aaf3b1f3d01fe1adec6f329295092f608846d6632673553a9b9abc7c0fb30b68d7f74803d5a5c11f47dae0f213d6a31c43b08c65b265694dc59e
+  metadata.gz: 25f70fda2074d8008c758d0614c4448e921212591ec049148b09ad517ca0d1eedf72209e6bc05acdf4f3e81ac99c69d04597bdf07362de314663c0a7c2bad1cf
+  data.tar.gz: b8004ec9f68be0978e5b3d036a441c2a845d3550d5cfa0b3bc26467dd8132f5b1940fef68616ecec5b1ab6725e4740fc251cadf7b7a44a7b83ac4bab161f0e22

data/lib/l43/kernel.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+module Kernel
+  def import(*path)
+    require(File.join(["l43", *path]))
+
+    segments = path.map do |seg|
+      seg.split("_").map(&:capitalize).join
+    end.join("::")
+    Kernel.const_get("L43::#{segments}")
+  end
+
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/open_object/initializer.rb

@@ -1,25 +1,42 @@
 # frozen_string_literal: true
 
+require 'ostruct'
 module L43
   module OpenObject
     module Initializer extend self
 
       def define_initialize(klass, atts, defaults, blk)
-        klass.define_method :initialize do |**kwds|
-          missing = atts - kwds.keys
-          raise ArgumentError, "missing required keyword parameters: #{missing.inspect}" unless missing.empty?
+        klass.define_method :initialize do |**kwds, &b|
           spurious = kwds.keys - atts - defaults.keys
           raise ArgumentError, "spurious keyword parameters: #{spurious.inspect}" unless spurious.empty?
 
           values = defaults.merge(kwds)
           values.each do |key, value|
-            instance_variable_set("@#{key}", value)
+            if Proc == value
+              instance_variable_set("@#{key}", b)
+            else
+              instance_variable_set("@#{key}", value)
+            end
+          end
+
+          if blk
+            more_values = instance_exec(OpenStruct.new(values), &blk)
+            if Hash === more_values 
+              more_values.each do |key, value|
+                instance_variable_set("@#{key}", value)
+              end
+              values = values.merge(more_values)
+            end
           end
+
+          missing = atts - values.keys
+          raise ArgumentError, "missing required keyword parameters: #{missing.inspect}" unless missing.empty?
+
           if respond_to?(:_init)
             _init
           end
-          do_we_freeze = instance_exec(&blk) if blk
-          if do_we_freeze == :stay_warm
+
+          if klass.mutable?
             Initializer.define_dynamic_to_h(klass, values.keys)
           else
             Initializer.define_to_h(klass, values.keys)

data/lib/l43/open_object/version.rb

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+module L43
+  module OpenObject
+    VERSION = "0.4.0"
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/open_object.rb

@@ -1,10 +1,9 @@
 # frozen_string_literal: true
 
-require_relative 'open_object/initializer'
-require_relative 'open_object/behavior'
+require 'l43/open_object/initializer'
+require 'l43/open_object/behavior'
 module L43
   module OpenObject
-    VERSION = "0.2.9"
 
     def attributes(*atts, **defaults, &blk)
       attr_reader(*atts)
@@ -31,6 +30,14 @@ module L43
       # end
     end
 
+    def mutable_object!
+      instance_variable_set("@__mutable__", true)
+    end
+
+    def mutable?
+      instance_variable_get("@__mutable__") || false
+    end
+     
     def self.def_class(*a, **k, &b)
       oo = self
       Class.new do

data/lib/l43/typed_object/behavior.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+require 'ostruct'
+module L43
+  module TypedObject
+    module Behavior
+      def ==(other)
+        return false unless self.class === other
+        other.to_h == to_h
+      end
+
+      def deconstruct_keys(*) = to_h
+
+      def merge(**args)
+        self.class.new(**to_h.merge(**args))
+      end
+
+
+      def to_ostruct
+        OpenStruct.new(to_h)
+      end
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/typed_object/constants.rb

@@ -0,0 +1,12 @@
+# frozen_string_literal: true
+
+module L43
+  module TypedObject
+    None = BasicObject.new
+
+    MissingAttribute = Class.new(RuntimeError)
+    SpuriousAttribute = Class.new(RuntimeError)
+    ValueError = Class.new(RuntimeError)
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/typed_object/description.rb

@@ -0,0 +1,41 @@
+# frozen_string_literal: true
+
+require 'ostruct'
+require_relative 'implementation'
+module L43
+  module TypedObject
+    class Description
+
+      def check_types!
+        ImplHelper.check_value_errors!(args: defaults, attributes:)
+      end
+
+      def implement =
+        Implementation.new(klass:, attributes: attributes.freeze, defaults:)
+
+      private
+      attr_reader :allowed, :klass, :required
+      def initialize(klass)
+        @klass = klass
+      end
+
+
+      def attr(name, default: None, as: None, &blk)
+        attributes.update(name => OpenStruct.new(default:, type: as, constraint: blk))
+      end
+
+      def attributes =  @__attributes__ ||= {}
+
+      def defaults
+        @__defaults__ ||= attributes.inject({}) do |defaults, (name, desc)|
+          if desc.default == None
+            defaults
+          else
+            defaults.merge(name => desc.default)
+          end
+        end.freeze
+      end
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/typed_object/impl_helper.rb

@@ -0,0 +1,64 @@
+# frozen_string_literal: true
+
+module L43
+  module TypedObject
+    module ImplHelper extend self
+      def check_for_missing!(actual:, required:)
+        missing = required - actual
+        return if missing.empty?
+
+        raise MissingAttribute, "the following attributes do not have a default, but are not provided: #{missing.inspect}"
+      end
+
+      def check_for_spurious!(actual:, allowed:)
+        spurious = actual - allowed
+        return if spurious.empty?
+
+        raise SpuriousAttribute, "the following attributes have not been defined on this class: #{spurious.inspect}"
+      end
+
+      def check_type(type, value)
+        return if None == type
+        case type
+        when Array
+          return true unless type.member?(value)
+        else
+          return true unless type === value
+        end
+      end
+
+      def check_value(desc, value)
+        return :type if check_type(desc.type, value)
+        case desc.constraint
+        when nil
+          nil
+        else
+          return :constraint unless desc.constraint.(value)
+        end
+      end
+
+      def check_value_errors!(args:, attributes:)
+        errors = _get_value_errors(args:, attributes:)
+        return if errors.empty?
+
+        raise ValueError, "bad values:\n#{errors.join("\n")}"
+      end
+
+      private
+      def _get_value_errors(args:, attributes:)
+        args.map do |name, value|
+          desc = attributes[name] 
+          case check_value(desc, value)
+          when :type
+            "  bad value: #{value.inspect} for attribute #{name}, expected type was: #{desc.type.inspect}"
+          when :constraint
+            "  value: #{value.inspect} violates constraint for attribute #{name}"
+          else
+            nil
+          end
+        end.compact
+      end
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/typed_object/implementation.rb

@@ -0,0 +1,91 @@
+# frozen_string_literal: true
+
+require_relative 'behavior'
+require_relative 'impl_helper'
+
+module L43
+  module TypedObject
+    class Implementation
+
+      private
+      attr_reader :attributes, :defaults, :klass
+
+      def initialize(klass:, attributes:, defaults:)
+        @attributes = attributes
+        @defaults = defaults
+        @klass = klass
+        implement
+      end
+
+      def allowed =  @__allowed__ ||= attributes.map(&:first)
+
+      def define_behavior
+        klass.send :include, Behavior
+      end
+
+      def define_initialize
+        allowed = self.allowed
+        attributes = self.attributes
+        defaults = self.defaults
+        required = self.required.keys
+
+        klass.define_method(:initialize) do |**args|
+          args = defaults.merge(args)
+          actual = args.keys
+          ImplHelper.check_for_missing!(required:, actual:)
+          ImplHelper.check_for_spurious!(allowed:, actual:)
+          ImplHelper.check_value_errors!(args:, attributes:)
+          args.each do |name, value|
+            instance_variable_set("@#{name}", value)
+          end
+        end
+      end
+
+      def define_read_access
+        allowed = self.allowed
+        klass.module_eval do
+          attr_reader(*allowed)
+        end
+      end
+
+      def define_to_h
+        attributes = self.attributes.keys
+        klass.define_method(:to_h) do
+          attributes.inject({}) do |result, att_name|
+            result.merge(att_name => instance_variable_get("@#{att_name}"))
+          end
+        end
+      end
+
+      def define_update
+        allowed = self.allowed
+        attributes = self.attributes
+        klass.define_method(:update) do |**args|
+          ImplHelper.check_value_errors!(args:, attributes:)
+          ImplHelper.check_for_spurious!(allowed:, actual: args.keys)
+          args.each do |name, value|
+            instance_variable_set("@#{name}", value)
+          end
+          self
+        end
+      end
+
+      def implement
+        separate_attributes
+        define_read_access
+        define_to_h
+        define_update
+        define_behavior
+        define_initialize
+      end
+
+      def required =  @__required__ ||= {}
+
+      def separate_attributes
+        attributes.each { |name, desc| required.update(name => desc) if desc.default == None } 
+      end
+
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/typed_object.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+require_relative 'typed_object/constants'
+require_relative 'typed_object/description'
+module L43
+  module TypedObject
+    def def_atts(&blk)
+      desc = Description.new(self)
+      desc.instance_eval(&blk)
+      desc.check_types!
+      desc.implement
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

metadata

@@ -1,14 +1,28 @@
 --- !ruby/object:Gem::Specification
 name: l43_open_object
 version: !ruby/object:Gem::Version
-  version: 0.2.9
+  version: 0.4.0
 platform: ruby
 authors:
 - Robert Dober
 bindir: bin
 cert_chain: []
-date: 2026-04-13 00:00:00.000000000 Z
-dependencies: []
+date: 2026-11-01 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: ostruct
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.6.3
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.6.3
 description: |-
   When using the class method `attributes` in a class you get:
     - an initialize method with attributes as kwd params and the respective defaults
@@ -23,9 +37,17 @@ extra_rdoc_files: []
 files:
 - LICENSE
 - lib/l43.rb
+- lib/l43/kernel.rb
 - lib/l43/open_object.rb
 - lib/l43/open_object/behavior.rb
 - lib/l43/open_object/initializer.rb
+- lib/l43/open_object/version.rb
+- lib/l43/typed_object.rb
+- lib/l43/typed_object/behavior.rb
+- lib/l43/typed_object/constants.rb
+- lib/l43/typed_object/description.rb
+- lib/l43/typed_object/impl_helper.rb
+- lib/l43/typed_object/implementation.rb
 homepage: https://codeberg.org/lab419/l43_open_object
 licenses:
 - AGPL-3.0-or-later
@@ -44,7 +66,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
     - !ruby/object:Gem::Version
       version: '0'
 requirements: []
-rubygems_version: 4.0.9
+rubygems_version: 4.0.20
 specification_version: 4
 summary: Define attributes with potential defaults, get all the goodies...
 test_files: []