mirror of
https://github.com/kamilwylegala/cakephp2-php8.git
synced 2025-01-31 09:06:17 +00:00
bb71238ec1
git-svn-id: https://svn.cakephp.org/repo/trunk/cake@109 3807eeeb-6ff5-0310-8944-8be069107fe0
268 lines
No EOL
11 KiB
PHP
268 lines
No EOL
11 KiB
PHP
<?PHP
|
|
//////////////////////////////////////////////////////////////////////////
|
|
// + $Id$
|
|
// +------------------------------------------------------------------+ //
|
|
// + Cake <https://developers.nextco.com/cake/> + //
|
|
// + Copyright: (c) 2005 Cake Authors/Developers + //
|
|
// + + //
|
|
// + Author(s): Michal Tatarynowicz aka Pies <tatarynowicz@gmail.com> + //
|
|
// + Larry E. Masters aka PhpNut <nut@phpnut.com> + //
|
|
// + Kamil Dzielinski aka Brego <brego.dk@gmail.com> + //
|
|
// + + //
|
|
// +------------------------------------------------------------------+ //
|
|
// + Licensed under The MIT License + //
|
|
// + Redistributions of files must retain the above copyright notice. + //
|
|
// + You may not use this file except in compliance with the License. + //
|
|
// + + //
|
|
// + You may obtain a copy of the License at: + //
|
|
// + License page: http://www.opensource.org/licenses/mit-license.php + //
|
|
// +------------------------------------------------------------------+ //
|
|
//////////////////////////////////////////////////////////////////////////
|
|
|
|
/**
|
|
* Purpose: Flay
|
|
* Text-to-html parser, similar to Textile or RedCloth, only with somehow different syntax.
|
|
* See Flay::test() for examples.
|
|
* Test with $flay = new Flay(); $flay->test();
|
|
*
|
|
* @filesource
|
|
* @author Michal Tatarynowicz <tatarynowicz@gmail.com>
|
|
* @author Larry E. Masters aka PhpNut <nut@phpnut.com>
|
|
* @author Kamil Dzielinski aka Brego <brego.dk@gmail.com>
|
|
* @copyright Copyright (c) 2005, Cake Authors/Developers
|
|
* @link https://developers.nextco.com/cake/wiki/Authors Authors/Developers
|
|
* @package cake
|
|
* @subpackage cake.libs
|
|
* @since Cake v 0.2.9
|
|
* @version $Revision$
|
|
* @modifiedby $LastChangedBy$
|
|
* @lastmodified $Date$
|
|
* @license http://www.opensource.org/licenses/mit-license.php The MIT License
|
|
*
|
|
*/
|
|
|
|
/**
|
|
* Enter description here...
|
|
*
|
|
*/
|
|
uses('object');
|
|
|
|
/**
|
|
* Enter description here...
|
|
*
|
|
*
|
|
* @package cake
|
|
* @subpackage cake.libs
|
|
* @since Cake v 0.2.9
|
|
*
|
|
*/
|
|
class Flay extends Object {
|
|
/**
|
|
* Enter description here...
|
|
*
|
|
* @var unknown_type
|
|
*/
|
|
var $text = null;
|
|
|
|
/**
|
|
* Enter description here...
|
|
*
|
|
* @var unknown_type
|
|
*/
|
|
var $allow_html = false;
|
|
|
|
/**
|
|
* Enter description here...
|
|
*
|
|
* @param unknown_type $text
|
|
*/
|
|
function __construct ($text=null) {
|
|
$this->text = $text;
|
|
parent::__construct();
|
|
}
|
|
|
|
/**
|
|
* Enter description here...
|
|
*
|
|
* @param unknown_type $text
|
|
* @return unknown
|
|
*/
|
|
function to_html ($text=null) {
|
|
// trim whitespace and disable all HTML
|
|
$text = str_replace('<', '<', str_replace('>', '>', trim($text? $text: $this->text)));
|
|
|
|
// multi-paragraph functions
|
|
$text = preg_replace('#(?:[\n]{0,2})"""(.*)"""(?:[\n]{0,2})#s', "\n\n%BLOCKQUOTE%\n\n\\1\n\n%ENDBLOCKQUOTE%\n\n", $text);
|
|
$text = preg_replace('#(?:[\n]{0,2})===(.*)===(?:[\n]{0,2})#s', "\n\n%CENTER%\n\n\\1\n\n%ENDCENTER%\n\n", $text);
|
|
|
|
// pre-parse newlines
|
|
$text = preg_replace("#\r\n#", "\n", $text);
|
|
$text = preg_replace("#[\n]{2,}#", "%PARAGRAPH%", $text);
|
|
$text = preg_replace('#[\n]{1}#', "%LINEBREAK%", $text);
|
|
|
|
// split into paragraphs and parse
|
|
$out = '';
|
|
foreach (split('%PARAGRAPH%', $text) as $line) {
|
|
|
|
if ($line) {
|
|
|
|
// pre-parse links
|
|
$links = array();
|
|
$regs = null;
|
|
if (preg_match_all('#\[([^\[]{4,})\]#', $line, $regs)) {
|
|
foreach ($regs[1] as $reg) {
|
|
$links[] = $reg;
|
|
$line = str_replace("[{$reg}]",'%LINK'.(count($links)-1).'%', $line);
|
|
}
|
|
}
|
|
|
|
// MAIN TEXT FUNCTIONS
|
|
// bold
|
|
$line = ereg_replace("\*([^\*]*)\*", "<strong>\\1</strong>", $line);
|
|
// italic
|
|
$line = ereg_replace("_([^_]*)_", "<em>\\1</em>", $line);
|
|
// entities
|
|
$line = str_replace(' - ', ' – ', $line);
|
|
$line = str_replace(' -- ', ' — ', $line);
|
|
$line = str_replace('(C)', '©', $line);
|
|
$line = str_replace('(R)', '®', $line);
|
|
$line = str_replace('(TM)', '™', $line);
|
|
|
|
// guess e-mails
|
|
$emails = null;
|
|
if (preg_match_all("#([_A-Za-z0-9+-+]+(?:\.[_A-Za-z0-9+-]+)*@[A-Za-z0-9-]+(?:\.[A-Za-z0-9-]+)*)#", $line, $emails)) {
|
|
foreach ($emails[1] as $email) {
|
|
$line = str_replace($email, "<a href=\"mailto:{$email}\">{$email}</a>", $line);
|
|
}
|
|
}
|
|
// guess links
|
|
$urls = null;
|
|
if (preg_match_all("#((?:http|https|ftp|nntp)://[^ ]+)#", $line, $urls)) {
|
|
foreach ($urls[1] as $url) {
|
|
$line = str_replace($url, "<a href=\"{$url}\">{$url}</a>", $line);
|
|
}
|
|
}
|
|
if (preg_match_all("#(www\.[^ ]+)#", $line, $urls)) {
|
|
foreach ($urls[1] as $url) {
|
|
$line = str_replace($url, "<a href=\"{$url}\">{$url}</a>", $line);
|
|
}
|
|
}
|
|
|
|
|
|
// re-parse links
|
|
if (count($links)) {
|
|
for ($ii=0; $ii<count($links); $ii++) {
|
|
|
|
if (preg_match('#\.(jpg|jpeg|gif|png)$#', $links[$ii]))
|
|
$with = "<img src=\"{$links[$ii]}\" alt=\"\" />";
|
|
elseif (preg_match('#^([^\]\ ]+)(?: ([^\]]+))?$#', $links[$ii], $regs))
|
|
$with = "<a href=\"{$regs[1]}\" target=\"_blank\">".(isset($regs[2])? $regs[2]: $regs[1])."</a>";
|
|
else
|
|
$with = $links[$ii];
|
|
|
|
$line = str_replace("%LINK{$ii}%", $with, $line);
|
|
}
|
|
}
|
|
|
|
// re-parse newlines
|
|
$out .= str_replace('%LINEBREAK%', "<br />\n", "<p>{$line}</p>\n");
|
|
}
|
|
}
|
|
|
|
// re-parse multilines
|
|
$out = str_replace('<p>%BLOCKQUOTE%</p>', "<blockquote>", $out);
|
|
$out = str_replace('<p>%ENDBLOCKQUOTE%</p>', "</blockquote>", $out);
|
|
$out = str_replace('<p>%CENTER%</p>', "<center>", $out);
|
|
$out = str_replace('<p>%ENDCENTER%</p>', "</center>", $out);
|
|
|
|
return $out;
|
|
}
|
|
|
|
/**
|
|
* Enter description here...
|
|
*
|
|
* @param unknown_type $verbose
|
|
* @return unknown
|
|
*/
|
|
function test ($verbose=false) {
|
|
$errors = $tests = 0;
|
|
|
|
$tests_to_html = array(
|
|
array(
|
|
'text'=>"",
|
|
'html'=>""
|
|
),
|
|
array(
|
|
'text'=>"This is a text.",
|
|
'html'=>"<p>This is a text.</p>\n"
|
|
),
|
|
array(
|
|
'text'=>"This is a line.\n\n\nThis is\n another one.\n\n",
|
|
'html'=>"<p>This is a line.</p>\n<p>This is<br />\n another one.</p>\n"
|
|
),
|
|
array(
|
|
'text'=>"This line has *bold*, _italic_, and a _combo *bold* and italic_ texts.",
|
|
'html'=>"<p>This line has <strong>bold</strong>, <em>italic</em>, and a <em>combo <strong>bold</strong> and italic</em> texts.</p>\n"
|
|
),
|
|
array(
|
|
'text'=>"This line has <b>tags</b> which are <br />not allowed.",
|
|
'html'=>"<p>This line has <b>tags</b> which are <br />not allowed.</p>\n",
|
|
),
|
|
array(
|
|
'text'=>"[http://sputnik.pl] is a link, but so is [http://sputnik.pl/bla/ this one], and [this is not.",
|
|
'html'=>"<p><a href=\"http://sputnik.pl\" target=\"_blank\">http://sputnik.pl</a> is a link, but so is <a href=\"http://sputnik.pl/bla/\" target=\"_blank\">this one</a>, and [this is not.</p>\n"
|
|
),
|
|
array(
|
|
'text'=>"Why don't we try to insert an image.\n\n[http://sputnik.pl/test.jpg]",
|
|
'html'=>"<p>Why don't we try to insert an image.</p>\n<p><img src=\"http://sputnik.pl/test.jpg\" alt=\"\" /></p>\n"
|
|
),
|
|
array(
|
|
'text'=>"Auto-link my.name+real@my-server.com and example@example.com, should work.",
|
|
'html'=>"<p>Auto-link <a href=\"mailto:my.name+real@my-server.com\">my.name+real@my-server.com</a> and <a href=\"mailto:example@example.com\">example@example.com</a>, should work.</p>\n"
|
|
),
|
|
array(
|
|
'text'=>"\"\"\"This is a blockquote\"\"\"",
|
|
'html'=>"<blockquote>\n<p>This is a blockquote</p>\n</blockquote>\n"
|
|
),
|
|
array(
|
|
'text'=>"How about a blockquote?\"\"\"This is a multiline blockquote.\n\nThis is the second line.\"\"\"\nAnd this is not.",
|
|
'html'=>"<p>How about a blockquote?</p>\n<blockquote>\n<p>This is a multiline blockquote.</p>\n<p>This is the second line.</p>\n</blockquote>\n<p>And this is not.</p>\n"
|
|
),
|
|
array(
|
|
'text'=>"Now auto-link an url such as http://sputnik.pl or www.robocik-malowany.com/dupa[4] - or any other.",
|
|
'html'=>"<p>Now auto-link an url such as <a href=\"http://sputnik.pl\">http://sputnik.pl</a> or <a href=\"www.robocik-malowany.com/dupa[4]\">www.robocik-malowany.com/dupa[4]</a> – or any other.</p>\n"
|
|
),
|
|
array(
|
|
'text'=>"===This be centered===",
|
|
'html'=>"<center>\n<p>This be centered</p>\n</center>\n"
|
|
),
|
|
array(
|
|
'text'=>"===This be centered.\n\nAnd this be centered too,\nalong with this.===\nThis, alas, be not.",
|
|
'html'=>"<center>\n<p>This be centered.</p>\n<p>And this be centered too,<br />\nalong with this.</p>\n</center>\n<p>This, alas, be not.</p>\n"
|
|
),
|
|
array(
|
|
'text'=>"This tests (C)2004 Someone Else, \"Layer Your Apps(R)\" and Cake(TM).",
|
|
'html'=>"<p>This tests ©2004 Someone Else, \"Layer Your Apps®\" and Cake™.</p>\n"
|
|
),
|
|
);
|
|
|
|
foreach ($tests_to_html as $test) {
|
|
$this->text = $test['text'];
|
|
if ($test['html'] != ($o = $this->to_html())) {
|
|
debug ("Flay test error:\n Provided: {$test['text']}\n Expected: {$test['html']}\n Received: {$o}", 1);
|
|
$errors++;
|
|
}
|
|
elseif ($verbose) {
|
|
debug ("Flay test ok:\n Provided: {$test['text']}\n Received: {$o}", 1);
|
|
}
|
|
|
|
$tests++;
|
|
}
|
|
|
|
debug ("<b>Flay: {$tests} tests, {$errors} errors (".($errors?'FAILED':'PASSED').')</b>');
|
|
|
|
return !$errors;
|
|
}
|
|
}
|
|
|
|
?>
|