285 lines
9.8 KiB
PHP
285 lines
9.8 KiB
PHP
|
<?php declare(strict_types=1);
|
||
|
|
||
|
namespace PhpParser;
|
||
|
|
||
|
use PhpParser\Node\Name;
|
||
|
use PhpParser\Node\Name\FullyQualified;
|
||
|
use PhpParser\Node\Stmt;
|
||
|
|
||
|
class NameContext {
|
||
|
/** @var null|Name Current namespace */
|
||
|
protected ?Name $namespace;
|
||
|
|
||
|
/** @var Name[][] Map of format [aliasType => [aliasName => originalName]] */
|
||
|
protected array $aliases = [];
|
||
|
|
||
|
/** @var Name[][] Same as $aliases but preserving original case */
|
||
|
protected array $origAliases = [];
|
||
|
|
||
|
/** @var ErrorHandler Error handler */
|
||
|
protected ErrorHandler $errorHandler;
|
||
|
|
||
|
/**
|
||
|
* Create a name context.
|
||
|
*
|
||
|
* @param ErrorHandler $errorHandler Error handling used to report errors
|
||
|
*/
|
||
|
public function __construct(ErrorHandler $errorHandler) {
|
||
|
$this->errorHandler = $errorHandler;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Start a new namespace.
|
||
|
*
|
||
|
* This also resets the alias table.
|
||
|
*
|
||
|
* @param Name|null $namespace Null is the global namespace
|
||
|
*/
|
||
|
public function startNamespace(?Name $namespace = null): void {
|
||
|
$this->namespace = $namespace;
|
||
|
$this->origAliases = $this->aliases = [
|
||
|
Stmt\Use_::TYPE_NORMAL => [],
|
||
|
Stmt\Use_::TYPE_FUNCTION => [],
|
||
|
Stmt\Use_::TYPE_CONSTANT => [],
|
||
|
];
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Add an alias / import.
|
||
|
*
|
||
|
* @param Name $name Original name
|
||
|
* @param string $aliasName Aliased name
|
||
|
* @param Stmt\Use_::TYPE_* $type One of Stmt\Use_::TYPE_*
|
||
|
* @param array<string, mixed> $errorAttrs Attributes to use to report an error
|
||
|
*/
|
||
|
public function addAlias(Name $name, string $aliasName, int $type, array $errorAttrs = []): void {
|
||
|
// Constant names are case sensitive, everything else case insensitive
|
||
|
if ($type === Stmt\Use_::TYPE_CONSTANT) {
|
||
|
$aliasLookupName = $aliasName;
|
||
|
} else {
|
||
|
$aliasLookupName = strtolower($aliasName);
|
||
|
}
|
||
|
|
||
|
if (isset($this->aliases[$type][$aliasLookupName])) {
|
||
|
$typeStringMap = [
|
||
|
Stmt\Use_::TYPE_NORMAL => '',
|
||
|
Stmt\Use_::TYPE_FUNCTION => 'function ',
|
||
|
Stmt\Use_::TYPE_CONSTANT => 'const ',
|
||
|
];
|
||
|
|
||
|
$this->errorHandler->handleError(new Error(
|
||
|
sprintf(
|
||
|
'Cannot use %s%s as %s because the name is already in use',
|
||
|
$typeStringMap[$type], $name, $aliasName
|
||
|
),
|
||
|
$errorAttrs
|
||
|
));
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
$this->aliases[$type][$aliasLookupName] = $name;
|
||
|
$this->origAliases[$type][$aliasName] = $name;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Get current namespace.
|
||
|
*
|
||
|
* @return null|Name Namespace (or null if global namespace)
|
||
|
*/
|
||
|
public function getNamespace(): ?Name {
|
||
|
return $this->namespace;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Get resolved name.
|
||
|
*
|
||
|
* @param Name $name Name to resolve
|
||
|
* @param Stmt\Use_::TYPE_* $type One of Stmt\Use_::TYPE_{FUNCTION|CONSTANT}
|
||
|
*
|
||
|
* @return null|Name Resolved name, or null if static resolution is not possible
|
||
|
*/
|
||
|
public function getResolvedName(Name $name, int $type): ?Name {
|
||
|
// don't resolve special class names
|
||
|
if ($type === Stmt\Use_::TYPE_NORMAL && $name->isSpecialClassName()) {
|
||
|
if (!$name->isUnqualified()) {
|
||
|
$this->errorHandler->handleError(new Error(
|
||
|
sprintf("'\\%s' is an invalid class name", $name->toString()),
|
||
|
$name->getAttributes()
|
||
|
));
|
||
|
}
|
||
|
return $name;
|
||
|
}
|
||
|
|
||
|
// fully qualified names are already resolved
|
||
|
if ($name->isFullyQualified()) {
|
||
|
return $name;
|
||
|
}
|
||
|
|
||
|
// Try to resolve aliases
|
||
|
if (null !== $resolvedName = $this->resolveAlias($name, $type)) {
|
||
|
return $resolvedName;
|
||
|
}
|
||
|
|
||
|
if ($type !== Stmt\Use_::TYPE_NORMAL && $name->isUnqualified()) {
|
||
|
if (null === $this->namespace) {
|
||
|
// outside of a namespace unaliased unqualified is same as fully qualified
|
||
|
return new FullyQualified($name, $name->getAttributes());
|
||
|
}
|
||
|
|
||
|
// Cannot resolve statically
|
||
|
return null;
|
||
|
}
|
||
|
|
||
|
// if no alias exists prepend current namespace
|
||
|
return FullyQualified::concat($this->namespace, $name, $name->getAttributes());
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Get resolved class name.
|
||
|
*
|
||
|
* @param Name $name Class ame to resolve
|
||
|
*
|
||
|
* @return Name Resolved name
|
||
|
*/
|
||
|
public function getResolvedClassName(Name $name): Name {
|
||
|
return $this->getResolvedName($name, Stmt\Use_::TYPE_NORMAL);
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Get possible ways of writing a fully qualified name (e.g., by making use of aliases).
|
||
|
*
|
||
|
* @param string $name Fully-qualified name (without leading namespace separator)
|
||
|
* @param Stmt\Use_::TYPE_* $type One of Stmt\Use_::TYPE_*
|
||
|
*
|
||
|
* @return Name[] Possible representations of the name
|
||
|
*/
|
||
|
public function getPossibleNames(string $name, int $type): array {
|
||
|
$lcName = strtolower($name);
|
||
|
|
||
|
if ($type === Stmt\Use_::TYPE_NORMAL) {
|
||
|
// self, parent and static must always be unqualified
|
||
|
if ($lcName === "self" || $lcName === "parent" || $lcName === "static") {
|
||
|
return [new Name($name)];
|
||
|
}
|
||
|
}
|
||
|
|
||
|
// Collect possible ways to write this name, starting with the fully-qualified name
|
||
|
$possibleNames = [new FullyQualified($name)];
|
||
|
|
||
|
if (null !== $nsRelativeName = $this->getNamespaceRelativeName($name, $lcName, $type)) {
|
||
|
// Make sure there is no alias that makes the normally namespace-relative name
|
||
|
// into something else
|
||
|
if (null === $this->resolveAlias($nsRelativeName, $type)) {
|
||
|
$possibleNames[] = $nsRelativeName;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
// Check for relevant namespace use statements
|
||
|
foreach ($this->origAliases[Stmt\Use_::TYPE_NORMAL] as $alias => $orig) {
|
||
|
$lcOrig = $orig->toLowerString();
|
||
|
if (0 === strpos($lcName, $lcOrig . '\\')) {
|
||
|
$possibleNames[] = new Name($alias . substr($name, strlen($lcOrig)));
|
||
|
}
|
||
|
}
|
||
|
|
||
|
// Check for relevant type-specific use statements
|
||
|
foreach ($this->origAliases[$type] as $alias => $orig) {
|
||
|
if ($type === Stmt\Use_::TYPE_CONSTANT) {
|
||
|
// Constants are complicated-sensitive
|
||
|
$normalizedOrig = $this->normalizeConstName($orig->toString());
|
||
|
if ($normalizedOrig === $this->normalizeConstName($name)) {
|
||
|
$possibleNames[] = new Name($alias);
|
||
|
}
|
||
|
} else {
|
||
|
// Everything else is case-insensitive
|
||
|
if ($orig->toLowerString() === $lcName) {
|
||
|
$possibleNames[] = new Name($alias);
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return $possibleNames;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Get shortest representation of this fully-qualified name.
|
||
|
*
|
||
|
* @param string $name Fully-qualified name (without leading namespace separator)
|
||
|
* @param Stmt\Use_::TYPE_* $type One of Stmt\Use_::TYPE_*
|
||
|
*
|
||
|
* @return Name Shortest representation
|
||
|
*/
|
||
|
public function getShortName(string $name, int $type): Name {
|
||
|
$possibleNames = $this->getPossibleNames($name, $type);
|
||
|
|
||
|
// Find shortest name
|
||
|
$shortestName = null;
|
||
|
$shortestLength = \INF;
|
||
|
foreach ($possibleNames as $possibleName) {
|
||
|
$length = strlen($possibleName->toCodeString());
|
||
|
if ($length < $shortestLength) {
|
||
|
$shortestName = $possibleName;
|
||
|
$shortestLength = $length;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return $shortestName;
|
||
|
}
|
||
|
|
||
|
private function resolveAlias(Name $name, int $type): ?FullyQualified {
|
||
|
$firstPart = $name->getFirst();
|
||
|
|
||
|
if ($name->isQualified()) {
|
||
|
// resolve aliases for qualified names, always against class alias table
|
||
|
$checkName = strtolower($firstPart);
|
||
|
if (isset($this->aliases[Stmt\Use_::TYPE_NORMAL][$checkName])) {
|
||
|
$alias = $this->aliases[Stmt\Use_::TYPE_NORMAL][$checkName];
|
||
|
return FullyQualified::concat($alias, $name->slice(1), $name->getAttributes());
|
||
|
}
|
||
|
} elseif ($name->isUnqualified()) {
|
||
|
// constant aliases are case-sensitive, function aliases case-insensitive
|
||
|
$checkName = $type === Stmt\Use_::TYPE_CONSTANT ? $firstPart : strtolower($firstPart);
|
||
|
if (isset($this->aliases[$type][$checkName])) {
|
||
|
// resolve unqualified aliases
|
||
|
return new FullyQualified($this->aliases[$type][$checkName], $name->getAttributes());
|
||
|
}
|
||
|
}
|
||
|
|
||
|
// No applicable aliases
|
||
|
return null;
|
||
|
}
|
||
|
|
||
|
private function getNamespaceRelativeName(string $name, string $lcName, int $type): ?Name {
|
||
|
if (null === $this->namespace) {
|
||
|
return new Name($name);
|
||
|
}
|
||
|
|
||
|
if ($type === Stmt\Use_::TYPE_CONSTANT) {
|
||
|
// The constants true/false/null always resolve to the global symbols, even inside a
|
||
|
// namespace, so they may be used without qualification
|
||
|
if ($lcName === "true" || $lcName === "false" || $lcName === "null") {
|
||
|
return new Name($name);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
$namespacePrefix = strtolower($this->namespace . '\\');
|
||
|
if (0 === strpos($lcName, $namespacePrefix)) {
|
||
|
return new Name(substr($name, strlen($namespacePrefix)));
|
||
|
}
|
||
|
|
||
|
return null;
|
||
|
}
|
||
|
|
||
|
private function normalizeConstName(string $name): string {
|
||
|
$nsSep = strrpos($name, '\\');
|
||
|
if (false === $nsSep) {
|
||
|
return $name;
|
||
|
}
|
||
|
|
||
|
// Constants have case-insensitive namespace and case-sensitive short-name
|
||
|
$ns = substr($name, 0, $nsSep);
|
||
|
$shortName = substr($name, $nsSep + 1);
|
||
|
return strtolower($ns) . '\\' . $shortName;
|
||
|
}
|
||
|
}
|