mirror of
https://github.com/WordPress/WordPress.git
synced 2024-12-22 17:18:32 +01:00
Textile should be moved to plugin.
git-svn-id: http://svn.automattic.com/wordpress/trunk@1014 1a063a9b-81f0-0310-95a4-ce76da25c4cd
This commit is contained in:
saxmatt
parent
80ea451b18
commit
eafea44724
@ -1,500 +0,0 @@
|
||||
<?php
|
||||
|
||||
/*
|
||||
|
||||
This is Textile
|
||||
A Humane Web Text Generator
|
||||
|
||||
Version 1.0
|
||||
21 Feb, 2003
|
||||
|
||||
Copyright (c) 2003, Dean Allen, www.textism.com
|
||||
All rights reserved.
|
||||
|
||||
_______
|
||||
LICENSE
|
||||
|
||||
Redistribution and use in source and binary forms, with or without
|
||||
modification, are permitted provided that the following conditions are met:
|
||||
|
||||
* Redistributions of source code must retain the above copyright notice,
|
||||
this list of conditions and the following disclaimer.
|
||||
|
||||
* Redistributions in binary form must reproduce the above copyright notice,
|
||||
this list of conditions and the following disclaimer in the documentation
|
||||
and/or other materials provided with the distribution.
|
||||
|
||||
* Neither the name Textile nor the names of its contributors may be used to
|
||||
endorse or promote products derived from this software without specific
|
||||
prior written permission.
|
||||
|
||||
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
|
||||
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||
ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
|
||||
LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
||||
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
||||
SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
||||
INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
||||
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
||||
ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||
POSSIBILITY OF SUCH DAMAGE.
|
||||
|
||||
_____________
|
||||
USING TEXTILE
|
||||
|
||||
Block modifier syntax:
|
||||
|
||||
Header: hn.
|
||||
Paragraphs beginning with 'hn. ' (where n is 1-6) are wrapped in header tags.
|
||||
Example: <h1>Text</h1>
|
||||
|
||||
Header with CSS class: hn(class).
|
||||
Paragraphs beginning with 'hn(class). ' receive a CSS class attribute.
|
||||
Example: <h1 class="class">Text</h1>
|
||||
|
||||
Paragraph: p. (applied by default)
|
||||
Paragraphs beginning with 'p. ' are wrapped in paragraph tags.
|
||||
Example: <p>Text</p>
|
||||
|
||||
Paragraph with CSS class: p(class).
|
||||
Paragraphs beginning with 'p(class). ' receive a CSS class attribute.
|
||||
Example: <p class="class">Text</p>
|
||||
|
||||
Blockquote: bq.
|
||||
Paragraphs beginning with 'bq. ' are wrapped in block quote tags.
|
||||
Example: <blockquote>Text</blockquote>
|
||||
|
||||
Blockquote with citation: bq(citeurl).
|
||||
Paragraphs beginning with 'bq(citeurl). ' receive a citation attribute.
|
||||
Example: <blockquote cite="citeurl">Text</blockquote>
|
||||
|
||||
Numeric list: #
|
||||
Consecutive paragraphs beginning with # are wrapped in ordered list tags.
|
||||
Example: <ol><li>ordered list</li></ol>
|
||||
|
||||
Bulleted list: *
|
||||
Consecutive paragraphs beginning with * are wrapped in unordered list tags.
|
||||
Example: <ul><li>unordered list</li></ul>
|
||||
|
||||
|
||||
Phrase modifier syntax:
|
||||
|
||||
_emphasis_ <em>emphasis</em>
|
||||
__italic__ <i>italic</i>
|
||||
*strong* <strong>strong</strong>
|
||||
**bold** <b>bold</b>
|
||||
??citation?? <cite>citation</cite>
|
||||
-deleted text- <del>deleted</del>
|
||||
+inserted text+ <ins>inserted</ins>
|
||||
^superscript^ <sup>superscript</sup>
|
||||
~subscript~ <sub>subscript</sub>
|
||||
@code@ <code>computer code</code>
|
||||
|
||||
==notextile== leave text alone (do not format)
|
||||
|
||||
"linktext":url <a href="url">linktext</a>
|
||||
"linktext(title)":url <a href="url" title="title">linktext</a>
|
||||
|
||||
!imageurl! <img src="imageurl" />
|
||||
!imageurl(alt text)! <img src="imageurl" alt="alt text" />
|
||||
!imageurl!:linkurl <a href="linkurl"><img src="imageurl" /></a>
|
||||
|
||||
ABC(Always Be Closing) <acronym title="Always Be Closing">ABC</acronym>
|
||||
|
||||
*/
|
||||
|
||||
|
||||
function textile($text) {
|
||||
|
||||
### Basic global changes
|
||||
|
||||
$text = stripslashes($text);
|
||||
|
||||
# turn any incoming ampersands into a dummy character for now.
|
||||
# This uses a negative lookahead for alphanumerics followed by a semicolon,
|
||||
# implying an incoming html entity, to be skipped
|
||||
$text = preg_replace("/&(?![#a-zA-Z0-9]+;)/","x%x%",$text);
|
||||
|
||||
# entify everything
|
||||
if (function_exists('mb_encode_numericentity')) {
|
||||
$text = encode_high($text);
|
||||
} else {
|
||||
$text = htmlentities($text,ENT_NOQUOTES,"utf-8");
|
||||
}
|
||||
|
||||
# unentify angle brackets and ampersands
|
||||
$text = str_replace(array(">", "<", "&"), array(">", "<", "&"), $text);
|
||||
|
||||
# zap carriage returns
|
||||
$text = str_replace("\r\n", "\n", $text);
|
||||
|
||||
# zap tabs
|
||||
$text = str_replace("\t", "", $text);
|
||||
|
||||
$text = preg_split("/\n/",$text);
|
||||
foreach($text as $line){
|
||||
$line = trim($line);
|
||||
$lineout[] = $line;
|
||||
}
|
||||
|
||||
$text = implode("\n",$lineout);
|
||||
|
||||
### Find and replace quick tags
|
||||
|
||||
# double equal signs means <notextile>
|
||||
$text = preg_replace('/(^|\s)==(.*)==(\s|$)?/msU','$1<notextile>$2</notextile>$3',$text);
|
||||
|
||||
|
||||
# image qtag
|
||||
$text = preg_replace('/!([^\s\(=]+)\s?(?:\(([^\)]+)\))?!(\s)?/mU','<img src="$1" alt="$2" border="0" />$3',$text);
|
||||
|
||||
|
||||
# image with hyperlink
|
||||
$text = preg_replace('/(<img.+ \/>):(\S+)(\s)/U','<a href="$2">$1</a>$3',$text);
|
||||
|
||||
# hyperlink qtag
|
||||
$text = preg_replace(
|
||||
'/
|
||||
([\s[{(]|[[:punct:]])? # 1 optional space or brackets before
|
||||
" # starting "
|
||||
([^"\(]+) # 2 text of link
|
||||
\s? # opt space
|
||||
(?:\(([^\(]*)\))? # 3 opt title attribute in parenths
|
||||
": # dividing ":
|
||||
(\S+\b) # 4 suppose this is the url
|
||||
(\/)? # 5 opt trailing slash
|
||||
([^[:alnum:]\/;]*) # 6 opt punctuation after the url
|
||||
(\s|$) # 7 either white space or end of string
|
||||
/x',
|
||||
'$1<a href="$4$5" title="$3">$2</a>$6$7',$text);
|
||||
|
||||
|
||||
# arrange qtag delineators and replacements in an array
|
||||
$qtags = array(
|
||||
'\*\*'=>'b',
|
||||
'\*'=>'strong',
|
||||
'\?\?'=>'cite',
|
||||
'-'=>'del',
|
||||
'\+'=>'ins',
|
||||
'~'=>'sub',
|
||||
'@'=>'code');
|
||||
|
||||
# loop through the array, replacing qtags with html
|
||||
foreach($qtags as $f=>$r){
|
||||
$text = preg_replace(
|
||||
'/(^|\s|>)'.$f.'\b(.+)\b([[:punct:]]*)'.$f.'([[:punct:]]{0,2})(\s|$)?/mU',
|
||||
'$1<'.$r.'>$2$3</'.$r.'>$4$5',
|
||||
$text);
|
||||
}
|
||||
|
||||
|
||||
# some weird bs with underscores and \b word boundaries,
|
||||
# so we'll do those on their own
|
||||
$text = preg_replace('/(^|\s)__(.*)__([[:punct:]]{0,2})(\s|$)?/mU','$1<i>$2</i>$3$4',$text);
|
||||
$text = preg_replace('/(^|\s)_(.*)_([[:punct:]]{0,2})(\s|$)?/mU','$1<em>$2</em>$3$4',$text);
|
||||
|
||||
$text = preg_replace('/\^(.*)\^/mU','<sup>$1</sup>',$text);
|
||||
|
||||
|
||||
|
||||
### Find and replace typographic chars and special tags
|
||||
|
||||
# small problem with double quotes at the end of a string
|
||||
$text = preg_replace('/"$/',"\" ", $text);
|
||||
|
||||
# NB: all these will wreak havoc inside <html> tags
|
||||
|
||||
$glyph_search = array(
|
||||
'/([^\s[{(>])?\'(?(1)|(?=\s|s\b))/', # single closing
|
||||
'/\'/', # single opening
|
||||
'/([^\s[{(])?"(?(1)|(?=\s))/', # double closing
|
||||
'/"/', # double opening
|
||||
'/\b( )?\.{3}/', # ellipsis
|
||||
'/\b([A-Z][A-Z0-9]{2,})\b(?:[(]([^)]*)[)])/', # 3+ uppercase acronym
|
||||
'/(^|[^"][>\s])([A-Z][A-Z0-9 ]{2,})([^<a-z0-9]|$)/', # 3+ uppercase caps
|
||||
'/\s?--\s?/', # em dash
|
||||
'/\s-\s/', # en dash
|
||||
'/(\d+) ?x ?(\d+)/', # dimension sign
|
||||
'/\b ?[([]TM[])]/i', # trademark
|
||||
'/\b ?[([]R[])]/i', # registered
|
||||
'/\b ?[([]C[])]/i'); # copyright
|
||||
|
||||
$glyph_replace = array(
|
||||
'$1’$2', # single closing
|
||||
'‘', # single opening
|
||||
'$1”', # double closing
|
||||
'“', # double opening
|
||||
'$1…', # ellipsis
|
||||
'<acronym title="$2">$1</acronym>', # 3+ uppercase acronym
|
||||
'$1<span class="caps">$2</span>$3', # 3+ uppercase caps
|
||||
'—', # em dash
|
||||
' – ', # en dash
|
||||
'$1×$2', # dimension sign
|
||||
'™', # trademark
|
||||
'®', # registered
|
||||
'©'); # copyright
|
||||
|
||||
# set toggle for turning off replacements between <code> or <pre>
|
||||
$codepre = false;
|
||||
|
||||
# if there is no html, do a simple search and replace
|
||||
if(!preg_match("/<.*>/",$text)){
|
||||
$text = preg_replace($glyph_search,$glyph_replace,$text);
|
||||
} else {
|
||||
|
||||
# else split the text into an array at <.*>
|
||||
$text = preg_split("/(<.*>)/U",$text,-1,PREG_SPLIT_DELIM_CAPTURE);
|
||||
foreach($text as $line){
|
||||
|
||||
# matches are off if we're between <code>, <pre> etc.
|
||||
if(preg_match('/<(code|pre|kbd|notextile)>/i',$line)){$codepre = true; }
|
||||
if(preg_match('/<\/(code|pre|kbd|notextile)>/i',$line)){$codepre = false; }
|
||||
|
||||
if(!preg_match("/<.*>/",$line) && $codepre == false){
|
||||
$line = preg_replace($glyph_search,$glyph_replace,$line);
|
||||
}
|
||||
|
||||
# convert htmlspecial if between <code>
|
||||
if ($codepre == true){
|
||||
$line = htmlspecialchars($line,ENT_NOQUOTES,"UTF-8");
|
||||
$line = str_replace("<pre>","<pre>",$line);
|
||||
$line = str_replace("<code>","<code>",$line);
|
||||
$line = str_replace("<notextile>","<notextile>",$line);
|
||||
$line = str_replace("<kbd>","<kbd>",$line);
|
||||
}
|
||||
|
||||
# each line gets pushed to a new array
|
||||
$glyph_out[] = $line;
|
||||
}
|
||||
# $text is now the new array, cast to a string
|
||||
$text = implode('',$glyph_out);
|
||||
}
|
||||
|
||||
|
||||
### Block level formatting
|
||||
|
||||
# deal with forced breaks; this is going to be a problem between
|
||||
# <pre> tags, but we'll clean them later
|
||||
$text = preg_replace("/(\S)(_*)([[:punct:]]*) *\n([^#*\s])/", "$1$2$3<br />$4", $text);
|
||||
|
||||
# might be a problem with lists
|
||||
$text = str_replace("l><br />", "l>\n", $text);
|
||||
|
||||
# clear out multiple newlines for now
|
||||
# $text = preg_replace("/\n+/","\n",$text);
|
||||
|
||||
# split the text into an array by newlines
|
||||
$text = preg_split("/\n/",$text);
|
||||
|
||||
array_push($text," ");
|
||||
|
||||
$list = '';
|
||||
$pre = false;
|
||||
|
||||
$block_find = array(
|
||||
'/^\s?\*\s(.*)/', # bulleted list *
|
||||
'/^\s?#\s(.*)/', # numeric list #
|
||||
'/^bq\. (.*)/', # blockquote bq.
|
||||
'/^h(\d)\(([[:alnum:]]+)\)\.\s(.*)/', # header hn(class). w/ css class
|
||||
'/^h(\d)\. (.*)/', # plain header hn.
|
||||
'/^p\(([[:alnum:]]+)\)\.\s(.*)/', # para p(class). w/ css class
|
||||
'/^p\. (.*)/i', # plain paragraph
|
||||
'/^([^\t ]+.*)/i' # remaining plain paragraph
|
||||
);
|
||||
|
||||
$block_replace = array(
|
||||
"\t\t<li>$1</li>",
|
||||
"\t\t\t<li>$1</li>",
|
||||
"\t<blockquote>$1</blockquote>",
|
||||
"\t<h$1 class=\"$2\">$3</h$1>$4",
|
||||
"\t<h$1>$2</h$1>$3",
|
||||
"\t<p class=\"$1\">$2</p>$3",
|
||||
"\t<p>$1</p>",
|
||||
"\t<p>$1</p>$2"
|
||||
);
|
||||
|
||||
|
||||
# loop through lines
|
||||
foreach($text as $line){
|
||||
|
||||
# matches are off if we're between <pre> or <code> tags
|
||||
if(preg_match('/<pre>/i',$line)){$pre = true; }
|
||||
|
||||
# deal with block replacements first, then see if we're in a list
|
||||
if ($pre == false){
|
||||
$line = preg_replace($block_find,$block_replace,$line);
|
||||
}
|
||||
|
||||
# kill any br tags that slipped in earlier
|
||||
if ($pre == true){
|
||||
$line = str_replace("<br />","\n",$line);
|
||||
}
|
||||
|
||||
# matches back on after </pre>
|
||||
if(preg_match('/<\/pre>/i',$line)){$pre = false; }
|
||||
|
||||
# on entry to a list, $list switches to a value
|
||||
# two tabs means unordered list
|
||||
if ($list == '' && preg_match('/^\t\t<li>/',$line)){
|
||||
$list = "ul";
|
||||
$line = preg_replace('/^(\t\t<li>.*)/',"\t<ul>\n$1",$line);
|
||||
|
||||
} else if ($list == '' && preg_match('/^\t\t\t<li>/',$line)){
|
||||
$list = "ol";
|
||||
$line = preg_replace('/^\t(\t\t<li>.*)/',"\t<ol>\n$1",$line);
|
||||
|
||||
# at the end of a ul
|
||||
} else if ($list == 'ul' && !preg_match('/^\t\t<li>/',$line)){
|
||||
$list = '';
|
||||
$line = preg_replace('/^(.*)$/',"\t</ul>\n$1",$line);
|
||||
|
||||
# at the end of a ol
|
||||
} else if ($list == 'ol' && !preg_match('/^\t\t\t<li>/',$line)){
|
||||
$list = '';
|
||||
$line = preg_replace('/^(.*)$/',"\t</ol>\n$1",$line);
|
||||
}
|
||||
|
||||
|
||||
# push each line to a new array once processed
|
||||
$block_out[] = $line;
|
||||
}
|
||||
$text = implode("\n",$block_out);
|
||||
|
||||
#clean up <notextile>
|
||||
$text = preg_replace('/<\/?notextile>/', "",$text);
|
||||
|
||||
# turn the temp char back to an ampersand entity
|
||||
$text = str_replace("x%x%","&",$text);
|
||||
|
||||
# Newline linebreaks, just for markup tidiness
|
||||
$text = str_replace("<br />","<br />\n",$text);
|
||||
|
||||
return $text;
|
||||
|
||||
}
|
||||
|
||||
|
||||
function callback_url($text,$title='',$url) {
|
||||
|
||||
$out = 'a href="'.$url.'"';
|
||||
$out.=($title!='')?' title="'.$title.'"':'';
|
||||
$out.='>$text</a>';
|
||||
return $out;
|
||||
}
|
||||
|
||||
|
||||
|
||||
function textile_popup_help($name,$helpvar,$windowW,$windowH) {
|
||||
|
||||
$out = $name;
|
||||
$out .= ' <a target="_blank" href="http://www.textpattern.com/help/?item='.$helpvar.'"';
|
||||
$out .= ' onclick="window.open(this.href, \'popupwindow\', \'width='.$windowW.',height='.$windowH.',scrollbars,resizable\'); return false;" style="color:blue;background-color:#ddd">?</a><br />';
|
||||
|
||||
print $out;
|
||||
}
|
||||
|
||||
|
||||
function encode_high($text) {
|
||||
$cmap = cmap();
|
||||
return mb_encode_numericentity($text, $cmap, "UTF-8");
|
||||
}
|
||||
|
||||
|
||||
function decode_high($text) {
|
||||
$cmap = cmap();
|
||||
return mb_decode_numericentity($text, $cmap, "UTF-8");
|
||||
}
|
||||
|
||||
|
||||
function cmap() {
|
||||
|
||||
$f = 0xffff;
|
||||
|
||||
$cmap = array(
|
||||
160, 255, 0, $f,
|
||||
402, 402, 0, $f,
|
||||
913, 929, 0, $f,
|
||||
931, 937, 0, $f,
|
||||
945, 969, 0, $f,
|
||||
977, 978, 0, $f,
|
||||
982, 982, 0, $f,
|
||||
8226, 8226, 0, $f,
|
||||
8230, 8230, 0, $f,
|
||||
8242, 8243, 0, $f,
|
||||
8254, 8254, 0, $f,
|
||||
8260, 8260, 0, $f,
|
||||
8465, 8465, 0, $f,
|
||||
8472, 8472, 0, $f,
|
||||
8476, 8476, 0, $f,
|
||||
8482, 8482, 0, $f,
|
||||
8501, 8501, 0, $f,
|
||||
8592, 8596, 0, $f,
|
||||
8629, 8629, 0, $f,
|
||||
8656, 8660, 0, $f,
|
||||
8704, 8704, 0, $f,
|
||||
8706, 8707, 0, $f,
|
||||
8709, 8709, 0, $f,
|
||||
8711, 8713, 0, $f,
|
||||
8715, 8715, 0, $f,
|
||||
8719, 8719, 0, $f,
|
||||
8721, 8722, 0, $f,
|
||||
8727, 8727, 0, $f,
|
||||
8730, 8730, 0, $f,
|
||||
8733, 8734, 0, $f,
|
||||
8736, 8736, 0, $f,
|
||||
8743, 8747, 0, $f,
|
||||
8756, 8756, 0, $f,
|
||||
8764, 8764, 0, $f,
|
||||
8773, 8773, 0, $f,
|
||||
8776, 8776, 0, $f,
|
||||
8800, 8801, 0, $f,
|
||||
8804, 8805, 0, $f,
|
||||
8834, 8836, 0, $f,
|
||||
8838, 8839, 0, $f,
|
||||
8853, 8853, 0, $f,
|
||||
8855, 8855, 0, $f,
|
||||
8869, 8869, 0, $f,
|
||||
8901, 8901, 0, $f,
|
||||
8968, 8971, 0, $f,
|
||||
9001, 9002, 0, $f,
|
||||
9674, 9674, 0, $f,
|
||||
9824, 9824, 0, $f,
|
||||
9827, 9827, 0, $f,
|
||||
9829, 9830, 0, $f,
|
||||
338, 339, 0, $f,
|
||||
352, 353, 0, $f,
|
||||
376, 376, 0, $f,
|
||||
710, 710, 0, $f,
|
||||
732, 732, 0, $f,
|
||||
8194, 8195, 0, $f,
|
||||
8201, 8201, 0, $f,
|
||||
8204, 8207, 0, $f,
|
||||
8211, 8212, 0, $f,
|
||||
8216, 8218, 0, $f,
|
||||
8218, 8218, 0, $f,
|
||||
8220, 8222, 0, $f,
|
||||
8224, 8225, 0, $f,
|
||||
8240, 8240, 0, $f,
|
||||
8249, 8250, 0, $f,
|
||||
8364, 8364, 0, $f
|
||||
);
|
||||
|
||||
return $cmap;
|
||||
}
|
||||
|
||||
|
||||
function linkit($text,$title,$url){
|
||||
$url = preg_replace("/&(?!amp;)/","&",$url);
|
||||
$out = '<a href="'.$url;
|
||||
if ($title!='') {
|
||||
$title = trim($title);
|
||||
$out .= ' title="'.$title;
|
||||
}
|
||||
$out .= '>'.$text.'</a>';
|
||||
|
||||
return $out;
|
||||
}
|
||||
|
||||
|
||||
?>
|
||||
@ -269,8 +269,4 @@ foreach($wpsmiliestrans as $smiley => $img) {
|
||||
// Some default filters
|
||||
add_filter('all', 'wptexturize');
|
||||
|
||||
// Uncomment the following for Textile support
|
||||
// include_once('textile.php');
|
||||
// add_filter('the_content', 'textile');
|
||||
// There is some duplication of effort so textile.php really should be tweaked to eliminate that.
|
||||
?>
|
||||
Loading…
Reference in New Issue
Block a user