Merge branch 'w11_MDL-31805_m23_html2text' of git://github.com/skodak/moodle
This commit is contained in:
+283
-142
@@ -1,22 +1,38 @@
|
||||
<?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/>.
|
||||
//
|
||||
// Author(s): Jon Abernathy <[email protected]>
|
||||
// Copyright (c) 2005-2007 Jon Abernathy <[email protected]>
|
||||
/*************************************************************************
|
||||
* *
|
||||
* class.html2text.inc *
|
||||
* *
|
||||
*************************************************************************
|
||||
* *
|
||||
* Converts HTML to formatted plain text *
|
||||
* *
|
||||
* Copyright (c) 2005-2007 Jon Abernathy <[email protected]> *
|
||||
* All rights reserved. *
|
||||
* *
|
||||
* This script 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 2 of the License, or *
|
||||
* (at your option) any later version. *
|
||||
* *
|
||||
* The GNU General Public License can be found at *
|
||||
* http://www.gnu.org/copyleft/gpl.html. *
|
||||
* *
|
||||
* This script 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. *
|
||||
* *
|
||||
* Author(s): Jon Abernathy <[email protected]> *
|
||||
* *
|
||||
* Last modified: 08/08/07 *
|
||||
* *
|
||||
*************************************************************************/
|
||||
|
||||
if (!defined('RCMAIL_CHARSET')) {
|
||||
define('RCMAIL_CHARSET', 'UTF-8');
|
||||
}
|
||||
|
||||
/**
|
||||
* Takes HTML and converts it to formatted, plain text.
|
||||
@@ -87,15 +103,9 @@
|
||||
*
|
||||
* *** End of the housecleaning updates. Updated 08/08/07.
|
||||
*
|
||||
* @package moodlecore
|
||||
* @copyright Jon Abernathy <[email protected]>
|
||||
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||||
*/
|
||||
|
||||
/**
|
||||
* @package moodlecore
|
||||
* @copyright Jon Abernathy <[email protected]>
|
||||
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||||
* @author Jon Abernathy <[email protected]>
|
||||
* @version 1.0.0
|
||||
* @since PHP 4.0.2
|
||||
*/
|
||||
class html2text
|
||||
{
|
||||
@@ -138,10 +148,8 @@ class html2text
|
||||
var $search = array(
|
||||
"/\r/", // Non-legal carriage return
|
||||
"/[\n\t]+/", // Newlines and tabs
|
||||
'/[ ]{2,}/', // Runs of spaces, pre-handling
|
||||
'/<script[^>]*>.*?<\/script>/i', // <script>s -- which strip_tags supposedly has problems with
|
||||
'/<style[^>]*>.*?<\/style>/i', // <style>s -- which strip_tags supposedly has problems with
|
||||
//'/<!-- .* -->/', // Comments -- which strip_tags might have problem a with
|
||||
'/<p[^>]*>/i', // <P>
|
||||
'/<br[^>]*>/i', // <br>
|
||||
'/<i[^>]*>(.*?)<\/i>/i', // <i>
|
||||
@@ -151,26 +159,10 @@ class html2text
|
||||
'/<li[^>]*>(.*?)<\/li>/i', // <li> and </li>
|
||||
'/<li[^>]*>/i', // <li>
|
||||
'/<hr[^>]*>/i', // <hr>
|
||||
'/<div[^>]*>/i', // <div>
|
||||
'/(<table[^>]*>|<\/table>)/i', // <table> and </table>
|
||||
'/(<tr[^>]*>|<\/tr>)/i', // <tr> and </tr>
|
||||
'/<td[^>]*>(.*?)<\/td>/i', // <td> and </td>
|
||||
'/&(nbsp|#160);/i', // Non-breaking space
|
||||
'/&(quot|rdquo|ldquo|#8220|#8221|#147|#148);/i',
|
||||
// Double quotes
|
||||
'/&(apos|rsquo|lsquo|#8216|#8217);/i', // Single quotes
|
||||
'/>/i', // Greater-than
|
||||
'/</i', // Less-than
|
||||
'/&(amp|#38);/i', // Ampersand
|
||||
'/&(copy|#169);/i', // Copyright
|
||||
'/&(trade|#8482|#153);/i', // Trademark
|
||||
'/&(reg|#174);/i', // Registered
|
||||
'/&(mdash|#151|#8212);/i', // mdash
|
||||
'/&(ndash|minus|#8211|#8722);/i', // ndash
|
||||
'/&(bull|#149|#8226);/i', // Bullet
|
||||
'/&(pound|#163);/i', // Pound sign
|
||||
'/&(euro|#8364);/i', // Euro sign
|
||||
'/[ ]+([\n\t])/', // Trailing spaces before newline or tab
|
||||
'/[ ]{2,}/' // Runs of spaces, post-handling
|
||||
);
|
||||
|
||||
/**
|
||||
@@ -183,11 +175,9 @@ class html2text
|
||||
var $replace = array(
|
||||
'', // Non-legal carriage return
|
||||
' ', // Newlines and tabs
|
||||
' ', // Runs of spaces, pre-handling
|
||||
'', // <script>s -- which strip_tags supposedly has problems with
|
||||
'', // <style>s -- which strip_tags supposedly has problems with
|
||||
//'', // Comments -- which strip_tags might have problem a with
|
||||
"\n\n", // <P>
|
||||
"\n\n", // <P>
|
||||
"\n", // <br>
|
||||
'_\\1_', // <i>
|
||||
'_\\1_', // <em>
|
||||
@@ -196,15 +186,52 @@ class html2text
|
||||
"\t* \\1\n", // <li> and </li>
|
||||
"\n\t* ", // <li>
|
||||
"\n-------------------------\n", // <hr>
|
||||
"<div>\n", // <div>
|
||||
"\n\n", // <table> and </table>
|
||||
"\n", // <tr> and </tr>
|
||||
"\t\t\\1\n", // <td> and </td>
|
||||
);
|
||||
|
||||
/**
|
||||
* List of preg* regular expression patterns to search for,
|
||||
* used in conjunction with $ent_replace.
|
||||
*
|
||||
* @var array $ent_search
|
||||
* @access public
|
||||
* @see $ent_replace
|
||||
*/
|
||||
var $ent_search = array(
|
||||
'/&(nbsp|#160);/i', // Non-breaking space
|
||||
'/&(quot|rdquo|ldquo|#8220|#8221|#147|#148);/i',
|
||||
// Double quotes
|
||||
'/&(apos|rsquo|lsquo|#8216|#8217);/i', // Single quotes
|
||||
'/>/i', // Greater-than
|
||||
'/</i', // Less-than
|
||||
'/&(copy|#169);/i', // Copyright
|
||||
'/&(trade|#8482|#153);/i', // Trademark
|
||||
'/&(reg|#174);/i', // Registered
|
||||
'/&(mdash|#151|#8212);/i', // mdash
|
||||
'/&(ndash|minus|#8211|#8722);/i', // ndash
|
||||
'/&(bull|#149|#8226);/i', // Bullet
|
||||
'/&(pound|#163);/i', // Pound sign
|
||||
'/&(euro|#8364);/i', // Euro sign
|
||||
'/&(amp|#38);/i', // Ampersand: see _converter()
|
||||
'/[ ]{2,}/', // Runs of spaces, post-handling
|
||||
);
|
||||
|
||||
/**
|
||||
* List of pattern replacements corresponding to patterns searched.
|
||||
*
|
||||
* @var array $ent_replace
|
||||
* @access public
|
||||
* @see $ent_search
|
||||
*/
|
||||
var $ent_replace = array(
|
||||
' ', // Non-breaking space
|
||||
'"', // Double quotes
|
||||
"'", // Single quotes
|
||||
'>',
|
||||
'<',
|
||||
'&',
|
||||
'(c)',
|
||||
'(tm)',
|
||||
'(R)',
|
||||
@@ -213,8 +240,8 @@ class html2text
|
||||
'*',
|
||||
'£',
|
||||
'EUR', // Euro sign. € ?
|
||||
'\\1', // Trailing spaces before newline or tab
|
||||
' ' // Runs of spaces, post-handling
|
||||
'|+|amp|+|', // Ampersand: see _converter()
|
||||
' ', // Runs of spaces, post-handling
|
||||
);
|
||||
|
||||
/**
|
||||
@@ -225,23 +252,23 @@ class html2text
|
||||
* @access public
|
||||
*/
|
||||
var $callback_search = array(
|
||||
'/<(a) [^>]*href=("|\')([^"\']+)\2[^>]*>(.*?)<\/a>/i',
|
||||
// <a href="">
|
||||
'/<(h)[123456][^>]*>(.*?)<\/h[123456]>/i', // H1 - H3
|
||||
'/<(b)[^>]*>(.*?)<\/b>/i', // <b>
|
||||
'/<(strong)[^>]*>(.*?)<\/strong>/i', // <strong>
|
||||
'/<(a) [^>]*href=("|\')([^"\']+)\2[^>]*>(.*?)<\/a>/i',
|
||||
// <a href="">
|
||||
'/<(th)[^>]*>(.*?)<\/th>/i', // <th> and </th>
|
||||
'/<(img)[^>]*alt=\"([^>"]+)\"[^>]*>/i', // <img> with alt
|
||||
);
|
||||
|
||||
/**
|
||||
* List of preg* regular expression patterns to search for in PRE body,
|
||||
* used in conjunction with $pre_replace.
|
||||
*
|
||||
* @var array $pre_search
|
||||
* @access public
|
||||
* @see $pre_replace
|
||||
*/
|
||||
/**
|
||||
* List of preg* regular expression patterns to search for in PRE body,
|
||||
* used in conjunction with $pre_replace.
|
||||
*
|
||||
* @var array $pre_search
|
||||
* @access public
|
||||
* @see $pre_replace
|
||||
*/
|
||||
var $pre_search = array(
|
||||
"/\n/",
|
||||
"/\t/",
|
||||
@@ -294,21 +321,11 @@ class html2text
|
||||
/**
|
||||
* Contains URL addresses from links to be rendered in plain text.
|
||||
*
|
||||
* @var string $_link_list
|
||||
* @var array $_link_list
|
||||
* @access private
|
||||
* @see _build_link_list()
|
||||
*/
|
||||
var $_link_list = '';
|
||||
|
||||
/**
|
||||
* Number of valid links detected in the text, used for plain text
|
||||
* display (rendered similar to footnotes).
|
||||
*
|
||||
* @var integer $_link_count
|
||||
* @access private
|
||||
* @see _build_link_list()
|
||||
*/
|
||||
var $_link_count = 0;
|
||||
var $_link_list = array();
|
||||
|
||||
/**
|
||||
* Boolean flag, true if a table of link URLs should be listed after the text.
|
||||
@@ -335,7 +352,7 @@ class html2text
|
||||
*/
|
||||
function html2text( $source = '', $from_file = false, $do_links = true, $width = 75 )
|
||||
{
|
||||
if ($source !== '') {
|
||||
if ( $source !== '' ) {
|
||||
$this->set_html($source, $from_file);
|
||||
}
|
||||
|
||||
@@ -425,11 +442,11 @@ class html2text
|
||||
function set_base_url( $url = '' )
|
||||
{
|
||||
if ( empty($url) ) {
|
||||
if ( !empty($_SERVER['HTTP_HOST']) ) {
|
||||
$this->url = 'http://' . $_SERVER['HTTP_HOST'];
|
||||
} else {
|
||||
$this->url = '';
|
||||
}
|
||||
if ( !empty($_SERVER['HTTP_HOST']) ) {
|
||||
$this->url = 'http://' . $_SERVER['HTTP_HOST'];
|
||||
} else {
|
||||
$this->url = '';
|
||||
}
|
||||
} else {
|
||||
// Strip any trailing slashes for consistency (relative
|
||||
// URLs may already start with a slash like "/file.html")
|
||||
@@ -441,12 +458,7 @@ class html2text
|
||||
}
|
||||
|
||||
/**
|
||||
* Workhorse function that does actual conversion.
|
||||
*
|
||||
* First performs custom tag replacement specified by $search and
|
||||
* $replace arrays. Then strips any remaining HTML tags, reduces whitespace
|
||||
* and newlines to a readable format, and word wraps the text to
|
||||
* $width characters.
|
||||
* Workhorse function that does actual conversion (calls _converter() method).
|
||||
*
|
||||
* @access private
|
||||
* @return void
|
||||
@@ -454,46 +466,82 @@ class html2text
|
||||
function _convert()
|
||||
{
|
||||
// Variables used for building the link list
|
||||
$this->_link_count = 0;
|
||||
$this->_link_list = '';
|
||||
$this->_link_list = array();
|
||||
|
||||
$text = trim($this->html);
|
||||
|
||||
// Convert HTML to TXT
|
||||
$this->_converter($text);
|
||||
|
||||
// Add link list
|
||||
if (!empty($this->_link_list)) {
|
||||
$text .= "\n\nLinks:\n------\n";
|
||||
foreach ($this->_link_list as $idx => $url) {
|
||||
$text .= '[' . ($idx+1) . '] ' . $url . "\n";
|
||||
}
|
||||
}
|
||||
|
||||
$this->text = $text;
|
||||
|
||||
$this->_converted = true;
|
||||
}
|
||||
|
||||
/**
|
||||
* Workhorse function that does actual conversion.
|
||||
*
|
||||
* First performs custom tag replacement specified by $search and
|
||||
* $replace arrays. Then strips any remaining HTML tags, reduces whitespace
|
||||
* and newlines to a readable format, and word wraps the text to
|
||||
* $width characters.
|
||||
*
|
||||
* @param string Reference to HTML content string
|
||||
*
|
||||
* @access private
|
||||
* @return void
|
||||
*/
|
||||
function _converter(&$text)
|
||||
{
|
||||
// Convert <BLOCKQUOTE> (before PRE!)
|
||||
$this->_convert_blockquotes($text);
|
||||
|
||||
// Convert <PRE>
|
||||
$this->_convert_pre($text);
|
||||
|
||||
// Run our defined search-and-replace
|
||||
// Run our defined tags search-and-replace
|
||||
$text = preg_replace($this->search, $this->replace, $text);
|
||||
|
||||
// Run our defined tags search-and-replace with callback
|
||||
$text = preg_replace_callback($this->callback_search, array('html2text', '_preg_callback'), $text);
|
||||
|
||||
// Strip any other HTML tags
|
||||
$text = strip_tags($text, $this->allowed_tags);
|
||||
|
||||
// Run our defined entities/characters search-and-replace
|
||||
$text = preg_replace($this->ent_search, $this->ent_replace, $text);
|
||||
|
||||
// Replace known html entities
|
||||
$text = html_entity_decode($text, ENT_COMPAT, 'UTF-8');
|
||||
|
||||
// Remove unknown/unhandled entities (this cannot be done in search-and-replace block)
|
||||
$text = preg_replace('/&([a-zA-Z0-9]{2,6}|#[0-9]{2,4});/', '', $text);
|
||||
|
||||
// Strip any other HTML tags
|
||||
$text = strip_tags($text, $this->allowed_tags);
|
||||
// Convert "|+|amp|+|" into "&", need to be done after handling of unknown entities
|
||||
// This properly handles situation of "&quot;" in input string
|
||||
$text = str_replace('|+|amp|+|', '&', $text);
|
||||
|
||||
// Bring down number of empty lines to 2 max
|
||||
$text = preg_replace("/\n\s+\n/", "\n\n", $text);
|
||||
$text = preg_replace("/[\n]{3,}/", "\n\n", $text);
|
||||
|
||||
// Add link list
|
||||
if ( !empty($this->_link_list) ) {
|
||||
$text .= "\n\nLinks:\n------\n" . $this->_link_list;
|
||||
}
|
||||
// remove leading empty lines (can be produced by eg. P tag on the beginning)
|
||||
$text = ltrim($text, "\n");
|
||||
|
||||
// Wrap the text to a readable format
|
||||
// for PHP versions >= 4.0.2. Default width is 75
|
||||
// If width is 0 or less, don't wrap the text.
|
||||
if ( $this->width > 0 ) {
|
||||
$text = wordwrap($text, $this->width);
|
||||
$text = wordwrap($text, $this->width);
|
||||
}
|
||||
|
||||
$this->text = $text;
|
||||
|
||||
$this->_converted = true;
|
||||
}
|
||||
|
||||
/**
|
||||
@@ -511,39 +559,44 @@ class html2text
|
||||
*/
|
||||
function _build_link_list( $link, $display )
|
||||
{
|
||||
if ( !$this->_do_links ) return $display;
|
||||
|
||||
if ( substr($link, 0, 7) == 'http://' || substr($link, 0, 8) == 'https://' ||
|
||||
substr($link, 0, 7) == 'mailto:' ) {
|
||||
$this->_link_count++;
|
||||
$this->_link_list .= "[" . $this->_link_count . "] $link\n";
|
||||
$additional = ' [' . $this->_link_count . ']';
|
||||
} elseif ( substr($link, 0, 11) == 'javascript:' ) {
|
||||
// Don't count the link; ignore it
|
||||
$additional = '';
|
||||
// what about href="#anchor" ?
|
||||
} else {
|
||||
$this->_link_count++;
|
||||
$this->_link_list .= "[" . $this->_link_count . "] " . $this->url;
|
||||
if ( substr($link, 0, 1) != '/' ) {
|
||||
$this->_link_list .= '/';
|
||||
}
|
||||
$this->_link_list .= "$link\n";
|
||||
$additional = ' [' . $this->_link_count . ']';
|
||||
if (!$this->_do_links || empty($link)) {
|
||||
return $display;
|
||||
}
|
||||
|
||||
return $display . $additional;
|
||||
// Ignored link types
|
||||
if (preg_match('!^(javascript|mailto|#):!i', $link)) {
|
||||
return $display;
|
||||
}
|
||||
|
||||
if (preg_match('!^(https?://)!i', $link)) {
|
||||
$url = $link;
|
||||
}
|
||||
else {
|
||||
$url = $this->url;
|
||||
if (substr($link, 0, 1) != '/') {
|
||||
$url .= '/';
|
||||
}
|
||||
$url .= "$link";
|
||||
}
|
||||
|
||||
if (($index = array_search($url, $this->_link_list)) === false) {
|
||||
$this->_link_list[] = $url;
|
||||
$index = count($this->_link_list);
|
||||
}
|
||||
|
||||
return $display . ' [' . ($index+1) . ']';
|
||||
}
|
||||
|
||||
/**
|
||||
* Helper function for PRE body conversion.
|
||||
*
|
||||
* @param string $text HTML content
|
||||
* @param string HTML content
|
||||
* @access private
|
||||
*/
|
||||
function _convert_pre(&$text)
|
||||
{
|
||||
while (preg_match('/<pre[^>]*>(.*)<\/pre>/ismU', $text, $matches)) {
|
||||
// get the content of PRE element
|
||||
while (preg_match('/<pre[^>]*>(.*)<\/pre>/ismU', $text, $matches)) {
|
||||
// convert the content
|
||||
$this->pre_content = sprintf('<div><br>%s<br></div>',
|
||||
preg_replace($this->pre_search, $this->pre_replace, $matches[1]));
|
||||
@@ -556,26 +609,83 @@ class html2text
|
||||
}
|
||||
|
||||
/**
|
||||
* Callback function for preg_replace_callback use.
|
||||
* Helper function for BLOCKQUOTE body conversion.
|
||||
*
|
||||
* @param array $matches PREG matches
|
||||
* @return string
|
||||
* @param string HTML content
|
||||
* @access private
|
||||
*/
|
||||
function _preg_callback($matches)
|
||||
function _convert_blockquotes(&$text)
|
||||
{
|
||||
if (preg_match_all('/<\/*blockquote[^>]*>/i', $text, $matches, PREG_OFFSET_CAPTURE)) {
|
||||
$level = 0;
|
||||
$diff = 0;
|
||||
foreach ($matches[0] as $m) {
|
||||
if ($m[0][0] == '<' && $m[0][1] == '/') {
|
||||
$level--;
|
||||
if ($level < 0) {
|
||||
$level = 0; // malformed HTML: go to next blockquote
|
||||
}
|
||||
else if ($level > 0) {
|
||||
// skip inner blockquote
|
||||
}
|
||||
else {
|
||||
$end = $m[1];
|
||||
$len = $end - $taglen - $start;
|
||||
// Get blockquote content
|
||||
$body = substr($text, $start + $taglen - $diff, $len);
|
||||
|
||||
// Set text width
|
||||
$p_width = $this->width;
|
||||
if ($this->width > 0) $this->width -= 2;
|
||||
// Convert blockquote content
|
||||
$body = trim($body);
|
||||
$this->_converter($body);
|
||||
// Add citation markers and create PRE block
|
||||
$body = preg_replace('/((^|\n)>*)/', '\\1> ', trim($body));
|
||||
$body = '<pre>' . htmlspecialchars($body) . '</pre>';
|
||||
// Re-set text width
|
||||
$this->width = $p_width;
|
||||
// Replace content
|
||||
$text = substr($text, 0, $start - $diff)
|
||||
. $body . substr($text, $end + strlen($m[0]) - $diff);
|
||||
|
||||
$diff = $len + $taglen + strlen($m[0]) - strlen($body);
|
||||
unset($body);
|
||||
}
|
||||
}
|
||||
else {
|
||||
if ($level == 0) {
|
||||
$start = $m[1];
|
||||
$taglen = strlen($m[0]);
|
||||
}
|
||||
$level ++;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Callback function for preg_replace_callback use.
|
||||
*
|
||||
* @param array PREG matches
|
||||
* @return string
|
||||
*/
|
||||
private function _preg_callback($matches)
|
||||
{
|
||||
switch($matches[1]) {
|
||||
case 'b':
|
||||
case 'strong':
|
||||
return $this->_strtoupper($matches[2]);
|
||||
case 'hr':
|
||||
return $this->_strtoupper("\t\t". $matches[2] ."\n");
|
||||
case 'h':
|
||||
return $this->_strtoupper("\n\n". $matches[2] ."\n\n");
|
||||
case 'a':
|
||||
return $this->_build_link_list($matches[3], $matches[4]);
|
||||
case 'img':
|
||||
return '[' . $matches[2] . ']';
|
||||
case 'b':
|
||||
case 'strong':
|
||||
return $this->_toupper($matches[2]);
|
||||
case 'th':
|
||||
return $this->_toupper("\t\t". $matches[2] ."\n");
|
||||
case 'h':
|
||||
return $this->_toupper("\n\n". $matches[2] ."\n\n");
|
||||
case 'a':
|
||||
// Remove spaces in URL (#1487805)
|
||||
$url = str_replace(' ', '', $matches[3]);
|
||||
return $this->_build_link_list($url, $matches[4]);
|
||||
case 'img':
|
||||
return '[' . $matches[2] . ']';
|
||||
}
|
||||
}
|
||||
|
||||
@@ -591,14 +701,45 @@ class html2text
|
||||
}
|
||||
|
||||
/**
|
||||
* Strtoupper multibyte wrapper function
|
||||
* Strtoupper function with HTML tags and entities handling.
|
||||
*
|
||||
* @param string $str
|
||||
* @return string
|
||||
* @access private
|
||||
* @param string $str Text to convert
|
||||
* @return string Converted text
|
||||
*/
|
||||
function _strtoupper($str)
|
||||
private function _toupper($str)
|
||||
{
|
||||
return textlib::strtoupper($str);
|
||||
// string can containg HTML tags
|
||||
$chunks = preg_split('/(<[^>]*>)/', $str, null, PREG_SPLIT_NO_EMPTY | PREG_SPLIT_DELIM_CAPTURE);
|
||||
|
||||
// convert toupper only the text between HTML tags
|
||||
foreach ($chunks as $idx => $chunk) {
|
||||
if ($chunk[0] != '<') {
|
||||
$chunks[$idx] = $this->_strtoupper($chunk);
|
||||
}
|
||||
}
|
||||
|
||||
return implode($chunks);
|
||||
}
|
||||
|
||||
/**
|
||||
* Strtoupper multibyte wrapper function with HTML entities handling.
|
||||
*
|
||||
* @param string $str Text to convert
|
||||
* @return string Converted text
|
||||
*/
|
||||
private function _strtoupper($str)
|
||||
{
|
||||
$str = html_entity_decode($str, ENT_COMPAT, RCMAIL_CHARSET);
|
||||
|
||||
if (class_exists('textlib'))
|
||||
$str = textlib::strtoupper($str);
|
||||
else if (function_exists('mb_strtoupper'))
|
||||
$str = mb_strtoupper($str);
|
||||
else
|
||||
$str = strtoupper($str);
|
||||
|
||||
$str = htmlspecialchars($str, ENT_COMPAT, RCMAIL_CHARSET);
|
||||
|
||||
return $str;
|
||||
}
|
||||
}
|
||||
|
||||
@@ -1,69 +1,17 @@
|
||||
html2text.php is an unmodified copy of a file shipped with the RoundCube project:
|
||||
Customised html2text.php from the RoundCube project:
|
||||
|
||||
http://trac.roundcube.net/log/trunk/roundcubemail/program/lib/html2text.php
|
||||
|
||||
-- Francois Marier <[email protected]> 2009-05-22
|
||||
|
||||
|
||||
Modifications
|
||||
--------------
|
||||
|
||||
1- Don't just strip images, replace them with their alt text.
|
||||
1. Don't just strip images, replace them with their alt text. (Tim Hunt 2010-08-04)
|
||||
2. No strip slashes, we do not use magic quotes any more in Moodle 2.0 or later
|
||||
3. Use textlib, not crappy functions that break UTF-8, in the _strtoupper method. (Tim Hunt 2010-11-02)
|
||||
4. Make sure html2text does not destroy '0'. (Tim Hunt 2011-09-21)
|
||||
5. define missing mail charset
|
||||
|
||||
index b7e3e3e..96ef508 100644
|
||||
--- a/lib/html2text.php
|
||||
+++ b/lib/html2text.php
|
||||
@@ -237,6 +237,7 @@ class html2text
|
||||
'/<(a) [^>]*href=("|\')([^"\']+)\2[^>]*>(.*?)<\/a>/i',
|
||||
// <a href="">
|
||||
'/<(th)[^>]*>(.*?)<\/th>/i', // <th> and </th>
|
||||
+ '/<(img)[^>]*alt=\"([^>"]+)\"[^>]*>/i', // <img> with alt
|
||||
);
|
||||
|
||||
/**
|
||||
@@ -574,6 +575,8 @@ class html2text
|
||||
return $this->_strtoupper("\n\n". $matches[2] ."\n\n");
|
||||
case 'a':
|
||||
return $this->_build_link_list($matches[3], $matches[4]);
|
||||
+ case 'img':
|
||||
+ return '[' . $matches[2] . ']';
|
||||
}
|
||||
}
|
||||
|
||||
-- Tim Hunt 2010-08-04
|
||||
|
||||
2- No strip slashes, we do not use magic quotes any more in Moodle 2.0 or later
|
||||
|
||||
3- Use textlib, not crappy functions that break UTF-8, in the _strtoupper method.
|
||||
|
||||
Index: lib/html2text.php
|
||||
--- lib/html2text.php 2 Sep 2010 12:49:29 -0000 1.16
|
||||
+++ lib/html2text.php 2 Nov 2010 19:57:09 -0000
|
||||
@@ -580,9 +580,7 @@
|
||||
*/
|
||||
function _strtoupper($str)
|
||||
{
|
||||
- if (function_exists('mb_strtoupper'))
|
||||
- return mb_strtoupper($str);
|
||||
- else
|
||||
- return strtoupper($str);
|
||||
+ return textlib::strtoupper($str);
|
||||
}
|
||||
}
|
||||
|
||||
-- Tim Hunt 2010-11-02
|
||||
|
||||
4 - Make sure html2text does not destroy '0'.
|
||||
|
||||
index e2d0dff..9cc213d 100644
|
||||
--- a/lib/html2text.php
|
||||
+++ b/lib/html2text.php
|
||||
@@ -335,7 +335,7 @@ class html2text
|
||||
*/
|
||||
function html2text( $source = '', $from_file = false, $do_links = true, $wi {
|
||||
- if ( !empty($source) ) {
|
||||
+ if ($source !== '') {
|
||||
$this->set_html($source, $from_file);
|
||||
}
|
||||
|
||||
-- Tim Hunt 2011-09-21
|
||||
Imported from: https://github.com/moodle/custom-html2text/tree/MOODLE_5886_1
|
||||
|
||||
@@ -0,0 +1,147 @@
|
||||
<?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/>.
|
||||
|
||||
/**
|
||||
* Tests our html2text hacks
|
||||
*
|
||||
* Note: includes original tests from testweblib.php
|
||||
*
|
||||
* @package core
|
||||
* @subpackage lib
|
||||
* @copyright 2012 Petr Skoda {@link http://skodak.org}
|
||||
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||||
*/
|
||||
|
||||
|
||||
defined('MOODLE_INTERNAL') || die();
|
||||
|
||||
class html2text_test extends UnitTestCase {
|
||||
|
||||
public static $includecoverage = array('lib/html2text.php');
|
||||
|
||||
/**
|
||||
* ALT as image replacements
|
||||
*/
|
||||
public function test_images() {
|
||||
$this->assertEqual('[edit]', html_to_text('<img src="edit.png" alt="edit" />'));
|
||||
|
||||
$text = 'xx<img src="gif.gif" alt="some gif" />xx';
|
||||
$result = html_to_text($text, null, false, false);
|
||||
$this->assertIdentical($result, 'xx[some gif]xx');
|
||||
}
|
||||
|
||||
/**
|
||||
* No magic quotes messing
|
||||
*/
|
||||
public function test_no_strip_slashes() {
|
||||
$this->assertEqual('[\edit]', html_to_text('<img src="edit.png" alt="\edit" />'));
|
||||
|
||||
$text = '\\magic\\quotes\\are\\\\horrible';
|
||||
$result = html_to_text($text, null, false, false);
|
||||
$this->assertIdentical($result, $text);
|
||||
}
|
||||
|
||||
/**
|
||||
* Textlib integration
|
||||
*/
|
||||
public function test_textlib() {
|
||||
$text = '<strong>Žluťoučký koníček</strong>';
|
||||
$result = html_to_text($text, null, false, false);
|
||||
$this->assertIdentical($result, 'ŽLUŤOUČKÝ KONÍČEK');
|
||||
}
|
||||
|
||||
/**
|
||||
* Protect 0
|
||||
*/
|
||||
public function test_zero() {
|
||||
$text = '0';
|
||||
$result = html_to_text($text, null, false, false);
|
||||
$this->assertIdentical($result, $text);
|
||||
|
||||
$this->assertIdentical('0', html_to_text('0'));
|
||||
}
|
||||
|
||||
// ======= Standard html2text conversion features =======
|
||||
|
||||
/**
|
||||
* Various invalid HTML typed by users that ignore html strict
|
||||
**/
|
||||
public function test_invalid_html() {
|
||||
$text = 'Gin & Tonic';
|
||||
$result = html_to_text($text, null, false, false);
|
||||
$this->assertIdentical($result, $text);
|
||||
|
||||
$text = 'Gin > Tonic';
|
||||
$result = html_to_text($text, null, false, false);
|
||||
$this->assertIdentical($result, $text);
|
||||
|
||||
$text = 'Gin < Tonic';
|
||||
$result = html_to_text($text, null, false, false);
|
||||
$this->assertIdentical($result, $text);
|
||||
}
|
||||
|
||||
/**
|
||||
* Basic text formatting.
|
||||
*/
|
||||
public function test_simple() {
|
||||
$this->assertEqual("_Hello_ WORLD!", html_to_text('<p><i>Hello</i> <b>world</b>!</p>'));
|
||||
$this->assertEqual("All the WORLD’S a stage.\n\n-- William Shakespeare", html_to_text('<p>All the <strong>world’s</strong> a stage.</p><p>-- William Shakespeare</p>'));
|
||||
$this->assertEqual("HELLO WORLD!\n\n", html_to_text('<h1>Hello world!</h1>'));
|
||||
$this->assertEqual("Hello\nworld!", html_to_text('Hello<br />world!'));
|
||||
}
|
||||
|
||||
/**
|
||||
* Test line wrapping
|
||||
*/
|
||||
public function test_text_nowrap() {
|
||||
$long = "Here is a long string, more than 75 characters long, since by default html_to_text wraps text at 75 chars.";
|
||||
$wrapped = "Here is a long string, more than 75 characters long, since by default\nhtml_to_text wraps text at 75 chars.";
|
||||
$this->assertEqual($long, html_to_text($long, 0));
|
||||
$this->assertEqual($wrapped, html_to_text($long));
|
||||
}
|
||||
|
||||
/**
|
||||
* Whitespace removal
|
||||
*/
|
||||
public function test_trailing_whitespace() {
|
||||
$this->assertEqual('With trailing whitespace and some more text', html_to_text("With trailing whitespace \nand some more text", 0));
|
||||
}
|
||||
|
||||
/**
|
||||
* PRE parsing
|
||||
*/
|
||||
public function test_html_to_text_pre_parsing_problem() {
|
||||
$strorig = 'Consider the following function:<br /><pre><span style="color: rgb(153, 51, 102);">void FillMeUp(char* in_string) {'.
|
||||
'<br /> int i = 0;<br /> while (in_string[i] != \'\0\') {<br /> in_string[i] = \'X\';<br /> i++;<br /> }<br />'.
|
||||
'}</span></pre>What would happen if a non-terminated string were input to this function?<br /><br />';
|
||||
|
||||
$strconv = 'Consider the following function:
|
||||
|
||||
void FillMeUp(char* in_string) {
|
||||
int i = 0;
|
||||
while (in_string[i] != \'\0\') {
|
||||
in_string[i] = \'X\';
|
||||
i++;
|
||||
}
|
||||
}
|
||||
What would happen if a non-terminated string were input to this function?
|
||||
|
||||
';
|
||||
|
||||
$this->assertIdentical($strconv, html_to_text($strorig));
|
||||
}
|
||||
}
|
||||
|
||||
@@ -159,56 +159,6 @@ class web_test extends UnitTestCase {
|
||||
$url2->out_as_local_url();
|
||||
}
|
||||
|
||||
public function test_html_to_text_simple() {
|
||||
$this->assertEqual("\n\n_Hello_ WORLD!", html_to_text('<p><i>Hello</i> <b>world</b>!</p>'));
|
||||
}
|
||||
|
||||
public function test_html_to_text_image() {
|
||||
$this->assertEqual('[edit]', html_to_text('<img src="edit.png" alt="edit" />'));
|
||||
}
|
||||
|
||||
public function test_html_to_text_image_with_backslash() {
|
||||
$this->assertEqual('[\edit]', html_to_text('<img src="edit.png" alt="\edit" />'));
|
||||
}
|
||||
|
||||
public function test_html_to_text_nowrap() {
|
||||
$long = "Here is a long string, more than 75 characters long, since by default html_to_text wraps text at 75 chars.";
|
||||
$this->assertEqual($long, html_to_text($long, 0));
|
||||
}
|
||||
|
||||
public function test_html_to_text_dont_screw_up_utf8() {
|
||||
$this->assertEqual("\n\nAll the WORLD’S a stage.", html_to_text('<p>All the <strong>world’s</strong> a stage.</p>'));
|
||||
}
|
||||
|
||||
public function test_html_to_text_trailing_whitespace() {
|
||||
$this->assertEqual('With trailing whitespace and some more text', html_to_text("With trailing whitespace \nand some more text", 0));
|
||||
}
|
||||
|
||||
public function test_html_to_text_0() {
|
||||
$this->assertIdentical('0', html_to_text('0'));
|
||||
}
|
||||
|
||||
public function test_html_to_text_pre_parsing_problem() {
|
||||
$strorig = 'Consider the following function:<br /><pre><span style="color: rgb(153, 51, 102);">void FillMeUp(char* in_string) {'.
|
||||
'<br /> int i = 0;<br /> while (in_string[i] != \'\0\') {<br /> in_string[i] = \'X\';<br /> i++;<br /> }<br />'.
|
||||
'}</span></pre>What would happen if a non-terminated string were input to this function?<br /><br />';
|
||||
|
||||
$strconv = 'Consider the following function:
|
||||
|
||||
void FillMeUp(char* in_string) {
|
||||
int i = 0;
|
||||
while (in_string[i] != \'\0\') {
|
||||
in_string[i] = \'X\';
|
||||
i++;
|
||||
}
|
||||
}
|
||||
What would happen if a non-terminated string were input to this function?
|
||||
|
||||
';
|
||||
|
||||
$this->assertIdentical($strconv, html_to_text($strorig));
|
||||
}
|
||||
|
||||
public function test_clean_text() {
|
||||
$text = "lala <applet>xx</applet>";
|
||||
$this->assertEqual($text, clean_text($text, FORMAT_PLAIN));
|
||||
|
||||
Reference in New Issue
Block a user