Chris@0: <?php
Chris@0: 
Chris@0: /*
Chris@0:  * This file is part of Psy Shell.
Chris@0:  *
Chris@0:  * (c) 2012-2017 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\Sudo;
Chris@0: 
Chris@0: use PhpParser\Node;
Chris@0: use PhpParser\Node\Arg;
Chris@0: use PhpParser\Node\Expr\Assign;
Chris@0: use PhpParser\Node\Expr\ClassConstFetch;
Chris@0: use PhpParser\Node\Expr\MethodCall;
Chris@0: use PhpParser\Node\Expr\PropertyFetch;
Chris@0: use PhpParser\Node\Expr\StaticCall;
Chris@0: use PhpParser\Node\Expr\StaticPropertyFetch;
Chris@0: use PhpParser\Node\Name\FullyQualified as FullyQualifiedName;
Chris@0: use PhpParser\Node\Scalar\String_;
Chris@0: use PhpParser\NodeVisitorAbstract;
Chris@0: 
Chris@0: /**
Chris@0:  * A PHP Parser node visitor which rewrites property and method access to use
Chris@0:  * the Psy\Sudo visibility bypass methods.
Chris@0:  *
Chris@0:  * @todo handle assigning by reference
Chris@0:  */
Chris@0: class SudoVisitor extends NodeVisitorAbstract
Chris@0: {
Chris@0:     const SUDO_CLASS = 'Psy\Sudo';
Chris@0: 
Chris@0:     const PROPERTY_FETCH         = 'fetchProperty';
Chris@0:     const PROPERTY_ASSIGN        = 'assignProperty';
Chris@0:     const METHOD_CALL            = 'callMethod';
Chris@0:     const STATIC_PROPERTY_FETCH  = 'fetchStaticProperty';
Chris@0:     const STATIC_PROPERTY_ASSIGN = 'assignStaticProperty';
Chris@0:     const STATIC_CALL            = 'callStatic';
Chris@0:     const CLASS_CONST_FETCH      = 'fetchClassConst';
Chris@0: 
Chris@0:     /**
Chris@0:      * {@inheritdoc}
Chris@0:      */
Chris@0:     public function enterNode(Node $node)
Chris@0:     {
Chris@0:         if ($node instanceof PropertyFetch) {
Chris@0:             $args = array(
Chris@0:                 $node->var,
Chris@0:                 is_string($node->name) ? new String_($node->name) : $node->name,
Chris@0:             );
Chris@0: 
Chris@0:             return $this->prepareCall(self::PROPERTY_FETCH, $args);
Chris@0:         } elseif ($node instanceof Assign && $node->var instanceof PropertyFetch) {
Chris@0:             $target = $node->var;
Chris@0:             $args = array(
Chris@0:                 $target->var,
Chris@0:                 is_string($target->name) ? new String_($target->name) : $target->name,
Chris@0:                 $node->expr,
Chris@0:             );
Chris@0: 
Chris@0:             return $this->prepareCall(self::PROPERTY_ASSIGN, $args);
Chris@0:         } elseif ($node instanceof MethodCall) {
Chris@0:             $args = $node->args;
Chris@0:             array_unshift($args, new Arg(is_string($node->name) ? new String_($node->name) : $node->name));
Chris@0:             array_unshift($args, new Arg($node->var));
Chris@0: 
Chris@0:             // not using prepareCall because the $node->args we started with are already Arg instances
Chris@0:             return new StaticCall(new FullyQualifiedName(self::SUDO_CLASS), self::METHOD_CALL, $args);
Chris@0:         } elseif ($node instanceof StaticPropertyFetch) {
Chris@0:             $class = $node->class instanceof Name ? (string) $node->class : $node->class;
Chris@0:             $args = array(
Chris@0:                 is_string($class) ? new String_($class) : $class,
Chris@0:                 is_string($node->name) ? new String_($node->name) : $node->name,
Chris@0:             );
Chris@0: 
Chris@0:             return $this->prepareCall(self::STATIC_PROPERTY_FETCH, $args);
Chris@0:         } elseif ($node instanceof Assign && $node->var instanceof StaticPropertyFetch) {
Chris@0:             $target = $node->var;
Chris@0:             $class = $target->class instanceof Name ? (string) $target->class : $target->class;
Chris@0:             $args = array(
Chris@0:                 is_string($class) ? new String_($class) : $class,
Chris@0:                 is_string($target->name) ? new String_($target->name) : $target->name,
Chris@0:                 $node->expr,
Chris@0:             );
Chris@0: 
Chris@0:             return $this->prepareCall(self::STATIC_PROPERTY_ASSIGN, $args);
Chris@0:         } elseif ($node instanceof StaticCall) {
Chris@0:             $args = $node->args;
Chris@0:             $class = $node->class instanceof Name ? (string) $node->class : $node->class;
Chris@0:             array_unshift($args, new Arg(is_string($node->name) ? new String_($node->name) : $node->name));
Chris@0:             array_unshift($args, new Arg(is_string($class) ? new String_($class) : $class));
Chris@0: 
Chris@0:             // not using prepareCall because the $node->args we started with are already Arg instances
Chris@0:             return new StaticCall(new FullyQualifiedName(self::SUDO_CLASS), self::STATIC_CALL, $args);
Chris@0:         } elseif ($node instanceof ClassConstFetch) {
Chris@0:             $class = $node->class instanceof Name ? (string) $node->class : $node->class;
Chris@0:             $args = array(
Chris@0:                 is_string($class) ? new String_($class) : $class,
Chris@0:                 is_string($node->name) ? new String_($node->name) : $node->name,
Chris@0:             );
Chris@0: 
Chris@0:             return $this->prepareCall(self::CLASS_CONST_FETCH, $args);
Chris@0:         }
Chris@0:     }
Chris@0: 
Chris@0:     private function prepareCall($method, $args)
Chris@0:     {
Chris@0:         return new StaticCall(new FullyQualifiedName(self::SUDO_CLASS), $method, array_map(function ($arg) {
Chris@0:             return new Arg($arg);
Chris@0:         }, $args));
Chris@0:     }
Chris@0: }