196 $forInclusion = $flags & Parser::PTD_FOR_INCLUSION;
198 $xmlishElements = $this->parser->getStripList();
199 $xmlishAllowMissingEndTag = [
'includeonly',
'noinclude',
'onlyinclude' ];
200 $enableOnlyinclude =
false;
201 if ( $forInclusion ) {
202 $ignoredTags = [
'includeonly',
'/includeonly' ];
203 $ignoredElements = [
'noinclude' ];
204 $xmlishElements[] =
'noinclude';
205 if (
strpos( $text,
'<onlyinclude>' ) !==
false
206 &&
strpos( $text,
'</onlyinclude>' ) !==
false
208 $enableOnlyinclude =
true;
211 $ignoredTags = [
'noinclude',
'/noinclude',
'onlyinclude',
'/onlyinclude' ];
212 $ignoredElements = [
'includeonly' ];
213 $xmlishElements[] =
'includeonly';
215 $xmlishRegex = implode(
'|',
array_merge( $xmlishElements, $ignoredTags ) );
218 $elementsRegex =
"~($xmlishRegex)(?:\s|\/>|>)|(!--)~iA";
222 $searchBase =
"[{<\n"; # }
228 $revText =
strrev( $text );
229 $lengthText =
strlen( $text );
234 $accum =& $stack->getAccum();
246 $noMoreClosingTag = [];
250 $fakeLineStart =
true;
255 if ( $findOnlyinclude ) {
257 $startPos =
strpos( $text,
'<onlyinclude>', $i );
258 if ( $startPos ===
false ) {
263 $tagEndPos = $startPos +
strlen(
'<onlyinclude>' );
266 $findOnlyinclude =
false;
269 if ( $fakeLineStart ) {
270 $found =
'line-start';
273 # Find next opening brace, closing brace or pipe
275 if ( $stack->top ===
false ) {
276 $currentClosing =
'';
278 $currentClosing = $stack->top->close;
289 # Output literal section, advance input counter
290 $literalLength =
strcspn( $text, $search, $i );
291 if ( $literalLength > 0 ) {
295 if ( $i >= $lengthText ) {
296 if ( $currentClosing ==
"\n" ) {
305 $curChar = $curTwoChar = $text[
$i];
306 if ( ( $i + 1 ) < $lengthText ) {
307 $curTwoChar .= $text[$i + 1];
309 if ( $curChar ==
'|' ) {
311 }
elseif ( $curChar ==
'=' ) {
313 }
elseif ( $curChar ==
'<' ) {
315 }
elseif ( $curChar ==
"\n" ) {
319 $found =
'line-start';
321 }
elseif ( $curTwoChar == $currentClosing ) {
324 }
elseif ( $curChar == $currentClosing ) {
334 # Some versions of PHP have a strcspn which stops on
335 # null characters; ignore these and continue.
336 # We also may get '-' and '}' characters here which
337 # don't match -{ or $currentClosing. Add these to
338 # output and continue.
339 if ( $curChar ==
'-' || $curChar ==
'}' ) {
348 if ( $found ==
'angle' ) {
351 if ( $enableOnlyinclude
352 &&
substr( $text, $i,
strlen(
'</onlyinclude>' ) ) ==
'</onlyinclude>'
354 $findOnlyinclude =
true;
373 $endPos =
strpos( $text,
'-->', $i + 4 );
374 if ( $endPos ===
false ) {
376 $inner =
substr( $text, $i );
381 $wsStart = $i ? ( $i -
strspn( $revText,
" \t", $lengthText - $i ) ) : 0;
385 $wsEnd = $endPos + 2 +
strspn( $text,
" \t", $endPos + 3 );
390 while (
substr( $text, $wsEnd + 1, 4 ) ==
'<!--' ) {
391 $c =
strpos( $text,
'-->', $wsEnd + 4 );
392 if ( $c ===
false ) {
395 $c = $c + 2 +
strspn( $text,
" \t", $c + 3 );
396 $comments[] = [ $wsEnd + 1,
$c ];
404 if ( $wsStart > 0 &&
substr( $text, $wsStart - 1, 1 ) ==
"\n"
405 &&
substr( $text, $wsEnd + 1, 1 ) ==
"\n"
411 &&
strspn( $accum,
" \t", -$wsLength ) === $wsLength
413 $accum =
substr( $accum, 0, -$wsLength );
417 foreach ( $comments as $j => $com ) {
419 $endPos = $com[1] + 1;
420 if ( $j == ( count( $comments ) - 1 ) ) {
423 $inner =
substr( $text, $startPos, $endPos - $startPos );
428 $fakeLineStart =
true;
436 $part = $stack->top->getCurrentPart();
437 if ( !(
isset( $part->commentEnd ) && $part->commentEnd == $wsStart - 1 ) ) {
441 $part->commentEnd = $endPos;
444 $inner =
substr( $text, $startPos, $endPos - $startPos + 1 );
451 $attrStart = $i +
strlen( $name ) + 1;
454 $tagEndPos = $noMoreGT ?
false :
strpos( $text,
'>', $attrStart );
455 if ( $tagEndPos ===
false ) {
465 if (
in_array( $lowerName, $ignoredTags ) ) {
474 if ( $text[$tagEndPos - 1] ==
'/' ) {
475 $attrEnd = $tagEndPos - 1;
483 !
isset( $noMoreClosingTag[$name] ) &&
485 $text,
$matches, PREG_OFFSET_CAPTURE, $tagEndPos + 1 )
487 $inner =
substr( $text, $tagEndPos + 1,
$matches[0][1] - $tagEndPos - 1 );
492 if (
in_array( $name, $xmlishAllowMissingEndTag ) ) {
494 $inner =
substr( $text, $tagEndPos + 1 );
502 $noMoreClosingTag[
$name] =
true;
508 if (
in_array( $lowerName, $ignoredElements ) ) {
515 if ( $attrEnd <= $attrStart ) {
518 $attr =
substr( $text, $attrStart, $attrEnd - $attrStart );
524 if ( $inner !==
null ) {
527 $accum .= $close .
'</ext>';
528 }
elseif ( $found ==
'line-start' ) {
531 if ( $fakeLineStart ) {
532 $fakeLineStart =
false;
538 $count =
strspn( $text,
'=', $i, 6 );
539 if ( $count == 1 && $findEquals ) {
552 $stack->push( $piece );
553 $accum =& $stack->getAccum();
554 $stackFlags = $stack->getFlags();
555 if (
isset( $stackFlags[
'findEquals'] ) ) {
556 $findEquals = $stackFlags[
'findEquals'];
558 if (
isset( $stackFlags[
'findPipe'] ) ) {
559 $findPipe = $stackFlags[
'findPipe'];
561 if (
isset( $stackFlags[
'inHeading'] ) ) {
562 $inHeading = $stackFlags[
'inHeading'];
566 }
elseif ( $found ==
'line-end' ) {
567 $piece = $stack->top;
571 assert( $piece->open ===
"\n" );
572 $part = $piece->getCurrentPart();
576 $wsLength =
strspn( $revText,
" \t", $lengthText - $i );
578 if (
isset( $part->commentEnd ) && $searchStart - 1 == $part->commentEnd ) {
581 $searchStart = $part->visualEnd;
582 $searchStart -=
strspn( $revText,
" \t", $lengthText - $searchStart );
584 $count = $piece->count;
585 $equalsLength =
strspn( $revText,
'=', $lengthText - $searchStart );
586 if ( $equalsLength > 0 ) {
587 if ( $searchStart - $equalsLength == $piece->startPos ) {
595 $count = min( 6,
intval( ( $count - 1 ) / 2 ) );
598 $count = min( $equalsLength, $count );
602 $element =
"<h level=\"$count\" i=\"$headingIndex\">$accum</h>";
614 $accum =& $stack->getAccum();
615 $stackFlags = $stack->getFlags();
616 if (
isset( $stackFlags[
'findEquals'] ) ) {
617 $findEquals = $stackFlags[
'findEquals'];
619 if (
isset( $stackFlags[
'findPipe'] ) ) {
620 $findPipe = $stackFlags[
'findPipe'];
622 if (
isset( $stackFlags[
'inHeading'] ) ) {
623 $inHeading = $stackFlags[
'inHeading'];
633 }
elseif ( $found ==
'open' ) {
634 # count opening brace characters
635 $curLen =
strlen( $curChar );
636 $count = ( $curLen > 1 ) ?
637 # allow the
final character to repeat
638 strspn( $text, $curChar[$curLen - 1], $i + 1 ) + 1 :
639 strspn( $text, $curChar, $i );
642 $lineStart = ( $i > 0 && $text[$i - 1] ==
"\n" );
644 if ( $curChar ===
"-{" && $count > $curLen ) {
653 # we need to add to stack only if opening brace count is enough for one of the rules
654 if ( $count >= $rule[
'min'] ) {
655 # Add it to the stack
658 'close' => $rule[
'end'],
659 'savedPrefix' => $savedPrefix,
661 'lineStart' => $lineStart,
664 $stack->push( $piece );
665 $accum =& $stack->getAccum();
666 $stackFlags = $stack->getFlags();
667 if (
isset( $stackFlags[
'findEquals'] ) ) {
668 $findEquals = $stackFlags[
'findEquals'];
670 if (
isset( $stackFlags[
'findPipe'] ) ) {
671 $findPipe = $stackFlags[
'findPipe'];
673 if (
isset( $stackFlags[
'inHeading'] ) ) {
674 $inHeading = $stackFlags[
'inHeading'];
677 # Add literal brace(s)
681 }
elseif ( $found ==
'close' ) {
682 $piece = $stack->top;
683 # lets check if there are enough characters for closing brace
684 $maxCount = $piece->count;
685 if ( $piece->close ===
'}-' && $curChar ===
'}' ) {
686 $maxCount--; # don
't try to match closing '-
' as a '}
'
688 $curLen = strlen( $curChar );
689 $count = ( $curLen > 1 ) ? $curLen :
690 strspn( $text, $curChar, $i, $maxCount );
692 # check for maximum matching characters (if there are 5 closing
693 # characters, we will probably need only 3 - depending on the rules)
694 $rule = $this->rules[$piece->open];
695 if ( $count > $rule['max
'] ) {
696 # The specified maximum exists in the callback array, unless the caller
698 $matchingCount = $rule['max
'];
700 # Count is less than the maximum
701 # Skip any gaps in the callback array to find the true largest match
702 # Need to use array_key_exists not isset because the callback can be null
703 $matchingCount = $count;
704 while ( $matchingCount > 0 && !array_key_exists( $matchingCount, $rule['names
'] ) ) {
709 if ( $matchingCount <= 0 ) {
710 # No matching element found in callback array
711 # Output a literal closing brace and continue
712 $endText = substr( $text, $i, $count );
713 $accum .= htmlspecialchars( $endText );
717 $name = $rule['names
'][$matchingCount];
718 if ( $name === null ) {
719 // No element, just literal text
720 $endText = substr( $text, $i, $matchingCount );
721 $element = $piece->breakSyntax( $matchingCount ) . $endText;
724 # Note: $parts is already XML, does not need to be encoded further
725 $parts = $piece->parts;
726 $title = $parts[0]->out;
729 # The invocation is at the start of the line if lineStart is set in
730 # the stack, and all opening brackets are used up.
731 if ( $maxCount == $matchingCount &&
732 !empty( $piece->lineStart ) &&
733 strlen( $piece->savedPrefix ) == 0 ) {
734 $attr = ' lineStart=
"1"';
739 $element = "<$name$attr>";
740 $element .= "<title>$title</title>";
742 foreach ( $parts as $part ) {
743 if ( isset( $part->eqpos ) ) {
744 $argName = substr( $part->out, 0, $part->eqpos );
745 $argValue = substr( $part->out, $part->eqpos + 1 );
746 $element .= "<part><name>$argName</name>=<value>$argValue</value></part>";
748 $element .= "<part><name index=\"$argIndex\" /><value>{$part->out}</value></part>";
752 $element .= "</$name>";
755 # Advance input pointer
756 $i += $matchingCount;
760 $accum =& $stack->getAccum();
762 # Re-add the old stack element if it still has unmatched opening characters remaining
763 if ( $matchingCount < $piece->count ) {
764 $piece->parts = [ new PPDPart ];
765 $piece->count -= $matchingCount;
766 # do we still qualify for any callback with remaining count?
767 $min = $this->rules[$piece->open]['min
'];
768 if ( $piece->count >= $min ) {
769 $stack->push( $piece );
770 $accum =& $stack->getAccum();
771 } elseif ( $piece->count == 1 && $piece->open === '{
' && $piece->savedPrefix === '-
' ) {
772 $piece->savedPrefix = '';
775 $piece->close = $this->rules[$piece->open]['end
'];
776 $stack->push( $piece );
777 $accum =& $stack->getAccum();
779 $s = substr( $piece->open, 0, -1 );
781 substr( $piece->open, -1 ),
782 $piece->count - strlen( $s )
784 $accum .= $piece->savedPrefix . $s;
786 } elseif ( $piece->savedPrefix !== '' ) {
787 $accum .= $piece->savedPrefix;
790 $stackFlags = $stack->getFlags();
791 if ( isset( $stackFlags['findEquals
'] ) ) {
792 $findEquals = $stackFlags['findEquals
'];
794 if ( isset( $stackFlags['findPipe
'] ) ) {
795 $findPipe = $stackFlags['findPipe
'];
797 if ( isset( $stackFlags['inHeading
'] ) ) {
798 $inHeading = $stackFlags['inHeading
'];
801 # Add XML element to the enclosing accumulator
803 } elseif ( $found == 'pipe
' ) {
804 $findEquals = true; // shortcut for getFlags()
806 $accum =& $stack->getAccum();
808 } elseif ( $found == 'equals
' ) {
809 $findEquals = false; // shortcut for getFlags()
810 $stack->getCurrentPart()->eqpos = strlen( $accum );
816 # Output any remaining unclosed brackets
817 foreach ( $stack->stack as $piece ) {
818 $stack->rootAccum .= $piece->breakSyntax();
820 $stack->rootAccum .= '</
root>
';
821 $xml = $stack->rootAccum;