Proyectos de Subversion Moodle

<?php

// This file is part of Moodle - http://moodle.org/

//

// Moodle is free software: you can redistribute it and/or modify

// it under the terms of the GNU General Public License as published by

// the Free Software Foundation, either version 3 of the License, or

// (at your option) any later version.

//

// Moodle is distributed in the hope that it will be useful,

// but WITHOUT ANY WARRANTY; without even the implied warranty of

// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

// GNU General Public License for more details.

//

// You should have received a copy of the GNU General Public License

// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.

/**

 * HTML  tidy text filter.

 *

 * @package    filter

 * @subpackage tiny

 * @copyright  2004 Hannes Gassert <hannes at mediagonal dot ch>

 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later

 */

defined('MOODLE_INTERNAL') || die();

// This class looks for text including markup and

// applies tidy's repair function to it.

// Tidy is a HTML clean and

// repair utility, which is currently available for PHP 4.3.x and PHP 5 as a

// PECL extension from http://pecl.php.net/package/tidy, in PHP 5 you need only

// to compile using the --with-tidy option.

// If you don't have the tidy extension installed or don't know, you can enable

// or disable this filter, it just won't have any effect.

// If you want to know what you can set in $tidyoptions and what their default

// values are, see http://php.net/manual/en/function.tidy-get-config.php.

class filter_tidy extends moodle_text_filter {

    function filter($text, array $options = array()) {

    /// Configuration for tidy. Feel free to tune for your needs, e.g. to allow

    /// proprietary markup.

        $tidyoptions = array(

                 'output-xhtml' => true,

                 'show-body-only' => true,

                 'tidy-mark' => false,

                 'drop-proprietary-attributes' => true,

                 'drop-empty-paras' => true,

                 'indent' => true,

                 'quiet' => true,

        );

    /// Do a quick check using strpos to avoid unnecessary work

        if (strpos($text, '<') === false) {

            return $text;

        }

    /// If enabled: run tidy over the entire string

        if (function_exists('tidy_repair_string')){

            $currentlocale = \core\locale::get_locale();

            try {

                $text = tidy_repair_string($text, $tidyoptions, 'utf8');

            } finally {

                \core\locale::set_locale(LC_ALL, $currentlocale);

            }

        }

        return $text;

    }

}