/**
* Parse the current token for closers : {###} { ## } {##,##}
*
* @access public
* @return ReverseRegex\Generator\Scope a new head
* @param ReverseRegex\Generator\Scope $head
* @param ReverseRegex\Generator\Scope $result
* @param ReverseRegex\Lexer $lexer
*/
public function quantifyClosure(Scope $head, Scope $result, Lexer $lexer)
{
$tokens = array();
$min = $head->getMinOccurances();
$max = $head->getMaxOccurances();
# move to the first token inside the quantifer.
# parse for the minimum , move lookahead until read end of the closure or the `,`
while ($lexer->moveNext() === true && !$lexer->isNextToken(Lexer::T_QUANTIFIER_CLOSE) && $lexer->lookahead['value'] !== ',') {
if ($lexer->isNextToken(Lexer::T_QUANTIFIER_OPEN)) {
throw new ParserException('Nesting Quantifiers is not allowed');
}
$tokens[] = $lexer->lookahead;
}
$min = $this->convertInteger($tokens);
# do we have a maximum after the comma?
if ($lexer->lookahead['value'] === ',') {
# make sure we have values to gather ie not {778,}
$tokens = array();
# move to the first token after the `,` character
# grab the remaining numbers
while ($lexer->moveNext() && !$lexer->isNextToken(Lexer::T_QUANTIFIER_CLOSE)) {
if ($lexer->isNextToken(Lexer::T_QUANTIFIER_OPEN)) {
throw new ParserException('Nesting Quantifiers is not allowed');
}
$tokens[] = $lexer->lookahead;
}
$max = $this->convertInteger($tokens);
} else {
$max = $min;
}
$head->setMaxOccurances($max);
$head->setMinOccurances($min);
# skip the lexer to the closing token
$lexer->skipUntil(Lexer::T_QUANTIFIER_CLOSE);
# check if the last matched token was the closing bracket
# not going to stop errors like {#####,###{[a-z]} {#####{[a-z]}
if (!$lexer->isNextToken(Lexer::T_QUANTIFIER_CLOSE)) {
throw new ParserException('Closing quantifier token `}` not found');
}
return $head;
}
