122 if ( $tree !==
false ) {
123 $store = json_decode( $tree );
124 if ( is_array( $store ) ) {
129 $forInclusion = $flags & Parser::PTD_FOR_INCLUSION;
131 $xmlishElements = $this->parser->getStripList();
132 $xmlishAllowMissingEndTag = [
'includeonly',
'noinclude',
'onlyinclude' ];
133 $enableOnlyinclude =
false;
134 if ( $forInclusion ) {
135 $ignoredTags = [
'includeonly',
'/includeonly' ];
136 $ignoredElements = [
'noinclude' ];
137 $xmlishElements[] =
'noinclude';
138 if ( strpos( $text,
'<onlyinclude>' ) !==
false
139 && strpos( $text,
'</onlyinclude>' ) !==
false
141 $enableOnlyinclude =
true;
144 $ignoredTags = [
'noinclude',
'/noinclude',
'onlyinclude',
'/onlyinclude' ];
145 $ignoredElements = [
'includeonly' ];
146 $xmlishElements[] =
'includeonly';
148 $xmlishRegex = implode(
'|', array_merge( $xmlishElements, $ignoredTags ) );
151 $elementsRegex =
"~($xmlishRegex)(?:\s|\/>|>)|(!--)~iA";
155 $searchBase =
"[{<\n";
161 $revText = strrev( $text );
162 $lengthText = strlen( $text );
167 $accum =& $stack->getAccum();
178 $noMoreClosingTag = [];
180 $findOnlyinclude = $enableOnlyinclude;
182 $fakeLineStart =
true;
187 if ( $findOnlyinclude ) {
189 $startPos = strpos( $text,
'<onlyinclude>', $i );
190 if ( $startPos ===
false ) {
192 $accum[] = [
'ignore', [ substr( $text, $i ) ] ];
195 $tagEndPos = $startPos + strlen(
'<onlyinclude>' );
196 $accum[] = [
'ignore', [ substr( $text, $i, $tagEndPos - $i ) ] ];
198 $findOnlyinclude =
false;
201 if ( $fakeLineStart ) {
202 $found =
'line-start';
205 # Find next opening brace, closing brace or pipe
206 $search = $searchBase;
207 if ( $stack->top ===
false ) {
208 $currentClosing =
'';
210 $currentClosing = $stack->top->close;
211 $search .= $currentClosing;
221 # Output literal section, advance input counter
222 $literalLength = strcspn( $text, $search, $i );
223 if ( $literalLength > 0 ) {
225 $i += $literalLength;
227 if ( $i >= $lengthText ) {
228 if ( $currentClosing ==
"\n" ) {
237 $curChar = $curTwoChar = $text[$i];
238 if ( ( $i + 1 ) < $lengthText ) {
239 $curTwoChar .= $text[$i + 1];
241 if ( $curChar ==
'|' ) {
243 } elseif ( $curChar ==
'=' ) {
245 } elseif ( $curChar ==
'<' ) {
247 } elseif ( $curChar ==
"\n" ) {
251 $found =
'line-start';
253 } elseif ( $curTwoChar == $currentClosing ) {
255 $curChar = $curTwoChar;
256 } elseif ( $curChar == $currentClosing ) {
258 } elseif ( isset( $this->rules[$curTwoChar] ) ) {
259 $curChar = $curTwoChar;
261 $rule = $this->rules[$curChar];
262 } elseif ( isset( $this->rules[$curChar] ) ) {
264 $rule = $this->rules[$curChar];
266 # Some versions of PHP have a strcspn which stops on
267 # null characters; ignore these and continue.
268 # We also may get '-' and '}' characters here which
269 # don't match -{ or $currentClosing. Add these to
270 # output and continue.
271 if ( $curChar ==
'-' || $curChar ==
'}' ) {
280 if ( $found ==
'angle' ) {
283 if ( $enableOnlyinclude
284 && substr( $text, $i, strlen(
'</onlyinclude>' ) ) ==
'</onlyinclude>'
286 $findOnlyinclude =
true;
291 if ( !preg_match( $elementsRegex, $text,
$matches, 0, $i + 1 ) ) {
305 $endPos = strpos( $text,
'-->', $i + 4 );
306 if ( $endPos ===
false ) {
308 $inner = substr( $text, $i );
309 $accum[] = [
'comment', [ $inner ] ];
313 $wsStart = $i ? ( $i - strspn( $revText,
" \t", $lengthText - $i ) ) : 0;
317 $wsEnd = $endPos + 2 + strspn( $text,
" \t", $endPos + 3 );
321 $comments = [ [ $wsStart, $wsEnd ] ];
322 while ( substr( $text, $wsEnd + 1, 4 ) ==
'<!--' ) {
323 $c = strpos( $text,
'-->', $wsEnd + 4 );
324 if ( $c ===
false ) {
327 $c = $c + 2 + strspn( $text,
" \t", $c + 3 );
328 $comments[] = [ $wsEnd + 1, $c ];
336 if ( $wsStart > 0 && substr( $text, $wsStart - 1, 1 ) ==
"\n"
337 && substr( $text, $wsEnd + 1, 1 ) ==
"\n"
340 $wsLength = $i - $wsStart;
341 $endIndex = count( $accum ) - 1;
346 && is_string( $accum[$endIndex] )
347 && strspn( $accum[$endIndex],
" \t", -$wsLength ) === $wsLength
349 $accum[$endIndex] = substr( $accum[$endIndex], 0, -$wsLength );
353 foreach ( $comments
as $j => $com ) {
355 $endPos = $com[1] + 1;
356 if ( $j == ( count( $comments ) - 1 ) ) {
359 $inner = substr( $text, $startPos, $endPos - $startPos );
360 $accum[] = [
'comment', [ $inner ] ];
364 $fakeLineStart =
true;
372 $part = $stack->top->getCurrentPart();
373 if ( !( isset( $part->commentEnd ) && $part->commentEnd == $wsStart - 1 ) ) {
374 $part->visualEnd = $wsStart;
377 $part->commentEnd = $endPos;
380 $inner = substr( $text, $startPos, $endPos - $startPos + 1 );
381 $accum[] = [
'comment', [ $inner ] ];
386 $lowerName = strtolower(
$name );
387 $attrStart = $i + strlen(
$name ) + 1;
390 $tagEndPos = $noMoreGT ?
false : strpos( $text,
'>', $attrStart );
391 if ( $tagEndPos ===
false ) {
401 if ( in_array( $lowerName, $ignoredTags ) ) {
402 $accum[] = [
'ignore', [ substr( $text, $i, $tagEndPos - $i + 1 ) ] ];
408 if ( $text[$tagEndPos - 1] ==
'/' ) {
410 $attrEnd = $tagEndPos - 1;
415 $attrEnd = $tagEndPos;
418 !isset( $noMoreClosingTag[
$name] ) &&
419 preg_match(
"/<\/" . preg_quote(
$name,
'/' ) .
"\s*>/i",
420 $text,
$matches, PREG_OFFSET_CAPTURE, $tagEndPos + 1 )
422 $inner = substr( $text, $tagEndPos + 1,
$matches[0][1] - $tagEndPos - 1 );
427 if ( in_array(
$name, $xmlishAllowMissingEndTag ) ) {
429 $inner = substr( $text, $tagEndPos + 1 );
436 substr( $text, $tagStartPos, $tagEndPos + 1 - $tagStartPos ) );
438 $noMoreClosingTag[
$name] =
true;
444 if ( in_array( $lowerName, $ignoredElements ) ) {
445 $accum[] = [
'ignore', [ substr( $text, $tagStartPos, $i - $tagStartPos ) ] ];
449 if ( $attrEnd <= $attrStart ) {
454 $attr = substr( $text, $attrStart, $attrEnd - $attrStart );
458 [
'name', [
$name ] ],
459 [
'attr', [ $attr ] ] ];
460 if ( $inner !==
null ) {
461 $children[] = [
'inner', [ $inner ] ];
463 if ( $close !==
null ) {
464 $children[] = [
'close', [ $close ] ];
466 $accum[] = [
'ext', $children ];
467 } elseif ( $found ==
'line-start' ) {
470 if ( $fakeLineStart ) {
471 $fakeLineStart =
false;
477 $count = strspn( $text,
'=', $i, 6 );
478 if ( $count == 1 && $findEquals ) {
483 } elseif ( $count > 0 ) {
487 'parts' => [
new PPDPart_Hash( str_repeat(
'=', $count ) ) ],
490 $stack->push( $piece );
491 $accum =& $stack->getAccum();
492 $stackFlags = $stack->getFlags();
493 if ( isset( $stackFlags[
'findEquals'] ) ) {
494 $findEquals = $stackFlags[
'findEquals'];
496 if ( isset( $stackFlags[
'findPipe'] ) ) {
497 $findPipe = $stackFlags[
'findPipe'];
499 if ( isset( $stackFlags[
'inHeading'] ) ) {
500 $inHeading = $stackFlags[
'inHeading'];
504 } elseif ( $found ==
'line-end' ) {
505 $piece = $stack->top;
509 assert( $piece->open ===
"\n" );
510 $part = $piece->getCurrentPart();
514 $wsLength = strspn( $revText,
" \t", $lengthText - $i );
515 $searchStart = $i - $wsLength;
516 if ( isset( $part->commentEnd ) && $searchStart - 1 == $part->commentEnd ) {
519 $searchStart = $part->visualEnd;
520 $searchStart -= strspn( $revText,
" \t", $lengthText - $searchStart );
522 $count = $piece->count;
523 $equalsLength = strspn( $revText,
'=', $lengthText - $searchStart );
524 if ( $equalsLength > 0 ) {
525 if ( $searchStart - $equalsLength == $piece->startPos ) {
529 $count = $equalsLength;
533 $count = min( 6, intval( ( $count - 1 ) / 2 ) );
536 $count = min( $equalsLength, $count );
540 $element = [ [
'possible-h',
543 [
'@level', [ $count ] ],
544 [
'@i', [ $headingIndex++ ] ]
559 $accum =& $stack->getAccum();
560 $stackFlags = $stack->getFlags();
561 if ( isset( $stackFlags[
'findEquals'] ) ) {
562 $findEquals = $stackFlags[
'findEquals'];
564 if ( isset( $stackFlags[
'findPipe'] ) ) {
565 $findPipe = $stackFlags[
'findPipe'];
567 if ( isset( $stackFlags[
'inHeading'] ) ) {
568 $inHeading = $stackFlags[
'inHeading'];
572 array_splice( $accum, count( $accum ), 0, $element );
579 } elseif ( $found ==
'open' ) {
580 # count opening brace characters
581 $curLen = strlen( $curChar );
582 $count = ( $curLen > 1 ) ?
583 # allow the
final character to repeat
584 strspn( $text, $curChar[$curLen - 1], $i + 1 ) + 1 :
585 strspn( $text, $curChar, $i );
588 $lineStart = ( $i > 0 && $text[$i - 1] ==
"\n" );
590 if ( $curChar ===
"-{" && $count > $curLen ) {
596 $rule = $this->rules[$curChar];
599 # we need to add to stack only if opening brace count is enough for one of the rules
600 if ( $count >= $rule[
'min'] ) {
601 # Add it to the stack
604 'close' => $rule[
'end'],
605 'savedPrefix' => $savedPrefix,
607 'lineStart' => $lineStart,
610 $stack->push( $piece );
611 $accum =& $stack->getAccum();
612 $stackFlags = $stack->getFlags();
613 if ( isset( $stackFlags[
'findEquals'] ) ) {
614 $findEquals = $stackFlags[
'findEquals'];
616 if ( isset( $stackFlags[
'findPipe'] ) ) {
617 $findPipe = $stackFlags[
'findPipe'];
619 if ( isset( $stackFlags[
'inHeading'] ) ) {
620 $inHeading = $stackFlags[
'inHeading'];
623 # Add literal brace(s)
627 } elseif ( $found ==
'close' ) {
628 $piece = $stack->top;
629 # lets check if there are enough characters for closing brace
630 $maxCount = $piece->count;
631 if ( $piece->close ===
'}-' && $curChar ===
'}' ) {
632 $maxCount--; # don
't try to match closing '-
' as a '}
'
634 $curLen = strlen( $curChar );
635 $count = ( $curLen > 1 ) ? $curLen :
636 strspn( $text, $curChar, $i, $maxCount );
638 # check for maximum matching characters (if there are 5 closing
639 # characters, we will probably need only 3 - depending on the rules)
640 $rule = $this->rules[$piece->open];
641 if ( $count > $rule['max
'] ) {
642 # The specified maximum exists in the callback array, unless the caller
644 $matchingCount = $rule['max
'];
646 # Count is less than the maximum
647 # Skip any gaps in the callback array to find the true largest match
648 # Need to use array_key_exists not isset because the callback can be null
649 $matchingCount = $count;
650 while ( $matchingCount > 0 && !array_key_exists( $matchingCount, $rule['names'] ) ) {
655 if ( $matchingCount <= 0 ) {
656 # No matching element found in callback array
657 # Output a literal closing brace and continue
658 $endText = substr( $text, $i, $count );
659 self::addLiteral( $accum, $endText );
663 $name = $rule['names'][$matchingCount];
664 if ( $name === null ) {
665 // No element, just literal text
666 $endText = substr( $text, $i, $matchingCount );
667 $element = $piece->breakSyntax( $matchingCount );
668 self::addLiteral( $element, $endText );
671 $parts = $piece->parts;
672 $titleAccum = $parts[0]->out;
677 # The invocation is at the start of the line if lineStart is set in
678 # the stack, and all opening brackets are used up.
679 if ( $maxCount == $matchingCount &&
680 !empty( $piece->lineStart ) &&
681 strlen( $piece->savedPrefix ) == 0 ) {
682 $children[] = [ '@lineStart
', [ 1 ] ];
684 $titleNode = [ 'title', $titleAccum ];
685 $children[] = $titleNode;
687 foreach ( $parts as $part ) {
688 if ( isset( $part->eqpos ) ) {
689 $equalsNode = $part->out[$part->eqpos];
690 $nameNode = [ 'name', array_slice( $part->out, 0, $part->eqpos ) ];
691 $valueNode = [ 'value
', array_slice( $part->out, $part->eqpos + 1 ) ];
692 $partNode = [ 'part', [ $nameNode, $equalsNode, $valueNode ] ];
693 $children[] = $partNode;
695 $nameNode = [ 'name', [ [ '@index
', [ $argIndex++ ] ] ] ];
696 $valueNode = [ 'value
', $part->out ];
697 $partNode = [ 'part', [ $nameNode, $valueNode ] ];
698 $children[] = $partNode;
701 $element = [ [ $name, $children ] ];
704 # Advance input pointer
705 $i += $matchingCount;
709 $accum =& $stack->getAccum();
711 # Re-add the old stack element if it still has unmatched opening characters remaining
712 if ( $matchingCount < $piece->count ) {
713 $piece->parts = [ new PPDPart_Hash ];
714 $piece->count -= $matchingCount;
715 # do we still qualify for any callback with remaining count?
716 $min = $this->rules[$piece->open]['min
'];
717 if ( $piece->count >= $min ) {
718 $stack->push( $piece );
719 $accum =& $stack->getAccum();
720 } elseif ( $piece->count == 1 && $piece->open === '{
' && $piece->savedPrefix === '-
' ) {
721 $piece->savedPrefix = '';
724 $piece->close = $this->rules[$piece->open]['end
'];
725 $stack->push( $piece );
726 $accum =& $stack->getAccum();
728 $s = substr( $piece->open, 0, -1 );
730 substr( $piece->open, -1 ),
731 $piece->count - strlen( $s )
733 self::addLiteral( $accum, $piece->savedPrefix . $s );
735 } elseif ( $piece->savedPrefix !== '' ) {
736 self::addLiteral( $accum, $piece->savedPrefix );
739 $stackFlags = $stack->getFlags();
740 if ( isset( $stackFlags['findEquals
'] ) ) {
741 $findEquals = $stackFlags['findEquals
'];
743 if ( isset( $stackFlags['findPipe
'] ) ) {
744 $findPipe = $stackFlags['findPipe
'];
746 if ( isset( $stackFlags['inHeading
'] ) ) {
747 $inHeading = $stackFlags['inHeading
'];
750 # Add XML element to the enclosing accumulator
751 array_splice( $accum, count( $accum ), 0, $element );
752 } elseif ( $found == 'pipe
' ) {
753 $findEquals = true; // shortcut for getFlags()
755 $accum =& $stack->getAccum();
757 } elseif ( $found == 'equals
' ) {
758 $findEquals = false; // shortcut for getFlags()
759 $accum[] = [ 'equals
', [ '=
' ] ];
760 $stack->getCurrentPart()->eqpos = count( $accum ) - 1;
765 # Output any remaining unclosed brackets
766 foreach ( $stack->stack as $piece ) {
767 array_splice( $stack->rootAccum, count( $stack->rootAccum ), 0, $piece->breakSyntax() );
770 # Enable top-level headings
771 foreach ( $stack->rootAccum as &$node ) {
772 if ( is_array( $node ) && $node[PPNode_Hash_Tree::NAME] === 'possible-h
' ) {
773 $node[PPNode_Hash_Tree::NAME] = 'h
';
777 $rootStore = [ [ 'root', $stack->rootAccum ] ];
778 $rootNode = new PPNode_Hash_Tree( $rootStore, 0 );
781 $tree = json_encode( $rootStore, JSON_UNESCAPED_SLASHES | JSON_UNESCAPED_UNICODE );
782 if ( $tree !== false ) {
783 $this->cacheSetTree( $text, $flags, $tree );