$this->last = & $this->last->add(new Align(strtolower($matches[1])));
if ($matches[2] == '') continue;
$line = $matches[2];
}
$line = rtrim($line, "\r\n");
// Empty
if ($line == '') {
$this->last = & $this;
continue;
}
// Horizontal Rule
if (substr($line, 0, 4) == '----') {
$this->insert(new HRule($this, $line));
continue;
}
// Multiline-enabled block plugin
if (! PKWKEXP_DISABLE_MULTILINE_PLUGIN_HACK &&
preg_match('/^#[^{]+(\{\{+)\s*$/', $line, $matches)) {
$len = strlen($matches[1]);
$line .= "\r"; // Delimiter
while (! empty($lines)) {
$next_line = preg_replace("/[\r\n]*$/", '', array_shift($lines));
if (preg_match('/\}{' . $len . '}/', $next_line)) {
$line .= $next_line;
break;
} else {
$line .= $next_line .= "\r"; // Delimiter
}
}
}
// The first character
$head = $line{0};
// Heading
if ($head == '*') {
$this->insert(new Heading($this, $line));
continue;
}
// Pre
if ($head == ' ' || $head == "\t") {
$this->last = & $this->last->add(new Pre($this, $line));
continue;
}
// Line Break
if (substr($line, -1) == '~')
$line = substr($line, 0, -1) . "\r";
// Other Character
if (isset($this->classes[$head])) {
$classname = $this->classes[$head];
$this->last = & $this->last->add(new $classname($this, $line));
continue;
}
// Other Character
if (isset($this->factories[$head])) {
$factoryname = 'Factory_' . $this->factories[$head];
$this->last = & $this->last->add($factoryname($this, $line));
continue;
}
// Default
$this->last = & $this->last->add(Factory_Inline($line));
}
}
function getAnchor($text, $level)
{
global $top, $_symbol_anchor;
// Heading id (auto-generated)
$autoid = 'content_' . $this->id . '_' . $this->count;
$this->count++;
// Heading id (specified by users)
$id = make_heading($text, FALSE); // Cut fixed-anchor from $text
if ($id == '') {
// Not specified
$id = & $autoid;
$anchor = '';
} else {
$anchor = ' &aname(' . $id . ',super,full){' . $_symbol_anchor . '};';
}
$text = ' ' . $text;
// Add 'page contents' link to its heading
$this->contents_last = & $this->contents_last->add(new Contents_UList($text, $level, $id));
// Add heding
return array($text . $anchor, $this->count > 1 ? "\n" . $top : '', $autoid);
}
function & insert(& $obj)
{
if (is_a($obj, 'Inline')) $obj = & $obj->toPara();
return parent::insert($obj);
}
function toString()
{
global $vars;
$text = parent::toString();
// #contents
$text = preg_replace_callback('/<#_contents_>/',
array(& $this, 'replace_contents'), $text);
return $text . "\n";
}
function replace_contents($arr)
{
$contents = '
' . "\n" .
'
' . "\n" .
$this->contents->toString() . "\n" .
'
' . "\n";
return $contents;
}
}
class Contents_UList extends ListContainer
{
function Contents_UList($text, $level, $id)
{
// Reformatting $text
// A line started with "\n" means "preformatted" ... X(
make_heading($text);
$text = "\n" . '
' . $text . '' . "\n";
parent::ListContainer('ul', 'li', '-', str_repeat('-', $level));
$this->insert(Factory_Inline($text));
}
function setParent(& $parent)
{
global $_list_pad_str;
parent::setParent($parent);
$step = $this->level;
$margin = $this->left_margin;
if (isset($parent->parent) && is_a($parent->parent, 'ListContainer')) {
$step -= $parent->parent->level;
$margin = 0;
}
$margin += $this->margin * ($step == $this->level ? 1 : $step);
$this->style = sprintf($_list_pad_str, $this->level, $margin, $margin);
}
}