mirror of
https://github.com/typecho/plugins.git
synced 2024-12-21 20:40:08 +08:00
1600 lines
42 KiB
PHP
1600 lines
42 KiB
PHP
<?php
|
|
// vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4:
|
|
/**
|
|
* Parse structured wiki text and render into arbitrary formats such as XHTML.
|
|
*
|
|
* PHP versions 4 and 5
|
|
*
|
|
* @category Text
|
|
* @package Text_Wiki
|
|
* @author Paul M. Jones <pmjones@php.net>
|
|
* @license http://www.gnu.org/copyleft/lesser.html LGPL License 2.1
|
|
* @version CVS: $Id: Creole_Wiki.php 182 2008-09-14 15:56:00Z i.feelinglucky $
|
|
* @link http://pear.php.net/package/Text_Wiki
|
|
*/
|
|
|
|
/**
|
|
* The baseline abstract parser class.
|
|
*/
|
|
require_once 'Parse.inc.php';
|
|
|
|
/**
|
|
* The baseline abstract render class.
|
|
*/
|
|
require_once 'Render.inc.php';
|
|
|
|
/**
|
|
* Parse structured wiki text and render into arbitrary formats such as XHTML.
|
|
*
|
|
* This is the "master" class for handling the management and convenience
|
|
* functions to transform Wiki-formatted text.
|
|
*
|
|
* @category Text
|
|
* @package Text_Wiki
|
|
* @author Paul M. Jones <pmjones@php.net>
|
|
* @license http://www.gnu.org/copyleft/lesser.html LGPL License 2.1
|
|
* @version Release: 1.2.0
|
|
* @link http://pear.php.net/package/Text_Wiki
|
|
*/
|
|
class Creole_Wiki {
|
|
// *single newlines* are handled as in most wikis (ignored)
|
|
// if Newline is removed from rules, they will be handled as in word-processors (meaning a paragraph break)
|
|
protected $rules = array(
|
|
'Prefilter',
|
|
'Delimiter',
|
|
'Preformatted',
|
|
'Tt',
|
|
//'Trim',
|
|
'Break',
|
|
'Raw',
|
|
'Box',
|
|
//'Footnote',
|
|
'Table',
|
|
'Newline',
|
|
'Blockquote',
|
|
'Newline',
|
|
//'Wikilink',
|
|
'Heading',
|
|
'Center',
|
|
'Horiz',
|
|
'List',
|
|
'Address',
|
|
'Paragraph',
|
|
'Superscript',
|
|
'Subscript',
|
|
'Underline',
|
|
'Strong',
|
|
'Tighten',
|
|
'Image',
|
|
'Url',
|
|
'Emphasis'
|
|
);
|
|
|
|
|
|
/**
|
|
*
|
|
* The list of rules to not-apply to the source text.
|
|
*
|
|
* @access public
|
|
*
|
|
* @var array
|
|
*
|
|
*/
|
|
public $disable = array(
|
|
'Html',
|
|
'Include',
|
|
'Embed'
|
|
);
|
|
|
|
|
|
/**
|
|
*
|
|
* Custom configuration for rules at the parsing stage.
|
|
*
|
|
* In this array, the key is the parsing rule name, and the value is
|
|
* an array of key-value configuration pairs corresponding to the $conf
|
|
* property in the target parsing rule.
|
|
*
|
|
* For example:
|
|
*
|
|
* <code>
|
|
* $parseConf = array(
|
|
* 'Include' => array(
|
|
* 'base' => '/path/to/scripts/'
|
|
* )
|
|
* );
|
|
* </code>
|
|
*
|
|
* Note that most default rules do not need any parsing configuration.
|
|
*
|
|
* @access public
|
|
*
|
|
* @var array
|
|
*
|
|
*/
|
|
public $parseConf = array();
|
|
|
|
|
|
/**
|
|
*
|
|
* Custom configuration for rules at the rendering stage.
|
|
*
|
|
* Because rendering may be different for each target format, the
|
|
* first-level element in this array is always a format name (e.g.,
|
|
* 'Xhtml').
|
|
*
|
|
* Within that first level element, the subsequent elements match the
|
|
* $parseConf format. That is, the sub-key is the rendering rule name,
|
|
* and the sub-value is an array of key-value configuration pairs
|
|
* corresponding to the $conf property in the target rendering rule.
|
|
*
|
|
* @access public
|
|
*
|
|
* @var array
|
|
*
|
|
*/
|
|
public $renderConf = array(
|
|
'Docbook' => array(),
|
|
'Latex' => array(),
|
|
'Pdf' => array(),
|
|
'Plain' => array(),
|
|
'Rtf' => array(),
|
|
'Xhtml' => array()
|
|
);
|
|
|
|
|
|
/**
|
|
*
|
|
* Custom configuration for the output format itself.
|
|
*
|
|
* Even though Text_Wiki will render the tokens from parsed text,
|
|
* the format itself may require some configuration. For example,
|
|
* RTF needs to know font names and sizes, PDF requires page layout
|
|
* information, and DocBook needs a section hierarchy. This array
|
|
* matches the $conf property of the the format-level renderer
|
|
* (e.g., Text_Wiki_Render_Xhtml).
|
|
*
|
|
* In this array, the key is the rendering format name, and the value is
|
|
* an array of key-value configuration pairs corresponding to the $conf
|
|
* property in the rendering format rule.
|
|
*
|
|
* @access public
|
|
*
|
|
* @var array
|
|
*
|
|
*/
|
|
public $formatConf = array(
|
|
'Docbook' => array(),
|
|
'Latex' => array(),
|
|
'Pdf' => array(),
|
|
'Plain' => array(),
|
|
'Rtf' => array(),
|
|
'Xhtml' => array()
|
|
);
|
|
|
|
|
|
/**
|
|
*
|
|
* The delimiter for token numbers of parsed elements in source text.
|
|
*
|
|
* @access public
|
|
*
|
|
* @var string
|
|
*
|
|
*/
|
|
public $delim = "\xFF";
|
|
|
|
|
|
/**
|
|
*
|
|
* The tokens generated by rules as the source text is parsed.
|
|
*
|
|
* As Text_Wiki applies rule classes to the source text, it will
|
|
* replace portions of the text with a delimited token number. This
|
|
* is the array of those tokens, representing the replaced text and
|
|
* any options set by the parser for that replaced text.
|
|
*
|
|
* The tokens array is sequential; each element is itself a sequential
|
|
* array where element 0 is the name of the rule that generated the
|
|
* token, and element 1 is an associative array where the key is an
|
|
* option name and the value is an option value.
|
|
*
|
|
* @access private
|
|
*
|
|
* @var array
|
|
*
|
|
*/
|
|
public $tokens = array();
|
|
|
|
/**
|
|
* How many tokens generated pro rules.
|
|
*
|
|
* Intended to load only necessary render objects
|
|
*
|
|
* @access private
|
|
* @var array
|
|
*/
|
|
private $_countRulesTokens = array();
|
|
|
|
|
|
/**
|
|
*
|
|
* The source text to which rules will be applied.
|
|
*
|
|
* This text will be transformed in-place, which means that it will
|
|
* change as the rules are applied.
|
|
*
|
|
* @access public
|
|
*
|
|
* @var string
|
|
*
|
|
*/
|
|
public $source = '';
|
|
|
|
/**
|
|
* The output text
|
|
*
|
|
* @var string
|
|
*/
|
|
protected $output = '';
|
|
|
|
|
|
/**
|
|
*
|
|
* Array of rule parsers.
|
|
*
|
|
* Text_Wiki creates one instance of every rule that is applied to
|
|
* the source text; this array holds those instances. The array key
|
|
* is the rule name, and the array value is an instance of the rule
|
|
* class.
|
|
*
|
|
* @access private
|
|
*
|
|
* @var array
|
|
*
|
|
*/
|
|
|
|
protected $parseObj = array();
|
|
|
|
|
|
/**
|
|
*
|
|
* Array of rule renderers.
|
|
*
|
|
* Text_Wiki creates one instance of every rule that is applied to
|
|
* the source text; this array holds those instances. The array key
|
|
* is the rule name, and the array value is an instance of the rule
|
|
* class.
|
|
*
|
|
* @access private
|
|
*
|
|
* @var array
|
|
*
|
|
*/
|
|
protected $renderObj = array();
|
|
|
|
|
|
/**
|
|
*
|
|
* Array of format renderers.
|
|
*
|
|
* @access private
|
|
*
|
|
* @var array
|
|
*
|
|
*/
|
|
protected $formatObj = array();
|
|
|
|
|
|
/**
|
|
*
|
|
* Array of paths to search, in order, for parsing and rendering rules.
|
|
*
|
|
* @access private
|
|
*
|
|
* @var array
|
|
*
|
|
*/
|
|
protected $path = array(
|
|
'parse' => array(),
|
|
'render' => array()
|
|
);
|
|
|
|
|
|
|
|
/**
|
|
*
|
|
* The directory separator character.
|
|
*
|
|
* @access private
|
|
*
|
|
* @var string
|
|
*
|
|
*/
|
|
private $_dirSep = DIRECTORY_SEPARATOR;
|
|
|
|
/**
|
|
* Temporary configuration variable
|
|
*
|
|
* @var string
|
|
*/
|
|
protected $renderingType = 'preg';
|
|
|
|
/**
|
|
* Stack of rendering callbacks
|
|
*
|
|
* @var Array
|
|
*/
|
|
private $_renderCallbacks = array();
|
|
|
|
/**
|
|
* Current output block
|
|
*
|
|
* @var string
|
|
*/
|
|
private $_block;
|
|
|
|
/**
|
|
* A stack of blocks
|
|
*
|
|
* @param Array
|
|
*/
|
|
private $_blocks;
|
|
|
|
/**
|
|
*
|
|
* Constructor.
|
|
*
|
|
* **DEPRECATED**
|
|
* Please use the singleton() or factory() methods.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param array $rules The set of rules to load for this object. Defaults
|
|
* to null, which will load the default ruleset for this parser.
|
|
*/
|
|
|
|
function __construct($rules = null)
|
|
{
|
|
if (is_array($rules)) {
|
|
$this->rules = array();
|
|
foreach ($rules as $rule) {
|
|
$this->rules[] = ucfirst($rule);
|
|
}
|
|
}
|
|
|
|
/*
|
|
$this->addPath(
|
|
'parse',
|
|
$this->fixPath(dirname(__FILE__)) . 'Wiki/Parse/Default/'
|
|
);
|
|
*/
|
|
|
|
$this->addPath(
|
|
'parse', $this->fixPath(dirname(__FILE__) . '/Parse/')
|
|
);
|
|
|
|
$this->addPath(
|
|
'render',
|
|
$this->fixPath(dirname(__FILE__) . '/Render/' )
|
|
);
|
|
|
|
$this->renderingType = 'char';
|
|
$this->setRenderConf('xhtml', 'center', 'css', 'center');
|
|
$this->setRenderConf('xhtml', 'url', 'target', null);
|
|
}
|
|
|
|
|
|
/**
|
|
* Singleton.
|
|
*
|
|
* This avoids instantiating multiple Text_Wiki instances where a number
|
|
* of objects are required in one call, e.g. to save memory in a
|
|
* CMS invironment where several parsers are required in a single page.
|
|
*
|
|
* $single = & singleton();
|
|
*
|
|
* or
|
|
*
|
|
* $single = & singleton('Parser', array('Prefilter', 'Delimiter', 'Code', 'Function',
|
|
* 'Html', 'Raw', 'Include', 'Embed', 'Anchor', 'Heading', 'Toc', 'Horiz',
|
|
* 'Break', 'Blockquote', 'List', 'Deflist', 'Table', 'Image', 'Phplookup',
|
|
* 'Center', 'Newline', 'Paragraph', 'Url', 'Freelink', 'Interwiki', 'Wikilink',
|
|
* 'Colortext', 'Strong', 'Bold', 'Emphasis', 'Italic', 'Underline', 'Tt',
|
|
* 'Superscript', 'Subscript', 'Revise', 'Tighten'));
|
|
*
|
|
* Call using a subset of this list. The order of passing rulesets in the
|
|
* $rules array is important!
|
|
*
|
|
* After calling this, call $single->setParseConf(), setRenderConf() or setFormatConf()
|
|
* as usual for a constructed object of this class.
|
|
*
|
|
* The internal static array of singleton objects has no index on the parser
|
|
* rules, the only index is on the parser name. So if you call this multiple
|
|
* times with different rules but the same parser name, you will get the same
|
|
* static parser object each time.
|
|
*
|
|
* @access public
|
|
* @static
|
|
* @since Method available since Release 1.1.0
|
|
* @param string $parser The parser to be used (defaults to 'Default').
|
|
* @param array $rules The set of rules to instantiate the object. This
|
|
* will only be used when the first call to singleton is made, if included
|
|
* in further calls it will be effectively ignored.
|
|
* @return &object a reference to the Text_Wiki unique instantiation.
|
|
*/
|
|
/*
|
|
public function &singleton($parser = 'Default', $rules = null)
|
|
{
|
|
static $only = array();
|
|
if (!isset($only[$parser])) {
|
|
$ret = & Text_Wiki::factory($parser, $rules);
|
|
if (Text_Wiki::isError($ret)) {
|
|
return $ret;
|
|
}
|
|
$only[$parser] =& $ret;
|
|
}
|
|
return $only[$parser];
|
|
}
|
|
*/
|
|
|
|
/**
|
|
* Returns a Text_Wiki Parser class for the specified parser.
|
|
*
|
|
* @access public
|
|
* @static
|
|
* @param string $parser The name of the parse to instantiate
|
|
* you need to have Text_Wiki_XXX installed to use $parser = 'XXX', it's E_FATAL
|
|
* @param array $rules The rules to pass into the constructor
|
|
* {@see Text_Wiki::singleton} for a list of rules
|
|
* @return Text_Wiki a Parser object extended from Text_Wiki
|
|
*/
|
|
/*
|
|
public function &factory($parser = 'Default', $rules = null)
|
|
{
|
|
$class = 'Text_Wiki_' . ucfirst(strtolower($parser));
|
|
$file = str_replace('_', '/', $class).'.php';
|
|
if (!class_exists($class)) {
|
|
require_once $file;
|
|
if (!class_exists($class)) {
|
|
return Text_Wiki::error(
|
|
'Class ' . $class . ' does not exist after requiring '. $file .
|
|
', install package ' . $class . "\n");
|
|
}
|
|
}
|
|
|
|
$obj =& new $class($rules);
|
|
return $obj;
|
|
}
|
|
*/
|
|
|
|
/**
|
|
*
|
|
* Set parser configuration for a specific rule and key.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $rule The parse rule to set config for.
|
|
*
|
|
* @param array|string $arg1 The full config array to use for the
|
|
* parse rule, or a conf key in that array.
|
|
*
|
|
* @param string $arg2 The config value for the key.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
public function setParseConf($rule, $arg1, $arg2 = null)
|
|
{
|
|
$rule = ucwords(strtolower($rule));
|
|
|
|
if (! isset($this->parseConf[$rule])) {
|
|
$this->parseConf[$rule] = array();
|
|
}
|
|
|
|
// if first arg is an array, use it as the entire
|
|
// conf array for the rule. otherwise, treat arg1
|
|
// as a key and arg2 as a value for the rule conf.
|
|
if (is_array($arg1)) {
|
|
$this->parseConf[$rule] = $arg1;
|
|
} else {
|
|
$this->parseConf[$rule][$arg1] = $arg2;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Get parser configuration for a specific rule and key.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $rule The parse rule to get config for.
|
|
*
|
|
* @param string $key A key in the conf array; if null,
|
|
* returns the entire conf array.
|
|
*
|
|
* @return mixed The whole conf array if no key is specified,
|
|
* or the specific conf key value.
|
|
*
|
|
*/
|
|
public function getParseConf($rule, $key = null)
|
|
{
|
|
$rule = ucwords(strtolower($rule));
|
|
|
|
// the rule does not exist
|
|
if (! isset($this->parseConf[$rule])) {
|
|
return null;
|
|
}
|
|
|
|
// no key requested, return the whole array
|
|
if (is_null($key)) {
|
|
return $this->parseConf[$rule];
|
|
}
|
|
|
|
// does the requested key exist?
|
|
if (isset($this->parseConf[$rule][$key])) {
|
|
// yes, return that value
|
|
return $this->parseConf[$rule][$key];
|
|
} else {
|
|
// no
|
|
return null;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Set renderer configuration for a specific format, rule, and key.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $format The render format to set config for.
|
|
*
|
|
* @param string $rule The render rule to set config for in the format.
|
|
*
|
|
* @param array|string $arg1 The config array, or the config key
|
|
* within the render rule.
|
|
*
|
|
* @param string $arg2 The config value for the key.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function setRenderConf($format, $rule, $arg1, $arg2 = null)
|
|
{
|
|
$format = ucwords(strtolower($format));
|
|
$rule = ucwords(strtolower($rule));
|
|
|
|
if (! isset($this->renderConf[$format])) {
|
|
$this->renderConf[$format] = array();
|
|
}
|
|
|
|
if (! isset($this->renderConf[$format][$rule])) {
|
|
$this->renderConf[$format][$rule] = array();
|
|
}
|
|
|
|
// if first arg is an array, use it as the entire
|
|
// conf array for the render rule. otherwise, treat arg1
|
|
// as a key and arg2 as a value for the render rule conf.
|
|
if (is_array($arg1)) {
|
|
$this->renderConf[$format][$rule] = $arg1;
|
|
} else {
|
|
$this->renderConf[$format][$rule][$arg1] = $arg2;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Get renderer configuration for a specific format, rule, and key.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $format The render format to get config for.
|
|
*
|
|
* @param string $rule The render format rule to get config for.
|
|
*
|
|
* @param string $key A key in the conf array; if null,
|
|
* returns the entire conf array.
|
|
*
|
|
* @return mixed The whole conf array if no key is specified,
|
|
* or the specific conf key value.
|
|
*
|
|
*/
|
|
|
|
function getRenderConf($format, $rule, $key = null)
|
|
{
|
|
$format = ucwords(strtolower($format));
|
|
$rule = ucwords(strtolower($rule));
|
|
|
|
if (! isset($this->renderConf[$format]) ||
|
|
! isset($this->renderConf[$format][$rule])) {
|
|
return null;
|
|
}
|
|
|
|
// no key requested, return the whole array
|
|
if (is_null($key)) {
|
|
return $this->renderConf[$format][$rule];
|
|
}
|
|
|
|
// does the requested key exist?
|
|
if (isset($this->renderConf[$format][$rule][$key])) {
|
|
// yes, return that value
|
|
return $this->renderConf[$format][$rule][$key];
|
|
} else {
|
|
// no
|
|
return null;
|
|
}
|
|
|
|
}
|
|
|
|
/**
|
|
*
|
|
* Set format configuration for a specific rule and key.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $format The format to set config for.
|
|
*
|
|
* @param string $key The config key within the format.
|
|
*
|
|
* @param string $val The config value for the key.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function setFormatConf($format, $arg1, $arg2 = null)
|
|
{
|
|
if (! is_array($this->formatConf[$format])) {
|
|
$this->formatConf[$format] = array();
|
|
}
|
|
|
|
// if first arg is an array, use it as the entire
|
|
// conf array for the format. otherwise, treat arg1
|
|
// as a key and arg2 as a value for the format conf.
|
|
if (is_array($arg1)) {
|
|
$this->formatConf[$format] = $arg1;
|
|
} else {
|
|
$this->formatConf[$format][$arg1] = $arg2;
|
|
}
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
*
|
|
* Get configuration for a specific format and key.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $format The format to get config for.
|
|
*
|
|
* @param mixed $key A key in the conf array; if null,
|
|
* returns the entire conf array.
|
|
*
|
|
* @return mixed The whole conf array if no key is specified,
|
|
* or the specific conf key value.
|
|
*
|
|
*/
|
|
|
|
function getFormatConf($format, $key = null)
|
|
{
|
|
// the format does not exist
|
|
if (! isset($this->formatConf[$format])) {
|
|
return null;
|
|
}
|
|
|
|
// no key requested, return the whole array
|
|
if (is_null($key)) {
|
|
return $this->formatConf[$format];
|
|
}
|
|
|
|
// does the requested key exist?
|
|
if (isset($this->formatConf[$format][$key])) {
|
|
// yes, return that value
|
|
return $this->formatConf[$format][$key];
|
|
} else {
|
|
// no
|
|
return null;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Inserts a rule into to the rule set.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $name The name of the rule. Should be different from
|
|
* all other keys in the rule set.
|
|
*
|
|
* @param string $tgt The rule after which to insert this new rule. By
|
|
* default (null) the rule is inserted at the end; if set to '', inserts
|
|
* at the beginning.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function insertRule($name, $tgt = null)
|
|
{
|
|
$name = ucwords(strtolower($name));
|
|
if (! is_null($tgt)) {
|
|
$tgt = ucwords(strtolower($tgt));
|
|
}
|
|
|
|
// does the rule name to be inserted already exist?
|
|
if (in_array($name, $this->rules)) {
|
|
// yes, return
|
|
return null;
|
|
}
|
|
|
|
// the target name is not null, and not '', but does not exist
|
|
// in the list of rules. this means we're trying to insert after
|
|
// a target key, but the target key isn't there.
|
|
if (! is_null($tgt) && $tgt != '' &&
|
|
! in_array($tgt, $this->rules)) {
|
|
return false;
|
|
}
|
|
|
|
// if $tgt is null, insert at the end. We know this is at the
|
|
// end (instead of resetting an existing rule) becuase we exited
|
|
// at the top of this method if the rule was already in place.
|
|
if (is_null($tgt)) {
|
|
$this->rules[] = $name;
|
|
return true;
|
|
}
|
|
|
|
// save a copy of the current rules, then reset the rule set
|
|
// so we can insert in the proper place later.
|
|
// where to insert the rule?
|
|
if ($tgt == '') {
|
|
// insert at the beginning
|
|
array_unshift($this->rules, $name);
|
|
return true;
|
|
}
|
|
|
|
// insert after the named rule
|
|
$tmp = $this->rules;
|
|
$this->rules = array();
|
|
|
|
foreach ($tmp as $val) {
|
|
$this->rules[] = $val;
|
|
if ($val == $tgt) {
|
|
$this->rules[] = $name;
|
|
}
|
|
}
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Delete (remove or unset) a rule from the $rules property.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $rule The name of the rule to remove.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function deleteRule($name)
|
|
{
|
|
$name = ucwords(strtolower($name));
|
|
$key = array_search($name, $this->rules);
|
|
if ($key !== false) {
|
|
unset($this->rules[$key]);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Change from one rule to another in-place.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $old The name of the rule to change from.
|
|
*
|
|
* @param string $new The name of the rule to change to.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function changeRule($old, $new)
|
|
{
|
|
$old = ucwords(strtolower($old));
|
|
$new = ucwords(strtolower($new));
|
|
$key = array_search($old, $this->rules);
|
|
if ($key !== false) {
|
|
// delete the new name , case it was already there
|
|
$this->deleteRule($new);
|
|
$this->rules[$key] = $new;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Enables a rule so that it is applied when parsing.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $rule The name of the rule to enable.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function enableRule($name)
|
|
{
|
|
$name = ucwords(strtolower($name));
|
|
$key = array_search($name, $this->disable);
|
|
if ($key !== false) {
|
|
unset($this->disable[$key]);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Disables a rule so that it is not applied when parsing.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $rule The name of the rule to disable.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function disableRule($name)
|
|
{
|
|
$name = ucwords(strtolower($name));
|
|
$key = array_search($name, $this->disable);
|
|
if ($key === false) {
|
|
$this->disable[] = $name;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Parses and renders the text passed to it, and returns the results.
|
|
*
|
|
* First, the method parses the source text, applying rules to the
|
|
* text as it goes. These rules will modify the source text
|
|
* in-place, replacing some text with delimited tokens (and
|
|
* populating the $this->tokens array as it goes).
|
|
*
|
|
* Next, the method renders the in-place tokens into the requested
|
|
* output format.
|
|
*
|
|
* Finally, the method returns the transformed text. Note that the
|
|
* source text is transformed in place; once it is transformed, it is
|
|
* no longer the same as the original source text.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $text The source text to which wiki rules should be
|
|
* applied, both for parsing and for rendering.
|
|
*
|
|
* @param string $format The target output format, typically 'xhtml'.
|
|
* If a rule does not support a given format, the output from that
|
|
* rule is rule-specific.
|
|
*
|
|
* @return string The transformed wiki text.
|
|
*
|
|
*/
|
|
function transform($text, $format = 'Xhtml')
|
|
{
|
|
$this->parse($text);
|
|
return $this->render($format);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Sets the $_source text property, then parses it in place and
|
|
* retains tokens in the $_tokens array property.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $text The source text to which wiki rules should be
|
|
* applied, both for parsing and for rendering.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function parse($text)
|
|
{
|
|
// set the object property for the source text
|
|
$this->source = $text;
|
|
|
|
// reset the tokens.
|
|
$this->tokens = array();
|
|
$this->_countRulesTokens = array();
|
|
|
|
// apply the parse() method of each requested rule to the source
|
|
// text.
|
|
foreach ($this->rules as $name) {
|
|
// do not parse the rules listed in $disable
|
|
if (! in_array($name, $this->disable)) {
|
|
|
|
// load the parsing object
|
|
$this->loadParseObj($name);
|
|
|
|
// load may have failed; only parse if
|
|
// an object is in the array now
|
|
if (is_object($this->parseObj[$name])) {
|
|
$this->parseObj[$name]->parse();
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Renders tokens back into the source text, based on the requested format.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $format The target output format, typically 'xhtml'.
|
|
* If a rule does not support a given format, the output from that
|
|
* rule is rule-specific.
|
|
*
|
|
* @return string The transformed wiki text.
|
|
*
|
|
*/
|
|
|
|
function render($format = 'Xhtml')
|
|
{
|
|
// the rendering method we're going to use from each rule
|
|
$format = ucwords(strtolower($format));
|
|
|
|
// the eventual output text
|
|
$this->output = '';
|
|
|
|
// when passing through the parsed source text, keep track of when
|
|
// we are in a delimited section
|
|
$in_delim = false;
|
|
|
|
// when in a delimited section, capture the token key number
|
|
$key = '';
|
|
|
|
// load the format object, or crap out if we can't find it
|
|
$result = $this->loadFormatObj($format);
|
|
if ($this->isError($result)) {
|
|
return $result;
|
|
}
|
|
|
|
/*
|
|
* hunked by feelinglucky..
|
|
// pre-rendering activity
|
|
if (is_object($this->formatObj[$format])) {
|
|
$this->output .= $this->formatObj[$format]->pre();
|
|
}
|
|
*/
|
|
// load the render objects
|
|
foreach (array_keys($this->_countRulesTokens) as $rule) {
|
|
$this->loadRenderObj($format, $rule);
|
|
}
|
|
|
|
|
|
if ($this->renderingType == 'preg') {
|
|
$this->output = preg_replace_callback('/'.$this->delim.'(\d+)'.$this->delim.'/',
|
|
array(&$this, '_renderToken'),
|
|
$this->source);
|
|
|
|
/*
|
|
//Damn strtok()! Why does it "skip" empty parts of the string. It's useless now!
|
|
} elseif ($this->renderingType == 'strtok') {
|
|
echo '<pre>'.htmlentities($this->source).'</pre>';
|
|
$t = strtok($this->source, $this->delim);
|
|
$inToken = true;
|
|
$i = 0;
|
|
while ($t !== false) {
|
|
echo 'Token: '.$i.'<pre>"'.htmlentities($t).'"</pre><br/><br/>';
|
|
if ($inToken) {
|
|
//$this->output .= $this->renderObj[$this->tokens[$t][0]]->token($this->tokens[$t][1]);
|
|
} else {
|
|
$this->output .= $t;
|
|
}
|
|
$inToken = !$inToken;
|
|
$t = strtok($this->delim);
|
|
++$i;
|
|
}
|
|
*/
|
|
} else {
|
|
// pass through the parsed source text character by character
|
|
$this->_block = '';
|
|
$tokenStack = array();
|
|
$k = strlen($this->source);
|
|
|
|
for ($i = 0; $i < $k; $i++) {
|
|
|
|
// the current character
|
|
$char = $this->source{$i};
|
|
|
|
// are alredy in a delimited section?
|
|
if ($in_delim) {
|
|
|
|
// yes; are we ending the section?
|
|
if ($char == $this->delim) {
|
|
|
|
if (count($this->_renderCallbacks) == 0) {
|
|
$this->output .= $this->_block;
|
|
$this->_block = '';
|
|
}
|
|
|
|
if (isset($opts['type'])) {
|
|
if ($opts['type'] == 'start') {
|
|
array_push($tokenStack, $rule);
|
|
} elseif ($opts['type'] == 'end') {
|
|
if ($tokenStack[count($tokenStack) - 1] != $rule) {
|
|
return Text_Wiki::error('Unbalanced tokens, check your syntax');
|
|
} else {
|
|
array_pop($tokenStack);
|
|
}
|
|
}
|
|
}
|
|
|
|
// yes, get the replacement text for the delimited
|
|
// token number and unset the flag.
|
|
$key = (int)$key;
|
|
$rule = $this->tokens[$key][0];
|
|
$opts = $this->tokens[$key][1];
|
|
$this->_block .= $this->renderObj[$rule]->token($opts);
|
|
$in_delim = false;
|
|
|
|
} else {
|
|
|
|
// no, add to the delimited token key number
|
|
$key .= $char;
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
// not currently in a delimited section.
|
|
// are we starting into a delimited section?
|
|
if ($char == $this->delim) {
|
|
// yes, reset the previous key and
|
|
// set the flag.
|
|
$key = '';
|
|
$in_delim = true;
|
|
|
|
} else {
|
|
// no, add to the output as-is
|
|
$this->_block .= $char;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if (count($this->_renderCallbacks)) {
|
|
return $this->error('Render callbacks left over after processing finished');
|
|
}
|
|
/*
|
|
while (count($this->_renderCallbacks)) {
|
|
$this->popRenderCallback();
|
|
}
|
|
*/
|
|
if (strlen($this->_block)) {
|
|
$this->output .= $this->_block;
|
|
$this->_block = '';
|
|
}
|
|
|
|
/* tunk by feelinglucky
|
|
// post-rendering activity
|
|
if (is_object($this->formatObj[$format])) {
|
|
$this->output .= $this->formatObj[$format]->post();
|
|
}
|
|
*/
|
|
|
|
// return the rendered source text.
|
|
return $this->output;
|
|
}
|
|
|
|
/**
|
|
* Renders a token, for use only as an internal callback
|
|
*
|
|
* @param array Matches from preg_rpelace_callback, [1] is the token number
|
|
* @return string The rendered text for the token
|
|
* @access private
|
|
*/
|
|
function _renderToken($matches) {
|
|
return $this->renderObj[$this->tokens[$matches[1]][0]]->token($this->tokens[$matches[1]][1]);
|
|
}
|
|
|
|
function registerRenderCallback($callback) {
|
|
$this->_blocks[] = $this->_block;
|
|
$this->_block = '';
|
|
$this->_renderCallbacks[] = $callback;
|
|
}
|
|
|
|
function popRenderCallback() {
|
|
if (count($this->_renderCallbacks) == 0) {
|
|
return Text_Wiki::error('Render callback popped when no render callbacks in stack');
|
|
} else {
|
|
$callback = array_pop($this->_renderCallbacks);
|
|
$this->_block = call_user_func($callback, $this->_block);
|
|
if (count($this->_blocks)) {
|
|
$parentBlock = array_pop($this->_blocks);
|
|
$this->_block = $parentBlock.$this->_block;
|
|
}
|
|
if (count($this->_renderCallbacks) == 0) {
|
|
$this->output .= $this->_block;
|
|
$this->_block = '';
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
*
|
|
* Returns the parsed source text with delimited token placeholders.
|
|
*
|
|
* @access public
|
|
*
|
|
* @return string The parsed source text.
|
|
*
|
|
*/
|
|
|
|
function getSource()
|
|
{
|
|
return $this->source;
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Returns tokens that have been parsed out of the source text.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param array $rules If an array of rule names is passed, only return
|
|
* tokens matching these rule names. If no array is passed, return all
|
|
* tokens.
|
|
*
|
|
* @return array An array of tokens.
|
|
*
|
|
*/
|
|
|
|
function getTokens($rules = null)
|
|
{
|
|
if (is_null($rules)) {
|
|
return $this->tokens;
|
|
} else {
|
|
settype($rules, 'array');
|
|
$result = array();
|
|
foreach ($this->tokens as $key => $val) {
|
|
if (in_array($val[0], $rules)) {
|
|
$result[$key] = $val;
|
|
}
|
|
}
|
|
return $result;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Add a token to the Text_Wiki tokens array, and return a delimited
|
|
* token number.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param array $options An associative array of options for the new
|
|
* token array element. The keys and values are specific to the
|
|
* rule, and may or may not be common to other rule options. Typical
|
|
* options keys are 'text' and 'type' but may include others.
|
|
*
|
|
* @param boolean $id_only If true, return only the token number, not
|
|
* a delimited token string.
|
|
*
|
|
* @return string|int By default, return the number of the
|
|
* newly-created token array element with a delimiter prefix and
|
|
* suffix; however, if $id_only is set to true, return only the token
|
|
* number (no delimiters).
|
|
*
|
|
*/
|
|
|
|
function addToken($rule, $options = array(), $id_only = false)
|
|
{
|
|
// increment the token ID number. note that if you parse
|
|
// multiple times with the same Text_Wiki object, the ID number
|
|
// will not reset to zero.
|
|
static $id;
|
|
if (! isset($id)) {
|
|
$id = 0;
|
|
} else {
|
|
$id ++;
|
|
}
|
|
|
|
// force the options to be an array
|
|
settype($options, 'array');
|
|
|
|
// add the token
|
|
$this->tokens[$id] = array(
|
|
0 => $rule,
|
|
1 => $options
|
|
);
|
|
if (!isset($this->_countRulesTokens[$rule])) {
|
|
$this->_countRulesTokens[$rule] = 1;
|
|
} else {
|
|
++$this->_countRulesTokens[$rule];
|
|
}
|
|
|
|
// return a value
|
|
if ($id_only) {
|
|
// return the last token number
|
|
return $id;
|
|
} else {
|
|
// return the token number with delimiters
|
|
return $this->delim . $id . $this->delim;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Set or re-set a token with specific information, overwriting any
|
|
* previous rule name and rule options.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param int $id The token number to reset.
|
|
*
|
|
* @param int $rule The rule name to use.
|
|
*
|
|
* @param array $options An associative array of options for the
|
|
* token array element. The keys and values are specific to the
|
|
* rule, and may or may not be common to other rule options. Typical
|
|
* options keys are 'text' and 'type' but may include others.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function setToken($id, $rule, $options = array())
|
|
{
|
|
$oldRule = $this->tokens[$id][0];
|
|
// reset the token
|
|
$this->tokens[$id] = array(
|
|
0 => $rule,
|
|
1 => $options
|
|
);
|
|
if ($rule != $oldRule) {
|
|
if (!($this->_countRulesTokens[$oldRule]--)) {
|
|
unset($this->_countRulesTokens[$oldRule]);
|
|
}
|
|
if (!isset($this->_countRulesTokens[$rule])) {
|
|
$this->_countRulesTokens[$rule] = 1;
|
|
} else {
|
|
++$this->_countRulesTokens[$rule];
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Load a rule parser class file.
|
|
*
|
|
* @access public
|
|
*
|
|
* @return bool True if loaded, false if not.
|
|
*
|
|
*/
|
|
|
|
function loadParseObj($rule)
|
|
{
|
|
$rule = ucwords(strtolower($rule));
|
|
$file = $rule . '.php';
|
|
$class = "Text_Wiki_Parse_$rule";
|
|
|
|
if (!Typecho_Common::isAvailableClass($class)) {
|
|
$loc = $this->findFile('parse', $file);
|
|
|
|
if ($loc) {
|
|
// found the class
|
|
include_once $loc;
|
|
} else {
|
|
// can't find the class
|
|
$this->parseObj[$rule] = null;
|
|
// can't find the class
|
|
return $this->error(
|
|
"Parse rule '$rule' not found"
|
|
);
|
|
}
|
|
}
|
|
|
|
$this->parseObj[$rule] = new $class($this);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Load a rule-render class file.
|
|
*
|
|
* @access public
|
|
*
|
|
* @return bool True if loaded, false if not.
|
|
*
|
|
*/
|
|
|
|
function loadRenderObj($format, $rule)
|
|
{
|
|
$format = ucwords(strtolower($format));
|
|
$rule = ucwords(strtolower($rule));
|
|
$file = "$format/$rule.php";
|
|
$class = "Text_Wiki_Render_$format" . "_$rule";
|
|
|
|
if (! Typecho_Common::isAvailableClass($class)) {
|
|
// load the class
|
|
$loc = $this->findFile('render', $file);
|
|
if ($loc) {
|
|
// found the class
|
|
include_once $loc;
|
|
} else {
|
|
// can't find the class
|
|
return $this->error(
|
|
"Render rule '$rule' in format '$format' not found"
|
|
);
|
|
}
|
|
}
|
|
|
|
$this->renderObj[$rule] = new $class($this);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Load a format-render class file.
|
|
*
|
|
* @access public
|
|
*
|
|
* @return bool True if loaded, false if not.
|
|
*
|
|
*/
|
|
|
|
function loadFormatObj($format)
|
|
{
|
|
$format = ucwords(strtolower($format));
|
|
$file = $format . '.php';
|
|
$class = "Text_Wiki_Render_$format";
|
|
|
|
if (! Typecho_Common::isAvailableClass($class)) {
|
|
$loc = $this->findFile('render', $file);
|
|
if ($loc) {
|
|
// found the class
|
|
include_once $loc;
|
|
} else {
|
|
// can't find the class
|
|
return $this->error(
|
|
"Rendering format class '$class' not found"
|
|
);
|
|
}
|
|
}
|
|
|
|
$this->formatObj[$format] = new $class($this);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Add a path to a path array.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $type The path-type to add (parse or render).
|
|
*
|
|
* @param string $dir The directory to add to the path-type.
|
|
*
|
|
* @return void
|
|
*
|
|
*/
|
|
|
|
function addPath($type, $dir)
|
|
{
|
|
$dir = $this->fixPath($dir);
|
|
if (! isset($this->path[$type])) {
|
|
$this->path[$type] = array($dir);
|
|
} else {
|
|
array_unshift($this->path[$type], $dir);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Get the current path array for a path-type.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $type The path-type to look up (plugin, filter, or
|
|
* template). If not set, returns all path types.
|
|
*
|
|
* @return array The array of paths for the requested type.
|
|
*
|
|
*/
|
|
|
|
function getPath($type = null)
|
|
{
|
|
if (is_null($type)) {
|
|
return $this->path;
|
|
} elseif (! isset($this->path[$type])) {
|
|
return array();
|
|
} else {
|
|
return $this->path[$type];
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Searches a series of paths for a given file.
|
|
*
|
|
* @param array $type The type of paths to search (template, plugin,
|
|
* or filter).
|
|
*
|
|
* @param string $file The file name to look for.
|
|
*
|
|
* @return string|bool The full path and file name for the target file,
|
|
* or boolean false if the file is not found in any of the paths.
|
|
*
|
|
*/
|
|
|
|
function findFile($type, $file)
|
|
{
|
|
// get the set of paths
|
|
$set = $this->getPath($type);
|
|
|
|
// start looping through them
|
|
foreach ($set as $path) {
|
|
$fullname = $path . $this->_dirSep . $file;
|
|
if (file_exists($fullname) && is_readable($fullname)) {
|
|
return realpath($fullname);
|
|
}
|
|
}
|
|
|
|
// could not find the file in the set of paths
|
|
return false;
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Append a trailing '/' to paths, unless the path is empty.
|
|
*
|
|
* @access private
|
|
*
|
|
* @param string $path The file path to fix
|
|
*
|
|
* @return string The fixed file path
|
|
*
|
|
*/
|
|
function fixPath($path)
|
|
{
|
|
if (realpath($path)){
|
|
return realpath($path); // . (is_dir($path) ? $this->_dirSep : '');
|
|
} else {
|
|
return '';
|
|
}
|
|
|
|
/*
|
|
$len = strlen($this->_dirSep);
|
|
if (! empty($path) &&
|
|
substr($path, -1 * $len, $len) != $this->_dirSep) {
|
|
return realpath($path) . $this->_dirSep;
|
|
} else {
|
|
return realpath($path);
|
|
}
|
|
*/
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Simple error-object generator.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param string $message The error message.
|
|
*
|
|
* @return object PEAR_Error
|
|
*
|
|
*/
|
|
|
|
function &error($message)
|
|
{
|
|
/*
|
|
if (! class_exists('PEAR_Error')) {
|
|
include_once 'PEAR.php';
|
|
}
|
|
*/
|
|
throw new Exception($message);
|
|
return false;
|
|
//return PEAR::throwError($message);
|
|
}
|
|
|
|
|
|
/**
|
|
*
|
|
* Simple error checker.
|
|
*
|
|
* @access public
|
|
*
|
|
* @param mixed $obj Check if this is a PEAR_Error object or not.
|
|
*
|
|
* @return bool True if a PEAR_Error, false if not.
|
|
*
|
|
*/
|
|
|
|
function isError(&$obj)
|
|
{
|
|
return is_a($obj, 'PEAR_Error');
|
|
}
|
|
|
|
|
|
/**
|
|
* Constructor: just adds the path to Creole rules
|
|
*
|
|
* @access public
|
|
* @param array $rules The set of rules to load for this object.
|
|
*/
|
|
function checkInnerTags(&$text) {
|
|
$started = array();
|
|
$i = false;
|
|
while (($i = strpos($text, $this->delim, $i)) !== false) {
|
|
$j = strpos($text, $this->delim, $i + 1);
|
|
$t = substr($text, $i + 1, $j - $i - 1);
|
|
$i = $j + 1;
|
|
$rule = strtolower($this->tokens[$t][0]);
|
|
$type = $this->tokens[$t][1]['type'];
|
|
|
|
if ($type == 'start') {
|
|
if (empty($started[$rule])) {
|
|
$started[$rule] = 0;
|
|
}
|
|
$started[$rule] += 1;
|
|
}
|
|
else if ($type == 'end') {
|
|
if (! $started[$rule]) return false;
|
|
|
|
$started[$rule] -= 1;
|
|
if (! $started[$rule]) unset($started[$rule]);
|
|
}
|
|
}
|
|
return ! (count($started) > 0);
|
|
}
|
|
|
|
function restoreRaw($text) {
|
|
$i = false;
|
|
while (($i = strpos($text, $this->delim, $i)) !== false) {
|
|
$j = strpos($text, $this->delim, $i + 1);
|
|
$t = substr($text, $i + 1, $j - $i - 1);
|
|
$rule = strtolower($this->tokens[$t][0]);
|
|
|
|
if ($rule == 'raw') {
|
|
$text = str_replace($this->delim. $t. $this->delim, $this->tokens[$t][1]['text'], $text);
|
|
} else {
|
|
$i = $j + 1;
|
|
}
|
|
}
|
|
return $text;
|
|
}
|
|
}
|
|
?>
|