HexMakina\LeMarchand\LeMarchand

Complexity

Total Complexity

49

Size/Duplication

Total Lines	259
Duplicated Lines	0 %

Importance

Changes	34
Bugs	7	Features	4

15 Methods

Rating	Name	Duplication	Size	Complexity
A	makeInstance()	0	29	5
A	isResolved()	0	3	1
A	cascadeNamespace()	0	14	4
A	hasPrivateContructor()	0	4	2
A	resolved()	0	7	2
A	getConstructorParameters()	0	19	4
A	__debugInfo()	0	8	2
A	__construct()	0	6	2
A	has()	0	9	3
A	getSettings()	0	14	3
B	get()	0	42	10
A	box()	0	10	3
A	getInstance()	0	6	2
A	hasEmbeddedConstructorParameters()	0	3	1
A	wireInstance()	0	24	5

<?php

namespace HexMakina\LeMarchand;

use Psr\Container\ContainerInterface;
use Psr\Container\ContainerExceptionInterface;
use Psr\Container\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 = [];

    // stores the automatically created instances, by class name
    private $instance_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|::new)?/';

    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 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) {
            $class_name = $this->cascadeNamespace($m[1].'\\'.$m[2]);
            // vd($configuration, $class_name);

            if(!isset($m[3]))
              return $this->getInstance($class_name);

            if($m[3] === '::class')
              return $class_name;

            if($m[3] === '::new')
              return $this->makeInstance($class_name);
        }

        // if it is an interface, we respond with an instance
        if (preg_match(self::RX_INTERFACE, $configuration, $m) === 1) {
            return $this->wireInstance($configuration);
        }

        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 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)
    {
        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 = [])
    {
        if(isset($this->instance_cache[$class]))
          return $this->instance_cache[$class];

        return $this->makeInstance($class, $construction_args);
    }

    private function makeInstance($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);
          }
          $this->instance_cache[$class] = $instance;

          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());

The method getName() does not exist on ReflectionType. It seems like you code against a sub-type of ReflectionType such as ReflectionNamedType.

                    } else {
                        $setting = 'settings.Constructor.' . $constructor->class . '.' . $param->getName();
                        $construction_args [] = $this->getSettings($setting);
                    }
                // } catch (NotFoundExceptionInterface $e) {
                //     dd($e);
                // }
            }
        }
        return $construction_args;
    }
}