Chris@0: <?php
Chris@0: 
Chris@0: /*
Chris@0:  * This file is part of Psy Shell.
Chris@0:  *
Chris@0:  * (c) 2012-2018 Justin Hileman
Chris@0:  *
Chris@0:  * For the full copyright and license information, please view the LICENSE
Chris@0:  * file that was distributed with this source code.
Chris@0:  */
Chris@0: 
Chris@0: namespace Psy\Command;
Chris@0: 
Chris@0: use Psy\CodeCleaner\NoReturnValue;
Chris@0: use Psy\Context;
Chris@0: use Psy\ContextAware;
Chris@0: use Psy\Exception\ErrorException;
Chris@0: use Psy\Exception\RuntimeException;
Chris@0: use Psy\Util\Mirror;
Chris@0: 
Chris@0: /**
Chris@0:  * An abstract command with helpers for inspecting the current context.
Chris@0:  */
Chris@0: abstract class ReflectingCommand extends Command implements ContextAware
Chris@0: {
Chris@0:     const CLASS_OR_FUNC   = '/^[\\\\\w]+$/';
Chris@0:     const CLASS_MEMBER    = '/^([\\\\\w]+)::(\w+)$/';
Chris@0:     const CLASS_STATIC    = '/^([\\\\\w]+)::\$(\w+)$/';
Chris@0:     const INSTANCE_MEMBER = '/^(\$\w+)(::|->)(\w+)$/';
Chris@0: 
Chris@0:     /**
Chris@0:      * Context instance (for ContextAware interface).
Chris@0:      *
Chris@0:      * @var Context
Chris@0:      */
Chris@0:     protected $context;
Chris@0: 
Chris@0:     /**
Chris@0:      * ContextAware interface.
Chris@0:      *
Chris@0:      * @param Context $context
Chris@0:      */
Chris@0:     public function setContext(Context $context)
Chris@0:     {
Chris@0:         $this->context = $context;
Chris@0:     }
Chris@0: 
Chris@0:     /**
Chris@0:      * Get the target for a value.
Chris@0:      *
Chris@0:      * @throws \InvalidArgumentException when the value specified can't be resolved
Chris@0:      *
Chris@0:      * @param string $valueName Function, class, variable, constant, method or property name
Chris@0:      *
Chris@0:      * @return array (class or instance name, member name, kind)
Chris@0:      */
Chris@0:     protected function getTarget($valueName)
Chris@0:     {
Chris@0:         $valueName = trim($valueName);
Chris@0:         $matches   = [];
Chris@0:         switch (true) {
Chris@0:             case preg_match(self::CLASS_OR_FUNC, $valueName, $matches):
Chris@0:                 return [$this->resolveName($matches[0], true), null, 0];
Chris@0: 
Chris@0:             case preg_match(self::CLASS_MEMBER, $valueName, $matches):
Chris@0:                 return [$this->resolveName($matches[1]), $matches[2], Mirror::CONSTANT | Mirror::METHOD];
Chris@0: 
Chris@0:             case preg_match(self::CLASS_STATIC, $valueName, $matches):
Chris@0:                 return [$this->resolveName($matches[1]), $matches[2], Mirror::STATIC_PROPERTY | Mirror::PROPERTY];
Chris@0: 
Chris@0:             case preg_match(self::INSTANCE_MEMBER, $valueName, $matches):
Chris@0:                 if ($matches[2] === '->') {
Chris@0:                     $kind = Mirror::METHOD | Mirror::PROPERTY;
Chris@0:                 } else {
Chris@0:                     $kind = Mirror::CONSTANT | Mirror::METHOD;
Chris@0:                 }
Chris@0: 
Chris@0:                 return [$this->resolveObject($matches[1]), $matches[3], $kind];
Chris@0: 
Chris@0:             default:
Chris@0:                 return [$this->resolveObject($valueName), null, 0];
Chris@0:         }
Chris@0:     }
Chris@0: 
Chris@0:     /**
Chris@0:      * Resolve a class or function name (with the current shell namespace).
Chris@0:      *
Chris@0:      * @throws ErrorException when `self` or `static` is used in a non-class scope
Chris@0:      *
Chris@0:      * @param string $name
Chris@0:      * @param bool   $includeFunctions (default: false)
Chris@0:      *
Chris@0:      * @return string
Chris@0:      */
Chris@0:     protected function resolveName($name, $includeFunctions = false)
Chris@0:     {
Chris@0:         $shell = $this->getApplication();
Chris@0: 
Chris@0:         // While not *technically* 100% accurate, let's treat `self` and `static` as equivalent.
Chris@0:         if (in_array(strtolower($name), ['self', 'static'])) {
Chris@0:             if ($boundClass = $shell->getBoundClass()) {
Chris@0:                 return $boundClass;
Chris@0:             }
Chris@0: 
Chris@0:             if ($boundObject = $shell->getBoundObject()) {
Chris@0:                 return get_class($boundObject);
Chris@0:             }
Chris@0: 
Chris@0:             $msg = sprintf('Cannot use "%s" when no class scope is active', strtolower($name));
Chris@0:             throw new ErrorException($msg, 0, E_USER_ERROR, "eval()'d code", 1);
Chris@0:         }
Chris@0: 
Chris@0:         if (substr($name, 0, 1) === '\\') {
Chris@0:             return $name;
Chris@0:         }
Chris@0: 
Chris@0:         if ($namespace = $shell->getNamespace()) {
Chris@0:             $fullName = $namespace . '\\' . $name;
Chris@0: 
Chris@0:             if (class_exists($fullName) || interface_exists($fullName) || ($includeFunctions && function_exists($fullName))) {
Chris@0:                 return $fullName;
Chris@0:             }
Chris@0:         }
Chris@0: 
Chris@0:         return $name;
Chris@0:     }
Chris@0: 
Chris@0:     /**
Chris@0:      * Get a Reflector and documentation for a function, class or instance, constant, method or property.
Chris@0:      *
Chris@0:      * @param string $valueName Function, class, variable, constant, method or property name
Chris@0:      *
Chris@0:      * @return array (value, Reflector)
Chris@0:      */
Chris@0:     protected function getTargetAndReflector($valueName)
Chris@0:     {
Chris@0:         list($value, $member, $kind) = $this->getTarget($valueName);
Chris@0: 
Chris@0:         return [$value, Mirror::get($value, $member, $kind)];
Chris@0:     }
Chris@0: 
Chris@0:     /**
Chris@0:      * Resolve code to a value in the current scope.
Chris@0:      *
Chris@0:      * @throws RuntimeException when the code does not return a value in the current scope
Chris@0:      *
Chris@0:      * @param string $code
Chris@0:      *
Chris@0:      * @return mixed Variable value
Chris@0:      */
Chris@0:     protected function resolveCode($code)
Chris@0:     {
Chris@0:         try {
Chris@0:             $value = $this->getApplication()->execute($code, true);
Chris@0:         } catch (\Exception $e) {
Chris@0:             // Swallow all exceptions?
Chris@0:         }
Chris@0: 
Chris@0:         if (!isset($value) || $value instanceof NoReturnValue) {
Chris@0:             throw new RuntimeException('Unknown target: ' . $code);
Chris@0:         }
Chris@0: 
Chris@0:         return $value;
Chris@0:     }
Chris@0: 
Chris@0:     /**
Chris@0:      * Resolve code to an object in the current scope.
Chris@0:      *
Chris@0:      * @throws RuntimeException when the code resolves to a non-object value
Chris@0:      *
Chris@0:      * @param string $code
Chris@0:      *
Chris@0:      * @return object Variable instance
Chris@0:      */
Chris@0:     private function resolveObject($code)
Chris@0:     {
Chris@0:         $value = $this->resolveCode($code);
Chris@0: 
Chris@0:         if (!is_object($value)) {
Chris@0:             throw new RuntimeException('Unable to inspect a non-object');
Chris@0:         }
Chris@0: 
Chris@0:         return $value;
Chris@0:     }
Chris@0: 
Chris@0:     /**
Chris@0:      * @deprecated Use `resolveCode` instead
Chris@0:      *
Chris@0:      * @param string $name
Chris@0:      *
Chris@0:      * @return mixed Variable instance
Chris@0:      */
Chris@0:     protected function resolveInstance($name)
Chris@0:     {
Chris@0:         @trigger_error('`resolveInstance` is deprecated; use `resolveCode` instead.', E_USER_DEPRECATED);
Chris@0: 
Chris@0:         return $this->resolveCode($name);
Chris@0:     }
Chris@0: 
Chris@0:     /**
Chris@0:      * Get a variable from the current shell scope.
Chris@0:      *
Chris@0:      * @param string $name
Chris@0:      *
Chris@0:      * @return mixed
Chris@0:      */
Chris@0:     protected function getScopeVariable($name)
Chris@0:     {
Chris@0:         return $this->context->get($name);
Chris@0:     }
Chris@0: 
Chris@0:     /**
Chris@0:      * Get all scope variables from the current shell scope.
Chris@0:      *
Chris@0:      * @return array
Chris@0:      */
Chris@0:     protected function getScopeVariables()
Chris@0:     {
Chris@0:         return $this->context->getAll();
Chris@0:     }
Chris@0: 
Chris@0:     /**
Chris@0:      * Given a Reflector instance, set command-scope variables in the shell
Chris@0:      * execution context. This is used to inject magic $__class, $__method and
Chris@0:      * $__file variables (as well as a handful of others).
Chris@0:      *
Chris@0:      * @param \Reflector $reflector
Chris@0:      */
Chris@0:     protected function setCommandScopeVariables(\Reflector $reflector)
Chris@0:     {
Chris@0:         $vars = [];
Chris@0: 
Chris@0:         switch (get_class($reflector)) {
Chris@0:             case 'ReflectionClass':
Chris@0:             case 'ReflectionObject':
Chris@0:                 $vars['__class'] = $reflector->name;
Chris@0:                 if ($reflector->inNamespace()) {
Chris@0:                     $vars['__namespace'] = $reflector->getNamespaceName();
Chris@0:                 }
Chris@0:                 break;
Chris@0: 
Chris@0:             case 'ReflectionMethod':
Chris@0:                 $vars['__method'] = sprintf('%s::%s', $reflector->class, $reflector->name);
Chris@0:                 $vars['__class'] = $reflector->class;
Chris@0:                 $classReflector = $reflector->getDeclaringClass();
Chris@0:                 if ($classReflector->inNamespace()) {
Chris@0:                     $vars['__namespace'] = $classReflector->getNamespaceName();
Chris@0:                 }
Chris@0:                 break;
Chris@0: 
Chris@0:             case 'ReflectionFunction':
Chris@0:                 $vars['__function'] = $reflector->name;
Chris@0:                 if ($reflector->inNamespace()) {
Chris@0:                     $vars['__namespace'] = $reflector->getNamespaceName();
Chris@0:                 }
Chris@0:                 break;
Chris@0: 
Chris@0:             case 'ReflectionGenerator':
Chris@0:                 $funcReflector = $reflector->getFunction();
Chris@0:                 $vars['__function'] = $funcReflector->name;
Chris@0:                 if ($funcReflector->inNamespace()) {
Chris@0:                     $vars['__namespace'] = $funcReflector->getNamespaceName();
Chris@0:                 }
Chris@0:                 if ($fileName = $reflector->getExecutingFile()) {
Chris@0:                     $vars['__file'] = $fileName;
Chris@0:                     $vars['__line'] = $reflector->getExecutingLine();
Chris@0:                     $vars['__dir']  = dirname($fileName);
Chris@0:                 }
Chris@0:                 break;
Chris@0: 
Chris@0:             case 'ReflectionProperty':
Chris@0:             case 'ReflectionClassConstant':
Chris@0:             case 'Psy\Reflection\ReflectionClassConstant':
Chris@0:                 $classReflector = $reflector->getDeclaringClass();
Chris@0:                 $vars['__class'] = $classReflector->name;
Chris@0:                 if ($classReflector->inNamespace()) {
Chris@0:                     $vars['__namespace'] = $classReflector->getNamespaceName();
Chris@0:                 }
Chris@0:                 // no line for these, but this'll do
Chris@0:                 if ($fileName = $reflector->getDeclaringClass()->getFileName()) {
Chris@0:                     $vars['__file'] = $fileName;
Chris@0:                     $vars['__dir']  = dirname($fileName);
Chris@0:                 }
Chris@0:                 break;
Chris@0: 
Chris@0:             case 'Psy\Reflection\ReflectionConstant_':
Chris@0:                 if ($reflector->inNamespace()) {
Chris@0:                     $vars['__namespace'] = $reflector->getNamespaceName();
Chris@0:                 }
Chris@0:                 break;
Chris@0:         }
Chris@0: 
Chris@0:         if ($reflector instanceof \ReflectionClass || $reflector instanceof \ReflectionFunctionAbstract) {
Chris@0:             if ($fileName = $reflector->getFileName()) {
Chris@0:                 $vars['__file'] = $fileName;
Chris@0:                 $vars['__line'] = $reflector->getStartLine();
Chris@0:                 $vars['__dir']  = dirname($fileName);
Chris@0:             }
Chris@0:         }
Chris@0: 
Chris@0:         $this->context->setCommandScopeVariables($vars);
Chris@0:     }
Chris@0: }