pakyow-reflection 1.0.0.rc1

data/lib/pakyow/reflection/endpoint.rb

@@ -0,0 +1,74 @@
+# frozen_string_literal: true
+
+module Pakyow
+  module Reflection
+    class Exposure
+      attr_reader :scope, :node, :binding, :dataset, :parent, :children
+
+      def initialize(scope:, node:, binding:, dataset: nil, parent: nil)
+        @scope = scope
+        @node = node
+        @binding = binding
+        @dataset = parse_dataset(dataset) if dataset
+        @parent = parent
+        @children = []
+
+        if parent
+          parent.children << self
+        end
+      end
+
+      private
+
+      def parse_dataset(dataset)
+        options = {}
+
+        dataset.to_s.split(";").each do |dataset_part|
+          key, value = dataset_part.split(":", 2).map(&:to_s).map(&:strip)
+
+          value = if value.include?(",") || value.include?("(")
+            value.split(",").map { |value_part|
+              parse_value_part(value_part)
+            }
+          else
+            parse_value_part(value)
+          end
+
+          options[key.to_sym] = value
+        end
+
+        options
+      end
+
+      def parse_value_part(value_part)
+        value_part = value_part.strip
+
+        if value_part.include?("(")
+          value_part.split("(").map { |sub_value_part|
+            sub_value_part.strip.gsub(")", "")
+          }
+        else
+          value_part
+        end
+      end
+    end
+
+    class Endpoint
+      attr_reader :view_path, :options, :exposures
+
+      def initialize(view_path, options: {})
+        @view_path = view_path
+        @options = options || {}
+        @exposures = []
+      end
+
+      def type
+        @options[:type] || :member
+      end
+
+      def add_exposure(exposure)
+        @exposures << exposure
+      end
+    end
+  end
+end

data/lib/pakyow/reflection/extensions/controller.rb

