3 * (X)HTML sanitizer for MediaWiki
5 * Copyright (C) 2002-2005 Brion Vibber <brion@pobox.com> et al
6 * http://www.mediawiki.org/
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License along
19 * with this program; if not, write to the Free Software Foundation, Inc.,
20 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21 * http://www.gnu.org/copyleft/gpl.html
28 * Regular expression to match various types of character references in
29 * Sanitizer::normalizeCharReferences and Sanitizer::decodeCharReferences
31 define( 'MW_CHAR_REFS_REGEX',
39 * Regular expression to match HTML/XML attribute pairs within a tag.
40 * Allows some... latitude.
41 * Used in Sanitizer::fixTagAttributes and Sanitizer::decodeTagAttributes
43 $attrib = '[A-Za-z0-9]';
44 $space = '[\x09\x0a\x0d\x20]';
45 define( 'MW_ATTRIBS_REGEX',
46 "/(?:^|$space)($attrib+)
49 # The attribute value: quoted or alone
52 | ([a-zA-Z0-9!#$%&()*,\\-.\\/:;<>?@[\\]^_`{|}~]+)
53 | (\#[0-9a-fA-F]+) # Technically wrong, but lots of
54 # colors are specified like this.
55 # We'll be normalizing it.
57 )?(?=$space|\$)/sx" );
60 * List of all named character entities defined in HTML 4.01
61 * http://www.w3.org/TR/html4/sgml/entities.html
64 global $wgHtmlEntities;
65 $wgHtmlEntities = array(
319 /** @package MediaWiki */
322 * Cleans up HTML, removes dangerous tags and attributes, and
323 * removes HTML comments
325 * @param string $text
326 * @param callback $processCallback to do any variable or parameter replacements in HTML attribute values
327 * @param array $args for the processing callback
330 function removeHTMLtags( $text, $processCallback = null, $args = array() ) {
331 global $wgUseTidy, $wgUserHtml;
332 $fname = 'Parser::removeHTMLtags';
333 wfProfileIn( $fname );
336 $htmlpairs = array( # Tags that must be closed
337 'b', 'del', 'i', 'ins', 'u', 'font', 'big', 'small', 'sub', 'sup', 'h1',
338 'h2', 'h3', 'h4', 'h5', 'h6', 'cite', 'code', 'em', 's',
339 'strike', 'strong', 'tt', 'var', 'div', 'center',
340 'blockquote', 'ol', 'ul', 'dl', 'table', 'caption', 'pre',
341 'ruby', 'rt' , 'rb' , 'rp', 'p', 'span'
344 'br', 'hr', 'li', 'dt', 'dd'
346 $htmlsingleonly = array( # Elements that cannot have close tags
349 $htmlnest = array( # Tags that can be nested--??
350 'table', 'tr', 'td', 'th', 'div', 'blockquote', 'ol', 'ul',
351 'dl', 'font', 'big', 'small', 'sub', 'sup', 'span'
353 $tabletags = array( # Can only appear inside table
357 $htmlpairs = array();
358 $htmlsingle = array();
360 $tabletags = array();
363 $htmlsingle = array_merge( $tabletags, $htmlsingle );
364 $htmlelements = array_merge( $htmlsingle, $htmlpairs );
366 # Remove HTML comments
367 $text = Sanitizer
::removeHTMLcomments( $text );
369 $bits = explode( '<', $text );
370 $text = array_shift( $bits );
372 $tagstack = array(); $tablestack = array();
373 foreach ( $bits as $x ) {
374 $prev = error_reporting( E_ALL
& ~
( E_NOTICE | E_WARNING
) );
375 preg_match( '/^(\\/?)(\\w+)([^>]*?)(\\/{0,1}>)([^<]*)$/',
377 list( $qbar, $slash, $t, $params, $brace, $rest ) = $regs;
378 error_reporting( $prev );
381 if ( in_array( $t = strtolower( $t ), $htmlelements ) ) {
385 if( in_array( $t, $htmlsingleonly ) ) {
387 } elseif( !in_array( $t, $htmlsingle ) &&
388 ( $ot = @array_pop
( $tagstack ) ) != $t ) {
389 @array_push
( $tagstack, $ot );
392 if ( $t == 'table' ) {
393 $tagstack = array_pop( $tablestack );
398 # Keep track for later
399 if ( in_array( $t, $tabletags ) &&
400 ! in_array( 'table', $tagstack ) ) {
402 } else if ( in_array( $t, $tagstack ) &&
403 ! in_array ( $t , $htmlnest ) ) {
405 } elseif( in_array( $t, $htmlsingleonly ) ) {
406 # Hack to force empty tag for uncloseable elements
408 } else if ( ! in_array( $t, $htmlsingle ) ) {
409 if ( $t == 'table' ) {
410 array_push( $tablestack, $tagstack );
413 array_push( $tagstack, $t );
416 # Replace any variables or template parameters with
418 if( is_callable( $processCallback ) ) {
419 call_user_func_array( $processCallback, array( &$params, $args ) );
422 # Strip non-approved attributes from the tag
423 $newparams = Sanitizer
::fixTagAttributes( $params, $t );
426 $rest = str_replace( '>', '>', $rest );
427 $close = ( $brace == '/>' ) ?
' /' : '';
428 $text .= "<$slash$t$newparams$close>$rest";
432 $text .= '<' . str_replace( '>', '>', $x);
434 # Close off any remaining tags
435 while ( is_array( $tagstack ) && ($t = array_pop( $tagstack )) ) {
437 if ( $t == 'table' ) { $tagstack = array_pop( $tablestack ); }
440 # this might be possible using tidy itself
441 foreach ( $bits as $x ) {
442 preg_match( '/^(\\/?)(\\w+)([^>]*?)(\\/{0,1}>)([^<]*)$/',
444 @list
( $qbar, $slash, $t, $params, $brace, $rest ) = $regs;
445 if ( in_array( $t = strtolower( $t ), $htmlelements ) ) {
446 if( is_callable( $processCallback ) ) {
447 call_user_func_array( $processCallback, array( &$params, $args ) );
449 $newparams = Sanitizer
::fixTagAttributes( $params, $t );
450 $rest = str_replace( '>', '>', $rest );
451 $text .= "<$slash$t$newparams$brace$rest";
453 $text .= '<' . str_replace( '>', '>', $x);
457 wfProfileOut( $fname );
462 * Remove '<!--', '-->', and everything between.
463 * To avoid leaving blank lines, when a comment is both preceded
464 * and followed by a newline (ignoring spaces), trim leading and
465 * trailing spaces and one of the newlines.
468 * @param string $text
471 function removeHTMLcomments( $text ) {
472 $fname='Parser::removeHTMLcomments';
473 wfProfileIn( $fname );
474 while (($start = strpos($text, '<!--')) !== false) {
475 $end = strpos($text, '-->', $start +
4);
476 if ($end === false) {
477 # Unterminated comment; bail out
483 # Trim space and newline if the comment is both
484 # preceded and followed by a newline
485 $spaceStart = max($start - 1, 0);
486 $spaceLen = $end - $spaceStart;
487 while (substr($text, $spaceStart, 1) === ' ' && $spaceStart > 0) {
491 while (substr($text, $spaceStart +
$spaceLen, 1) === ' ')
493 if (substr($text, $spaceStart, 1) === "\n" and substr($text, $spaceStart +
$spaceLen, 1) === "\n") {
494 # Remove the comment, leading and trailing
495 # spaces, and leave only one newline.
496 $text = substr_replace($text, "\n", $spaceStart, $spaceLen +
1);
499 # Remove just the comment.
500 $text = substr_replace($text, '', $start, $end - $start);
503 wfProfileOut( $fname );
508 * Take a tag soup fragment listing an HTML element's attributes
509 * and normalize it to well-formed XML, discarding unwanted attributes.
511 * - Normalizes attribute names to lowercase
512 * - Discards attributes not on a whitelist for the given element
513 * - Turns broken or invalid entities into plaintext
514 * - Double-quotes all attribute values
515 * - Attributes without values are given the name as attribute
516 * - Double attributes are discarded
517 * - Unsafe style attributes are discarded
518 * - Prepends space if there are attributes.
520 * @param string $text
521 * @param string $element
524 * @todo Check for legal values where the DTD limits things.
525 * @todo Check for unique id attribute :P
527 function fixTagAttributes( $text, $element ) {
528 global $wgUrlProtocols;
529 if( trim( $text ) == '' ) {
534 # Since we quote this later, this can be anything distinguishable
535 # from the end of the attribute
544 $whitelist = array_flip( Sanitizer
::attributeWhitelist( $element ) );
546 foreach( $pairs as $set ) {
547 $attribute = strtolower( $set[1] );
548 if( !isset( $whitelist[$attribute] ) ) {
552 $raw = Sanitizer
::getTagAttributeCallback( $set );
553 $value = Sanitizer
::normalizeAttributeValue( $raw );
555 # Strip javascript "expression" from stylesheets.
556 # http://msdn.microsoft.com/workshop/author/dhtml/overview/recalc.asp
557 if( $attribute == 'style' && preg_match(
558 '/(expression|tps*:\/\/|url\\s*\().*/is',
559 Sanitizer
::decodeCharReferences( $value ) ) ) {
564 # Templates and links may be expanded in later parsing,
565 # creating invalid or dangerous output. Suppress this.
566 $value = strtr( $value, array(
569 "''" => '''',
570 'ISBN' => 'ISBN',
572 'PMID' => 'PMID',
576 $value = preg_replace_callback(
577 '/(' . $wgUrlProtocols . ')/',
578 array( 'Sanitizer', 'armorLinksCallback' ),
581 // If this attribute was previously set, override it.
582 // Output should only have one attribute of each name.
583 $attribs[$attribute] = "$attribute=\"$value\"";
585 if( empty( $attribs ) ) {
588 return ' ' . implode( ' ', $attribs );
593 * Regex replace callback for armoring links against further processing.
594 * @param array $matches
598 function armorLinksCallback( $matches ) {
599 return str_replace( ':', ':', $matches[1] );
603 * Return an associative array of attribute names and values from
604 * a partial tag string. Attribute names are forces to lowercase,
605 * character references are decoded to UTF-8 text.
610 function decodeTagAttributes( $text ) {
613 if( trim( $text ) == '' ) {
625 foreach( $pairs as $set ) {
626 $attribute = strtolower( $set[1] );
627 $value = Sanitizer
::getTagAttributeCallback( $set );
628 $attribs[$attribute] = Sanitizer
::decodeCharReferences( $value );
634 * Pick the appropriate attribute value from a match set from the
635 * MW_ATTRIBS_REGEX matches.
641 function getTagAttributeCallback( $set ) {
642 if( isset( $set[6] ) ) {
643 # Illegal #XXXXXX color with no quotes.
645 } elseif( isset( $set[5] ) ) {
648 } elseif( isset( $set[4] ) ) {
651 } elseif( isset( $set[3] ) ) {
654 } elseif( !isset( $set[2] ) ) {
655 # In XHTML, attributes must have a value.
656 # For 'reduced' form, return explicitly the attribute name here.
659 wfDebugDieBacktrace( "Tag conditions not met. This should never happen and is a bug." );
664 * Normalize whitespace and character references in an XML source-
665 * encoded text for an attribute value.
667 * See http://www.w3.org/TR/REC-xml/#AVNormalize for background,
668 * but note that we're not returning the value, but are returning
669 * XML source fragments that will be slapped into output.
671 * @param string $text
675 function normalizeAttributeValue( $text ) {
676 return str_replace( '"', '"',
678 '/\r\n|[\x20\x0d\x0a\x09]/',
680 Sanitizer
::normalizeCharReferences( $text ) ) );
684 * Ensure that any entities and character references are legal
685 * for XML and XHTML specifically. Any stray bits will be
686 * &-escaped to result in a valid text fragment.
688 * a. any named char refs must be known in XHTML
689 * b. any numeric char refs must be legal chars, not invalid or forbidden
690 * c. use &#x, not &#X
691 * d. fix or reject non-valid attributes
693 * @param string $text
697 function normalizeCharReferences( $text ) {
698 return preg_replace_callback(
700 array( 'Sanitizer', 'normalizeCharReferencesCallback' ),
704 * @param string $matches
707 function normalizeCharReferencesCallback( $matches ) {
709 if( $matches[1] != '' ) {
710 $ret = Sanitizer
::normalizeEntity( $matches[1] );
711 } elseif( $matches[2] != '' ) {
712 $ret = Sanitizer
::decCharReference( $matches[2] );
713 } elseif( $matches[3] != '' ) {
714 $ret = Sanitizer
::hexCharReference( $matches[3] );
715 } elseif( $matches[4] != '' ) {
716 $ret = Sanitizer
::hexCharReference( $matches[4] );
718 if( is_null( $ret ) ) {
719 return htmlspecialchars( $matches[0] );
726 * If the named entity is defined in the HTML 4.0/XHTML 1.0 DTD,
727 * return the named entity reference as is. Otherwise, returns
728 * HTML-escaped text of pseudo-entity source (eg &foo;)
730 * @param string $name
733 function normalizeEntity( $name ) {
734 global $wgHtmlEntities;
735 if( isset( $wgHtmlEntities[$name] ) ) {
738 return "&$name;";
742 function decCharReference( $codepoint ) {
743 $point = intval( $codepoint );
744 if( Sanitizer
::validateCodepoint( $point ) ) {
745 return sprintf( '&#%d;', $point );
751 function hexCharReference( $codepoint ) {
752 $point = hexdec( $codepoint );
753 if( Sanitizer
::validateCodepoint( $point ) ) {
754 return sprintf( '&#x%x;', $point );
761 * Returns true if a given Unicode codepoint is a valid character in XML.
762 * @param int $codepoint
765 function validateCodepoint( $codepoint ) {
766 return ($codepoint == 0x09)
767 ||
($codepoint == 0x0a)
768 ||
($codepoint == 0x0d)
769 ||
($codepoint >= 0x20 && $codepoint <= 0xd7ff)
770 ||
($codepoint >= 0xe000 && $codepoint <= 0xfffd)
771 ||
($codepoint >= 0x10000 && $codepoint <= 0x10ffff);
775 * Decode any character references, numeric or named entities,
776 * in the text and return a UTF-8 string.
778 * @param string $text
782 function decodeCharReferences( $text ) {
783 return preg_replace_callback(
785 array( 'Sanitizer', 'decodeCharReferencesCallback' ),
790 * @param string $matches
793 function decodeCharReferencesCallback( $matches ) {
794 if( $matches[1] != '' ) {
795 return Sanitizer
::decodeEntity( $matches[1] );
796 } elseif( $matches[2] != '' ) {
797 return Sanitizer
::decodeChar( intval( $matches[2] ) );
798 } elseif( $matches[3] != '' ) {
799 return Sanitizer
::decodeChar( hexdec( $matches[3] ) );
800 } elseif( $matches[4] != '' ) {
801 return Sanitizer
::decodeChar( hexdec( $matches[4] ) );
803 # Last case should be an ampersand by itself
808 * Return UTF-8 string for a codepoint if that is a valid
809 * character reference, otherwise U+FFFD REPLACEMENT CHARACTER.
810 * @param int $codepoint
814 function decodeChar( $codepoint ) {
815 if( Sanitizer
::validateCodepoint( $codepoint ) ) {
816 return codepointToUtf8( $codepoint );
818 return UTF8_REPLACEMENT
;
823 * If the named entity is defined in the HTML 4.0/XHTML 1.0 DTD,
824 * return the UTF-8 encoding of that character. Otherwise, returns
825 * pseudo-entity source (eg &foo;)
827 * @param string $name
830 function decodeEntity( $name ) {
831 global $wgHtmlEntities;
832 if( isset( $wgHtmlEntities[$name] ) ) {
833 return codepointToUtf8( $wgHtmlEntities[$name] );
840 * Fetch the whitelist of acceptable attributes for a given
843 * @param string $element
846 function attributeWhitelist( $element ) {
848 if( !isset( $list ) ) {
849 $list = Sanitizer
::setupAttributeWhitelist();
851 return isset( $list[$element] )
859 function setupAttributeWhitelist() {
860 $common = array( 'id', 'class', 'lang', 'dir', 'title', 'style' );
861 $block = array_merge( $common, array( 'align' ) );
862 $tablealign = array( 'align', 'char', 'charoff', 'valign' );
863 $tablecell = array( 'abbr',
869 'nowrap', # deprecated
870 'width', # deprecated
871 'height', # deprecated
872 'bgcolor' # deprecated
875 # Numbers refer to sections in HTML 4.01 standard describing the element.
876 # See: http://www.w3.org/TR/html4/
880 'center' => $common, # deprecated
881 'span' => $block, # ??
910 'blockquote' => array_merge( $common, array( 'cite' ) ),
921 'br' => array( 'id', 'class', 'title', 'style', 'clear' ),
924 'pre' => array_merge( $common, array( 'width' ) ),
927 'ins' => array_merge( $common, array( 'cite', 'datetime' ) ),
928 'del' => array_merge( $common, array( 'cite', 'datetime' ) ),
931 'ul' => array_merge( $common, array( 'type' ) ),
932 'ol' => array_merge( $common, array( 'type', 'start' ) ),
933 'li' => array_merge( $common, array( 'type', 'value' ) ),
941 'table' => array_merge( $common,
942 array( 'summary', 'width', 'border', 'frame',
943 'rules', 'cellspacing', 'cellpadding',
944 'align', 'bgcolor', 'frame', 'rules',
948 'caption' => array_merge( $common, array( 'align' ) ),
951 'thead' => array_merge( $common, $tablealign ),
952 'tfoot' => array_merge( $common, $tablealign ),
953 'tbody' => array_merge( $common, $tablealign ),
956 'colgroup' => array_merge( $common, array( 'span', 'width' ), $tablealign ),
957 'col' => array_merge( $common, array( 'span', 'width' ), $tablealign ),
960 'tr' => array_merge( $common, array( 'bgcolor' ), $tablealign ),
963 'td' => array_merge( $common, $tablecell, $tablealign ),
964 'th' => array_merge( $common, $tablecell, $tablealign ),
977 'font' => array_merge( $common, array( 'size', 'color', 'face' ) ),
981 'hr' => array_merge( $common, array( 'noshade', 'size', 'width' ) ),
983 # XHTML Ruby annotation text module, simple ruby only.
984 # http://www.w3c.org/TR/ruby/
989 'rt' => $common, #array_merge( $common, array( 'rbspan' ) ),
996 * Take a fragment of (potentially invalid) HTML and return
997 * a version with any tags removed, encoded suitably for literal
998 * inclusion in an attribute value.
1000 * @param string $text HTML fragment
1003 function stripAllTags( $text ) {
1005 $text = preg_replace( '/<[^>]*>/', '', $text );
1007 # Normalize &entities and whitespace
1008 $text = Sanitizer
::normalizeAttributeValue( $text );
1010 # Will be placed into "double-quoted" attributes,
1011 # make sure remaining bits are safe.
1012 $text = str_replace(
1013 array('<', '>', '"'),
1014 array('<', '>', '"'),