135 lines
4.0 KiB
PHP
135 lines
4.0 KiB
PHP
|
<?php
|
||
|
/*
|
||
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||
|
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
||
|
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
|
||
|
* A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
|
||
|
* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
|
||
|
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
|
||
|
* LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
||
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
||
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
|
||
|
* OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||
|
*
|
||
|
* This software consists of voluntary contributions made by many individuals
|
||
|
* and is licensed under the MIT license. For more information, see
|
||
|
* <http://www.doctrine-project.org>.
|
||
|
*/
|
||
|
|
||
|
namespace Doctrine\Common\Annotations;
|
||
|
|
||
|
use Doctrine\Common\Lexer\AbstractLexer;
|
||
|
|
||
|
/**
|
||
|
* Simple lexer for docblock annotations.
|
||
|
*
|
||
|
* @author Benjamin Eberlei <kontakt@beberlei.de>
|
||
|
* @author Guilherme Blanco <guilhermeblanco@hotmail.com>
|
||
|
* @author Jonathan Wage <jonwage@gmail.com>
|
||
|
* @author Roman Borschel <roman@code-factory.org>
|
||
|
* @author Johannes M. Schmitt <schmittjoh@gmail.com>
|
||
|
*/
|
||
|
final class DocLexer extends AbstractLexer
|
||
|
{
|
||
|
const T_NONE = 1;
|
||
|
const T_INTEGER = 2;
|
||
|
const T_STRING = 3;
|
||
|
const T_FLOAT = 4;
|
||
|
|
||
|
// All tokens that are also identifiers should be >= 100
|
||
|
const T_IDENTIFIER = 100;
|
||
|
const T_AT = 101;
|
||
|
const T_CLOSE_CURLY_BRACES = 102;
|
||
|
const T_CLOSE_PARENTHESIS = 103;
|
||
|
const T_COMMA = 104;
|
||
|
const T_EQUALS = 105;
|
||
|
const T_FALSE = 106;
|
||
|
const T_NAMESPACE_SEPARATOR = 107;
|
||
|
const T_OPEN_CURLY_BRACES = 108;
|
||
|
const T_OPEN_PARENTHESIS = 109;
|
||
|
const T_TRUE = 110;
|
||
|
const T_NULL = 111;
|
||
|
const T_COLON = 112;
|
||
|
|
||
|
/**
|
||
|
* @var array
|
||
|
*/
|
||
|
protected $noCase = array(
|
||
|
'@' => self::T_AT,
|
||
|
',' => self::T_COMMA,
|
||
|
'(' => self::T_OPEN_PARENTHESIS,
|
||
|
')' => self::T_CLOSE_PARENTHESIS,
|
||
|
'{' => self::T_OPEN_CURLY_BRACES,
|
||
|
'}' => self::T_CLOSE_CURLY_BRACES,
|
||
|
'=' => self::T_EQUALS,
|
||
|
':' => self::T_COLON,
|
||
|
'\\' => self::T_NAMESPACE_SEPARATOR
|
||
|
);
|
||
|
|
||
|
/**
|
||
|
* @var array
|
||
|
*/
|
||
|
protected $withCase = array(
|
||
|
'true' => self::T_TRUE,
|
||
|
'false' => self::T_FALSE,
|
||
|
'null' => self::T_NULL
|
||
|
);
|
||
|
|
||
|
/**
|
||
|
* {@inheritdoc}
|
||
|
*/
|
||
|
protected function getCatchablePatterns()
|
||
|
{
|
||
|
return array(
|
||
|
'[a-z_\\\][a-z0-9_\:\\\]*[a-z_][a-z0-9_]*',
|
||
|
'(?:[+-]?[0-9]+(?:[\.][0-9]+)*)(?:[eE][+-]?[0-9]+)?',
|
||
|
'"(?:""|[^"])*+"',
|
||
|
);
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* {@inheritdoc}
|
||
|
*/
|
||
|
protected function getNonCatchablePatterns()
|
||
|
{
|
||
|
return array('\s+', '\*+', '(.)');
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* {@inheritdoc}
|
||
|
*/
|
||
|
protected function getType(&$value)
|
||
|
{
|
||
|
$type = self::T_NONE;
|
||
|
|
||
|
if ($value[0] === '"') {
|
||
|
$value = str_replace('""', '"', substr($value, 1, strlen($value) - 2));
|
||
|
|
||
|
return self::T_STRING;
|
||
|
}
|
||
|
|
||
|
if (isset($this->noCase[$value])) {
|
||
|
return $this->noCase[$value];
|
||
|
}
|
||
|
|
||
|
if ($value[0] === '_' || $value[0] === '\\' || ctype_alpha($value[0])) {
|
||
|
return self::T_IDENTIFIER;
|
||
|
}
|
||
|
|
||
|
$lowerValue = strtolower($value);
|
||
|
|
||
|
if (isset($this->withCase[$lowerValue])) {
|
||
|
return $this->withCase[$lowerValue];
|
||
|
}
|
||
|
|
||
|
// Checking numeric value
|
||
|
if (is_numeric($value)) {
|
||
|
return (strpos($value, '.') !== false || stripos($value, 'e') !== false)
|
||
|
? self::T_FLOAT : self::T_INTEGER;
|
||
|
}
|
||
|
|
||
|
return $type;
|
||
|
}
|
||
|
}
|