@@ -0,0 +1,302 @@
+# frozen_string_literal: true
+
+require "pakyow/support/core_refinements/array/ensurable"
+
+require "pakyow/support/extension"
+
+module Pakyow
+  module Reflection
+    module Extension
+      module Controller
+        extend Support::Extension
+        restrict_extension Controller
+        using Support::Refinements::Array::Ensurable
+
+        def with_reflected_action
+          if reflected_action
+            yield reflected_action
+          else
+            trigger 404
+          end
+        end
+
+        def with_reflected_endpoint
+          if reflected_endpoint
+            yield reflected_endpoint
+          else
+            trigger 404
+          end
+        end
+
+        def reflected_scope
+          connection.get(:__reflected_scope)
+        end
+
+        def reflected_action
+          connection.get(:__reflected_action)
+        end
+
+        def reflected_endpoint
+          connection.get(:__reflected_endpoint)
+        end
+
+        def reflects_specific_object?(object_name)
+          (
+            self.class.__object_name.name == object_name && (
+              connection.get(:__endpoint_name) == :show || connection.get(:__endpoint_name) == :edit
+            )
+          ) || parent_resource_named?(object_name)
+        end
+
+        def reflective_expose
+          reflected_endpoint.exposures.each do |reflected_exposure|
+            if reflected_exposure.parent.nil? || reflected_exposure.binding.to_s.include?("form")
+              if dataset = reflected_exposure.dataset
+                query = data.send(reflected_exposure.scope.plural_name)
+
+                if dataset.include?(:limit)
+                  query = query.limit(dataset[:limit].to_i)
+                end
+
+                if dataset.include?(:order)
+                  query = query.order(*dataset[:order].to_a)
+                end
+
+                if dataset.include?(:query) && dataset[:query] != "all"
+                  case dataset[:query]
+                  when Array
+                    dataset[:query].each do |key, value|
+                      value = if respond_to?(value)
+                        public_send(value)
+                      else
+                        value
+                      end
+
+                      query = query.public_send(key, value)
+                    end
+                  else
+                    query = query.public_send(dataset[:query].to_s)
+                  end
+                end
+              else
+                query = data.send(reflected_exposure.scope.plural_name)
+
+                if reflects_specific_object?(reflected_exposure.scope.plural_name)
+                  if resource = resource_with_name(reflected_exposure.scope.plural_name)
+                    if resource == self.class
+                      query_param = resource.param
+                      params_param = resource.param
+                    else
+                      query_param = resource.param
+                      params_param = resource.nested_param
+                    end
+
+                    query = query.send(:"by_#{query_param}", params[params_param])
+                  end
+                end
+              end
+
+              if reflected_exposure.children.any?
+                associations = data.send(
+                  reflected_exposure.scope.plural_name
+                ).source.class.associations.values.flatten
+
+                reflected_exposure.children.each do |nested_reflected_exposure|
+                  association = associations.find { |possible_association|
+                    possible_association.associated_source_name == nested_reflected_exposure.scope.plural_name
+                  }
+
+                  if association
+                    query = query.including(association.name)
+                  end
+                end
+              end
+
+              if reflects_specific_object?(reflected_exposure.scope.plural_name) && query.dup.count == 0
+                trigger 404
+              else
+                if !reflected_exposure.binding.to_s.include?("form") || reflected_endpoint.view_path.end_with?("/edit")
+                  expose reflected_exposure.binding, query
+                end
+              end
+            end
+          end
+        end
+
+        def reflective_create
+          logger.debug "[reflection] create"
+          handle_submitted_data
+        end
+
+        def reflective_update
+          logger.debug "[reflection] update"
+          handle_submitted_data
+        end
+
+        def reflective_delete
+          logger.debug "[reflection] delete"
+          handle_submitted_data
+        end
+
+        def verify_submitted_form
+          with_reflected_action do |reflected_action|
+            local = self
+
+            verify do
+              required reflected_action.scope.name do
+                reflected_action.attributes.each do |attribute|
+                  if attribute.required?
+                    required attribute.name do
+                      validate :presence
+                    end
+                  else
+                    optional attribute.name
+                  end
+                end
+
+                local.__send__(:verify_nested_data, reflected_action.nested, self)
+              end
+            end
+          end
+        end
+
+        def handle_submitted_data
+          with_reflected_action do |reflected_action|
+            proxy = data.public_send(reflected_action.scope.plural_name)
+
+            # Pull initial values from the params.
+            #
+            values = params[reflected_action.scope.name]
+
+            # Associate the object with its parent when creating.
+            #
+            if self.class.parent && connection.get(:__endpoint_name) == :create
+              # TODO: Handle cases where objects are associated by id but routed by another field.
+              # Implement when we allow foreign keys to be specified in associations.
+              #
+              values[self.class.parent.nested_param] = params[self.class.parent.nested_param]
+            end
+
+            # Limit the action for update, delete.
+            #
+            if connection.get(:__endpoint_name) == :update || connection.get(:__endpoint_name) == :delete
+              proxy = proxy.public_send(:"by_#{proxy.source.class.primary_key_field}", params[self.class.param])
+              trigger 404 if proxy.count == 0
+            end
+
+            proxy.transaction do
+              unless connection.get(:__endpoint_name) == :delete
+                handle_nested_values_for_source(values, proxy.source.class)
+              end
+
+              @object = proxy.send(
+                connection.get(:__endpoint_name), values
+              )
+            end
+          end
+        rescue Data::ConstraintViolation
+          trigger 404
+        end
+
+        def redirect_to_reflected_destination
+          if destination = reflected_destination
+            redirect destination
+          end
+        end
+
+        def reflected_destination
+          with_reflected_action do |reflected_action|
+            if connection.form && origin = connection.form[:origin]
+              if instance_variable_defined?(:@object) && origin == "/#{reflected_action.scope.plural_name}/new"
+                if self.class.routes[:get].any? { |route| route.name == :show }
+                  path(:"#{reflected_action.scope.plural_name}_show", @object.one.to_h)
+                elsif self.class.routes[:get].any? { |route| route.name == :list }
+                  path(:"#{reflected_action.scope.plural_name}_list")
+                else
+                  origin
+                end
+              else
+                origin
+              end
+            else
+              nil
+            end
+          end
+        end
+
+        private
+
+        def parent_resource_named?(object_name, context = self.class)
+          if context && context.parent
+            context.parent.__object_name&.name == object_name || parent_resource_named?(object_name, context.parent)
+          else
+            false
+          end
+        end
+
+        def resource_with_name(object_name, context = self.class)
+          if context.__object_name&.name == object_name
+            context
+          elsif context.parent
+            resource_with_name(object_name, context.parent)
+          end
+        end
+
+        def verify_nested_data(nested, context)
+          local = self
+          nested.each do |object|
+            context.required object.name do
+              optional local.data.public_send(object.plural_name).source.class.primary_key_field
+
+              object.attributes.each do |attribute|
+                if attribute.required?
+                  required attribute.name
+                else
+                  optional attribute.name
+                end
+              end
+
+              local.__send__(:verify_nested_data, object.nested, self)
+            end
+          end
+        end
+
+        def handle_nested_values_for_source(values, source)
+          source.associations.values_at(:has_one, :has_many).flatten.each do |association|
+            Array.ensure(values).each do |object|
+              if object.include?(association.name)
+                handle_nested_values_for_source(
+                  object[association.name],
+                  association.associated_source
+                )
+
+                if association.result_type == :many
+                  object[association.name] = Array.ensure(object[association.name]).map { |related|
+                    if related.include?(association.associated_source.primary_key_field)
+                      data.public_send(association.associated_source_name).send(
+                        :"by_#{association.associated_source.primary_key_field}",
+                        related[association.associated_source.primary_key_field]
+                      ).update(related).one
+                    else
+                      data.public_send(association.associated_source_name).create(related).one
+                    end
+                  }
+                else
+                  related = object[association.name]
+                  object[association.name] = if related.include?(association.associated_source.primary_key_field)
+                    data.public_send(association.associated_source_name).send(
+                      :"by_#{association.associated_source.primary_key_field}",
+                      related[association.associated_source.primary_key_field]
+                    ).update(related).one
+                  else
+                    data.public_send(association.associated_source_name).create(related).one
+                  end
+                end
+              end
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/pakyow/reflection/framework.rb

