l43_open_object 0.1.1 → 0.2.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 22850fd9e80553bee925ca5a0c43c6deb8468bad02a9d54a04defece69881565
-  data.tar.gz: ac0a953bcfa8226a563fd4bab9fc23191bd22aa649e8f4216eec5a71473faf1d
+  metadata.gz: 43825e89f8a1bfb592c302ccfe57afc7ab6b73a35c6bcd6ce2bd2740df9f1e2f
+  data.tar.gz: c963406af910e5068933b5862f64e151ee1d2fd9c5a91f2d33361d6c847c27aa
 SHA512:
-  metadata.gz: 3d605403bd858a5b718b478bac3878ec30eeb7d74c08e0167bff02038bb93aa56af40f9ffa7f5d35e3c229772f6a644060d7001a72604a6d0dcd8c4a0005aec5
-  data.tar.gz: 9205bd62f6aa011fc1f3846f0f29f08135602ead4e7d8f12a116940401acfb87cad44b8c00ae9d3291b32bea662b2c154f7e5df77dd955fb66645a8f8ae3668c
+  metadata.gz: 554b5cbeddb5e20eb72ff281b930891445a3562183a0a44e3a31f872dcc57829c9ebc5dd83957ccee4a1a22b221d345c5d39494f0676246f3488efa11611f2c0
+  data.tar.gz: dc9c9f9d5a7f345336171e87f6b5ef964c9b86135b764e3c9ff756597d893be4df0a48ab2939dd84e006df5258100a33030cd0135129ee375baff3e6bf9e7a53

data/lib/l43/open_object/behavior.rb

@@ -0,0 +1,31 @@
+# frozen_string_literal: true
+
+module L43
+  module OpenObject
+    module Behavior
+
+      def ==(other)
+        return false unless self.class === other
+        other.to_h == to_h
+      end
+
+      def update(**kwds)
+        if frozen?
+          new_values = to_h.merge(**kwds)
+          self.class.new(**new_values)
+        else
+          kwds.each do |k, v|
+            instance_variable_set("@#{k}", v)
+          end
+          self
+        end
+      end
+
+      def update_attribute(attribute, &blk)
+        raise ArgumentError, "cannot update attribute #{attribute.inspect} without a block" unless blk
+        update(attribute => blk.(to_h[attribute]))
+      end
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/open_object/initializer.rb

@@ -0,0 +1,54 @@
+# frozen_string_literal: true
+
+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?
+          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)
+          end
+          if respond_to?(:_init)
+            $stderr.puts("Automatic invocation the `_init` method is deprected and will be removed in v0.3")
+            _init
+          end
+          do_we_freeze = instance_exec(&blk) if blk
+          if do_we_freeze == :stay_warm
+            Initializer.define_dynamic_to_h(klass, values.keys)
+          else
+            Initializer.define_to_h(klass, values.keys)
+            to_h
+            freeze
+          end
+        end
+      end
+
+      def define_dynamic_to_h(klass, keys)
+        klass.define_method :to_h do |*|
+          keys.inject({}) do |r, k|
+            r.update(k => instance_variable_get("@#{k}"))
+          end
+        end
+        klass.alias_method :deconstruct_keys, :to_h
+      end
+
+      def define_to_h(klass, keys)
+        klass.define_method :to_h do |*|
+          @__to_h__ ||= keys.inject({}) do |r, k|
+            r.update(k => instance_variable_get("@#{k}"))
+          end
+        end
+        klass.alias_method :deconstruct_keys, :to_h
+      end
+    end
+
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/open_object.rb

@@ -1,40 +1,34 @@
 # frozen_string_literal: true
 
+require_relative 'open_object/initializer'
+require_relative 'open_object/behavior'
 module L43
   module OpenObject
-    VERSION = "0.1.1"
+    VERSION = "0.2.1"
 
-    def attributes(*atts, **defaults)
+    def attributes(*atts, **defaults, &blk)
       attr_reader(*atts)
       attr_reader(*defaults.keys)
 
-      define_method :== do |other|
-        return false unless self.class === other
-        other.to_h == to_h
-      end
+      Initializer.define_initialize(self, atts, defaults, blk)
+      include Behavior
 
-      define_method :initialize do |**kwds|
-        missing = atts - kwds.keys
-        raise ArgumentError, "missing required keyword parameters: #{missing.inspect}" unless missing.empty?
-        spurious = kwds.keys - atts - defaults.keys
-        raise ArgumentError, "spurious keyword parameters: #{spurious.inspect}" unless spurious.empty?
+      # define_method :update do |**kwds|
+      #   if frozen?
+      #     new_values = to_h.merge(**kwds)
+      #     self.class.new(**new_values)
+      #   else
+      #     kwds.each do |k, v|
+      #       instance_variable_set("@#{k}", v)
+      #     end
+      #     self
+      #   end
+      # end
 
-        values = defaults.merge(kwds)
-        values.each do |key, value|
-          instance_variable_set("@#{key}", value)
-        end
-        _init if respond_to?(:_init)
-      end
-
-      define_method :to_h do |*|
-        first = atts.inject Hash.new do |h, attribute|
-          h.update(attribute => send(attribute))
-        end
-      defaults.keys.inject first do |h, attribute|
-        h.update(attribute => send(attribute))
-      end
-      end
-      alias_method :deconstruct_keys, :to_h
+      # define_method :update_attribute do |attribute, &blk|
+      #   raise ArgumentError, "cannot update attribute #{attribute.inspect} without a block" unless blk
+      #   update(attribute => blk.(to_h[attribute]))
+      # end
     end
   end
 end

metadata

@@ -1,19 +1,21 @@
 --- !ruby/object:Gem::Specification
 name: l43_open_object
 version: !ruby/object:Gem::Version
-  version: 0.1.1
+  version: 0.2.1
 platform: ruby
 authors:
 - Robert Dober
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2024-04-25 00:00:00.000000000 Z
+date: 2024-04-27 00:00:00.000000000 Z
 dependencies: []
 description: |-
   When using the class method `attributes` in a class you get:
     - an initialize method with attributes as kwd params and the respective defaults
+    - immutable instances
     - a to_h method using all attributes
+    - an update method to create new imutable instances
     - a destruct_keys method aliased to to_h for pattern matching
 email: robert.dober@gmail.com
 executables: []
@@ -23,6 +25,8 @@ files:
 - LICENSE
 - lib/l43.rb
 - lib/l43/open_object.rb
+- lib/l43/open_object/behavior.rb
+- lib/l43/open_object/initializer.rb
 homepage: https://codeberg.org/lab419/l43_open_object
 licenses:
 - AGPL-3.0-or-later