annotate vendor/nikic/php-parser/lib/PhpParser/Lexer/Emulative.php @ 0:4c8ae668cc8c

Initial import (non-working)
author Chris Cannam
date Wed, 29 Nov 2017 16:09:58 +0000
parents
children 5fb285c0d0e3
rev   line source
Chris@0 1 <?php
Chris@0 2
Chris@0 3 namespace PhpParser\Lexer;
Chris@0 4
Chris@0 5 use PhpParser\ErrorHandler;
Chris@0 6 use PhpParser\Parser\Tokens;
Chris@0 7
Chris@0 8 class Emulative extends \PhpParser\Lexer
Chris@0 9 {
Chris@0 10 protected $newKeywords;
Chris@0 11 protected $inObjectAccess;
Chris@0 12
Chris@0 13 const T_ELLIPSIS = 1001;
Chris@0 14 const T_POW = 1002;
Chris@0 15 const T_POW_EQUAL = 1003;
Chris@0 16 const T_COALESCE = 1004;
Chris@0 17 const T_SPACESHIP = 1005;
Chris@0 18 const T_YIELD_FROM = 1006;
Chris@0 19
Chris@0 20 const PHP_7_0 = '7.0.0dev';
Chris@0 21 const PHP_5_6 = '5.6.0rc1';
Chris@0 22
Chris@0 23 public function __construct(array $options = array()) {
Chris@0 24 parent::__construct($options);
Chris@0 25
Chris@0 26 $newKeywordsPerVersion = array(
Chris@0 27 // No new keywords since PHP 5.5
Chris@0 28 );
Chris@0 29
Chris@0 30 $this->newKeywords = array();
Chris@0 31 foreach ($newKeywordsPerVersion as $version => $newKeywords) {
Chris@0 32 if (version_compare(PHP_VERSION, $version, '>=')) {
Chris@0 33 break;
Chris@0 34 }
Chris@0 35
Chris@0 36 $this->newKeywords += $newKeywords;
Chris@0 37 }
Chris@0 38
Chris@0 39 if (version_compare(PHP_VERSION, self::PHP_7_0, '>=')) {
Chris@0 40 return;
Chris@0 41 }
Chris@0 42 $this->tokenMap[self::T_COALESCE] = Tokens::T_COALESCE;
Chris@0 43 $this->tokenMap[self::T_SPACESHIP] = Tokens::T_SPACESHIP;
Chris@0 44 $this->tokenMap[self::T_YIELD_FROM] = Tokens::T_YIELD_FROM;
Chris@0 45
Chris@0 46 if (version_compare(PHP_VERSION, self::PHP_5_6, '>=')) {
Chris@0 47 return;
Chris@0 48 }
Chris@0 49 $this->tokenMap[self::T_ELLIPSIS] = Tokens::T_ELLIPSIS;
Chris@0 50 $this->tokenMap[self::T_POW] = Tokens::T_POW;
Chris@0 51 $this->tokenMap[self::T_POW_EQUAL] = Tokens::T_POW_EQUAL;
Chris@0 52 }
Chris@0 53
Chris@0 54 public function startLexing($code, ErrorHandler $errorHandler = null) {
Chris@0 55 $this->inObjectAccess = false;
Chris@0 56
Chris@0 57 parent::startLexing($code, $errorHandler);
Chris@0 58 if ($this->requiresEmulation($code)) {
Chris@0 59 $this->emulateTokens();
Chris@0 60 }
Chris@0 61 }
Chris@0 62
Chris@0 63 /*
Chris@0 64 * Checks if the code is potentially using features that require emulation.
Chris@0 65 */
Chris@0 66 protected function requiresEmulation($code) {
Chris@0 67 if (version_compare(PHP_VERSION, self::PHP_7_0, '>=')) {
Chris@0 68 return false;
Chris@0 69 }
Chris@0 70
Chris@0 71 if (preg_match('(\?\?|<=>|yield[ \n\r\t]+from)', $code)) {
Chris@0 72 return true;
Chris@0 73 }
Chris@0 74
Chris@0 75 if (version_compare(PHP_VERSION, self::PHP_5_6, '>=')) {
Chris@0 76 return false;
Chris@0 77 }
Chris@0 78
Chris@0 79 return preg_match('(\.\.\.|(?<!/)\*\*(?!/))', $code);
Chris@0 80 }
Chris@0 81
Chris@0 82 /*
Chris@0 83 * Emulates tokens for newer PHP versions.
Chris@0 84 */
Chris@0 85 protected function emulateTokens() {
Chris@0 86 // We need to manually iterate and manage a count because we'll change
Chris@0 87 // the tokens array on the way
Chris@0 88 $line = 1;
Chris@0 89 for ($i = 0, $c = count($this->tokens); $i < $c; ++$i) {
Chris@0 90 $replace = null;
Chris@0 91 if (isset($this->tokens[$i + 1])) {
Chris@0 92 if ($this->tokens[$i] === '?' && $this->tokens[$i + 1] === '?') {
Chris@0 93 array_splice($this->tokens, $i, 2, array(
Chris@0 94 array(self::T_COALESCE, '??', $line)
Chris@0 95 ));
Chris@0 96 $c--;
Chris@0 97 continue;
Chris@0 98 }
Chris@0 99 if ($this->tokens[$i][0] === T_IS_SMALLER_OR_EQUAL
Chris@0 100 && $this->tokens[$i + 1] === '>'
Chris@0 101 ) {
Chris@0 102 array_splice($this->tokens, $i, 2, array(
Chris@0 103 array(self::T_SPACESHIP, '<=>', $line)
Chris@0 104 ));
Chris@0 105 $c--;
Chris@0 106 continue;
Chris@0 107 }
Chris@0 108 if ($this->tokens[$i] === '*' && $this->tokens[$i + 1] === '*') {
Chris@0 109 array_splice($this->tokens, $i, 2, array(
Chris@0 110 array(self::T_POW, '**', $line)
Chris@0 111 ));
Chris@0 112 $c--;
Chris@0 113 continue;
Chris@0 114 }
Chris@0 115 if ($this->tokens[$i] === '*' && $this->tokens[$i + 1][0] === T_MUL_EQUAL) {
Chris@0 116 array_splice($this->tokens, $i, 2, array(
Chris@0 117 array(self::T_POW_EQUAL, '**=', $line)
Chris@0 118 ));
Chris@0 119 $c--;
Chris@0 120 continue;
Chris@0 121 }
Chris@0 122 }
Chris@0 123
Chris@0 124 if (isset($this->tokens[$i + 2])) {
Chris@0 125 if ($this->tokens[$i][0] === T_YIELD && $this->tokens[$i + 1][0] === T_WHITESPACE
Chris@0 126 && $this->tokens[$i + 2][0] === T_STRING
Chris@0 127 && !strcasecmp($this->tokens[$i + 2][1], 'from')
Chris@0 128 ) {
Chris@0 129 array_splice($this->tokens, $i, 3, array(
Chris@0 130 array(
Chris@0 131 self::T_YIELD_FROM,
Chris@0 132 $this->tokens[$i][1] . $this->tokens[$i + 1][1] . $this->tokens[$i + 2][1],
Chris@0 133 $line
Chris@0 134 )
Chris@0 135 ));
Chris@0 136 $c -= 2;
Chris@0 137 $line += substr_count($this->tokens[$i][1], "\n");
Chris@0 138 continue;
Chris@0 139 }
Chris@0 140 if ($this->tokens[$i] === '.' && $this->tokens[$i + 1] === '.'
Chris@0 141 && $this->tokens[$i + 2] === '.'
Chris@0 142 ) {
Chris@0 143 array_splice($this->tokens, $i, 3, array(
Chris@0 144 array(self::T_ELLIPSIS, '...', $line)
Chris@0 145 ));
Chris@0 146 $c -= 2;
Chris@0 147 continue;
Chris@0 148 }
Chris@0 149 }
Chris@0 150
Chris@0 151 if (\is_array($this->tokens[$i])) {
Chris@0 152 $line += substr_count($this->tokens[$i][1], "\n");
Chris@0 153 }
Chris@0 154 }
Chris@0 155 }
Chris@0 156
Chris@0 157 public function getNextToken(&$value = null, &$startAttributes = null, &$endAttributes = null) {
Chris@0 158 $token = parent::getNextToken($value, $startAttributes, $endAttributes);
Chris@0 159
Chris@0 160 // replace new keywords by their respective tokens. This is not done
Chris@0 161 // if we currently are in an object access (e.g. in $obj->namespace
Chris@0 162 // "namespace" stays a T_STRING tokens and isn't converted to T_NAMESPACE)
Chris@0 163 if (Tokens::T_STRING === $token && !$this->inObjectAccess) {
Chris@0 164 if (isset($this->newKeywords[strtolower($value)])) {
Chris@0 165 return $this->newKeywords[strtolower($value)];
Chris@0 166 }
Chris@0 167 } else {
Chris@0 168 // keep track of whether we currently are in an object access (after ->)
Chris@0 169 $this->inObjectAccess = Tokens::T_OBJECT_OPERATOR === $token;
Chris@0 170 }
Chris@0 171
Chris@0 172 return $token;
Chris@0 173 }
Chris@0 174 }