@@ -0,0 +1,70 @@
+# frozen_string_literal: true
+
+require "pakyow/framework"
+require "pakyow/support/inflector"
+
+require "pakyow/reflection/behavior/config"
+require "pakyow/reflection/behavior/reflecting"
+require "pakyow/reflection/behavior/rendering/install_form_metadata"
+require "pakyow/reflection/mirror"
+
+module Pakyow
+  module Reflection
+    class Framework < Pakyow::Framework(:reflection)
+      def boot
+        object.include Behavior::Config
+        object.include Behavior::Reflecting
+
+        object.isolated :Renderer do
+          include Behavior::Rendering::InstallFormMetadata
+        end
+
+        object.isolated :Controller do
+          def reflect(&block)
+            operations.reflect(controller: self, &block)
+          end
+        end
+
+        object.after "load" do
+          operation :reflect do
+            action :verify do
+              if (reflected_action = controller.connection.get(:__reflected_action)) && reflected_action.name == controller.connection.get(:__endpoint_name)
+                case reflected_action.name
+                when :create, :update
+                  controller.verify_submitted_form
+                end
+              end
+            end
+
+            action :perform do
+              if (reflected_action = controller.connection.get(:__reflected_action)) && reflected_action.name == controller.connection.get(:__endpoint_name)
+                case reflected_action.name
+                when :create
+                  controller.reflective_create
+                when :update
+                  controller.reflective_update
+                when :delete
+                  controller.reflective_delete
+                end
+              end
+            end
+
+            action :expose do
+              if controller.connection.set?(:__reflected_endpoint)
+                controller.reflective_expose
+              end
+            end
+
+            action :redirect do
+              if (reflected_action = controller.connection.get(:__reflected_action)) && reflected_action.name == controller.connection.get(:__endpoint_name)
+                unless controller.connection.halted?
+                  controller.redirect_to_reflected_destination
+                end
+              end
+            end
+          end
+        end
+      end
+    end
+  end
+end