HexMakina / LeMarchand

LeMarchand.php

<?php

namespace HexMakina\LeMarchand;

use Psr\Container\{ContainerInterface, ContainerExceptionInterface, NotFoundExceptionInterface};

class LeMarchand implements ContainerInterface
{
    private static $instance = null;
    // stores all the settings
    private $configurations = [];

    // stores the namespace cascade
    private $namespace_cascade = [];

    // stores the interface to class wiring
    private $interface_wiring = [];

    // store the resolved names for performance
    private $resolved_cache = [];
    // public const RX_CONTROLLER_NAME = '/([a-zA-Z]+)Controller$/';
    // public const RX_MODEL_CLASS = '/([a-zA-Z]+)(Class|Model)$/';
    const RX_SETTINGS = '/^settings\./';
    // public const RX_INTERFACE_NAME = '/([a-zA-Z]+)Interface$/';
    const RX_CLASS_NAME = '/([a-zA-Z]+)(Class|Model|Controller|Interface)$/';
    const RX_INTERFACE = '/([a-zA-Z]+)Interface$/';

    const RX_MVC = '/(Models|Controllers)\\\([a-zA-Z]+)(::class)?/';

    public static function box($settings = null): ContainerInterface
    {
        if (is_null(self::$instance)) {
            if (is_array($settings)) {
                return (self::$instance = new LeMarchand($settings));
            }
            throw new LamentException('UNABLE_TO_OPEN_BOX');
        }

        return self::$instance;
    }


    private function __construct($settings)
    {
        $this->configurations['settings'] = $settings;
        if (isset($settings['LeMarchand'])) {
            $this->namespace_cascade = $settings['LeMarchand']['cascade'] ?? [];
            $this->interface_wiring = $settings['LeMarchand']['wiring'] ?? [];
        }
    }

    public function __debugInfo(): array
    {
        $dbg = get_object_vars($this);
        if (isset($dbg['configurations']['template_engine'])) {
          // way too long of an object
            $dbg['configurations']['template_engine'] = get_class($dbg['configurations']['template_engine']);
        }
        return $dbg;
    }

    public function put($configuration, $instance)
    {
        if (!is_string($configuration)) {
            throw new LamentException($configuration);
        }
        $this->configurations[$configuration] = $instance;
    }

    public function has($configuration)
    {
        try {
            $this->get($configuration);
            return true;
        } catch (NotFoundExceptionInterface $e) {
            return false;
        } catch (ContainerExceptionInterface $e) {
            return false;
        }
    }


    public function get($configuration)
    {
        if (!is_string($configuration)) {
            throw new LamentException($configuration);
        }
        // 1. is it a first level key ?
        if (isset($this->configurations[$configuration])) {
            return $this->configurations[$configuration];
        }

        // 2. is it configuration data ?
        if (preg_match(self::RX_SETTINGS, $configuration, $m) === 1) {
            return $this->getSettings($configuration);
        }

        // 3. is it an existing class
        if (class_exists($configuration)) {
            return $this->getInstance($configuration);
        }


        // vdt($configuration, __FUNCTION__);
        if (preg_match(self::RX_MVC, $configuration, $m) === 1) {
            return $this->classification($m[2], $m[1], isset($m[3]));
        }

        // if it is an interface, we respond with an instance
        if (preg_match(self::RX_INTERFACE, $configuration, $m) === 1) {
          // vdt($configuration,__FUNCTION__);
            return $this->wireInstance($configuration);
            // return $this->classification($m[2], $m[1], isset($m[3]));
        }

        // 3. is it a class
        // vdt($configuration, __FUNCTION__);
        // if (preg_match(self::RX_CLASS_NAME, $configuration, $m) === 1) {
        //     return $this->classification($m[1], $m[2]);
        // }

        throw new ConfigurationException($configuration);
    }


