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 }
|