    private function getSettings($setting)
    {
        // vd(__FUNCTION__);
        $ret = $this->configurations;

      //dot based hierarchy, parse and climb
        foreach (explode('.', $setting) as $k) {
            if (!isset($ret[$k])) {
                throw new ConfigurationException($setting);
            }
            $ret = $ret[$k];
        }

        return $ret;
    }

    private function classification($name, $type, $only_class_name = false)
    {
        $class_name = $this->cascadeNamespace("$type\\$name");
        // vd($class_name, __FUNCTION__);
        if ($only_class_name === true) {
            return $class_name;
        }

        return $this->getInstance($class_name);
    }

    private function resolved($clue, $solution = null)
    {
        if (!is_null($solution)) {
            $this->resolved_cache[$clue] = $solution;
        }
        // vd($clue, __FUNCTION__);
        return $this->resolved_cache[$clue] ?? null;
    }

    private function isResolved($clue): bool
    {
        return isset($this->resolved_cache[$clue]);
    }

    private function cascadeNamespace($class_name, $mvc_type = null)

The parameter $mvc_type is not used and could be removed.

    {
        if ($this->isResolved($class_name)) {
            return $this->resolved($class_name);
        }

        // not fully namespaced, lets cascade
        foreach ($this->namespace_cascade as $ns) {
            if (class_exists($fully_namespaced = $ns . $class_name)) {
                $this->resolved($class_name, $fully_namespaced);
                return $fully_namespaced;
            }
        }
        throw new ConfigurationException($class_name);
    }

    private function wireInstance($interface)
    {
        // vd($interface, __FUNCTION__);

        if (!isset($this->interface_wiring[$interface])) {
            throw new ConfigurationException($interface);
        }

        $wire = $this->interface_wiring[$interface];

        // interface + constructor params
        if ($this->hasEmbeddedConstructorParameters($wire)) {
            $class = array_shift($wire);
            $args = $wire;
        } else {
            $class = $wire;
            $args = null;
        }

        if ($this->isResolved($class) && $this->hasPrivateContructor($class)) {
            return $this->resolved($class);
        }

        return $this->getInstance($class, $args);
    }

    private function hasPrivateContructor($class_name): bool
    {
        $rc = new \ReflectionClass($class_name);
        return !is_null($constructor = $rc->getConstructor()) && $constructor->isPrivate();
    }

    private function hasEmbeddedConstructorParameters($wire)
    {
        return is_array($wire);
    }

    private function getInstance($class, $construction_args = [])
    {
        try {
            $rc = new \ReflectionClass($class);
            $instance = null;

            if (!is_null($constructor = $rc->getConstructor())) {
                $construction_args = $this->getConstructorParameters($constructor, $construction_args);

                if ($constructor->isPrivate()) { // singleton ?
                  // first argument is the static instance-making method
                    $singleton_method = $rc->getMethod(array_shift($construction_args));
                  // invoke the method with remaining constructor args
                    $instance = $this->resolved($class, $singleton_method->invoke(null, $construction_args));
                } else {
                    $instance = $rc->newInstanceArgs($construction_args);
                }
            } else {
                $instance = $rc->newInstanceArgs();
            }

            if ($rc->hasMethod('set_container')) {
                $instance->set_container($this);
            }

            return $instance;
        } catch (\ReflectionException $e) {
            throw new LamentException($e->getMessage());
        }
    }


    private function getConstructorParameters(\ReflectionMethod $constructor, $construction_args = [])
    {
      // vd(__FUNCTION__);

        if (empty($construction_args)) {
            foreach ($constructor->getParameters() as $param) {
                try {
                    if ($param->getType()) {
                        $construction_args [] = $this->get($param->getType()->getName());
                    } else {
                        $setting = 'settings.Constructor.' . $constructor->class . '.' . $param->getName();
                        $construction_args [] = $this->getSettings($setting);
                    }
                } catch (NotFoundExceptionInterface $e) {
                    dd($e);

The function dd was not found. Maybe you did not declare it correctly or list all dependencies?

                }
            }
        }
        return $construction_args;
    }
}