powered by nequal
Home » HatenaSyntax » Timeline » 1630

Changeset 1630 -- 2010-02-08 18:45:07

Comment
[Package Release] HatenaSyntax

Diffs

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Block.php

@@ -0,0 +1,109 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Block implements PEG_IParser
+{
+    protected
+        $lineTable,
+        $paragraphCheckTable,
+        $firstCharTable,
+        $paragraph;
+
+    function __construct(HatenaSyntax_Locator $locator)
+    {
+        /*
+         * 当該パーサへのディスパッチの試行は以下の順で行われる。
+         * ディスパッチが失敗した場合、次のディスパッチが試行される
+         *
+         * 1. lineTableからのディスパッチ
+         * 2. paragraphCheckTableからのディスパッチ
+         * 3. firstCharTableからのディスパッチ
+         * 4. パラグラフ
+         *
+         */
+
+        $this->lineTable = array(
+            '' => $locator->emptyParagraph,
+            '>>' => PEG::choice(
+                $locator->blockquote,
+                $locator->paragraph
+            ),
+            '>|' => PEG::choice(
+                $locator->pre,
+                $locator->paragraph
+            ),
+            '>||' => PEG::choice(
+                $locator->superpre,
+                $locator->paragraph
+            ),
+            '[:contents]' => $locator->tableOfContents,
+            '====' => $locator->separator
+        );
+
+        // 行の最初の一文字が存在し、かつこの配列のキー以外だった場合
+        // 必ずパラグラフが来る
+        $this->paragraphCheckTable = array(
+            ':' => true,
+            '>' => true,
+            '|' => true,
+            '+' => true,
+            '-' => true,
+            '*' => true
+        );
+
+        $this->firstCharTable = array(
+            '*' => $locator->header,
+            '+' => $locator->list,
+            '-' => $locator->list,
+            '|' => PEG::choice(
+                $locator->table,
+                $locator->paragraph
+            ),
+            ':' => PEG::choice(
+                $locator->definitionList,
+                $locator->paragraph
+            ),
+            '>' => PEG::choice(
+                $locator->superpre,
+                $locator->blockquote,
+                $locator->noParagraph,
+                $locator->paragraph
+            )
+        );
+
+        $this->paragraph = $locator->paragraph;
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        if ($context->eos()) {
+            return PEG::failure();
+        }
+
+        $line = $context->readElement();
+        $context->seek($context->tell() - 1);
+
+        // 行でディスパッチ
+        if (isset($this->lineTable[$line])) {
+            return $this->lineTable[$line]->parse($context);
+        }
+
+        $char = substr($line, 0, 1);
+
+        // 最初の文字でパラグラフかどうか判断
+        if (!isset($this->paragraphCheckTable[$char])) {
+            return $this->paragraph->parse($context);
+        }
+
+        if (isset($this->firstCharTable[$char])) {
+            return $this->firstCharTable[$char]->parse($context);
+        }
+
+        return $this->paragraph->parse($context);
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Block.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/NodeCreater.php

@@ -0,0 +1,38 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_NodeCreater implements PEG_IParser
+{
+    protected $type, $keys, $parser;
+    function __construct($type, PEG_IParser $parser, Array $keys = array())
+    {
+        $this->type = $type;
+        $this->keys = $keys;
+        $this->parser = $parser;
+    }
+    function parse(PEG_IContext $context)
+    {
+        $offset = $context->tell();
+        $result = $this->parser->parse($context);
+
+        if ($result instanceof PEG_Failure) {
+            return $result;
+        }
+
+        $data = array();
+        if (count($this->keys) > 0) foreach ($this->keys as $i => $key) {
+            $data[$key] = $result[$i];
+        }
+        else {
+            $data = $result;
+        }
+
+        return new HatenaSyntax_Node(
+            $this->type, $data, $offset, spl_object_hash($context));
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/NodeCreater.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Quote.php

@@ -0,0 +1,41 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Quote implements PEG_IParser
+{
+    protected $child, $parser;
+
+    function __construct(PEG_IParser $child)
+    {
+        $this->child = $child;
+
+        $this->parser = PEG::seq(
+            PEG::callbackAction(array($this, 'mapHeader'), PEG::anything()),
+            PEG::many(PEG::subtract($this->child, '<<')),
+            PEG::drop('<<')
+        );
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        return $this->parser->parse($context);
+    }
+
+    function mapHeader($line)
+    {
+        if (substr($line, 0, 1) !== '>') {
+            return PEG::failure();
+        }
+
+        if (!preg_match('#^>(|https?://[^>]+)>$#', $line, $matches)) {
+            return PEG::failure();
+        }
+
+        return $matches[1] === '' ? false : $matches[1];
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Quote.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree.php

@@ -0,0 +1,66 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Tree
+{
+    /**
+     * array('level' => ?, 'value' => ?)の配列を渡す
+     *
+     * @param array $arr
+     */
+    static function make(Array $arr)
+    {
+        return new HatenaSyntax_Tree_Root(self::makeNodeArray($arr));
+    }
+
+    static protected function makeNodeArray(Array $arr)
+    {
+        $i = 0;
+        $len = count($arr);
+        $tree_arr = array();
+        $min_level = self::fetchMinLevel($arr);
+        while ($i < $len) {
+            list($tree_arr[], $i) = self::makeNode($arr, $i, $min_level);
+        }
+        return $tree_arr;
+    }
+
+    static protected function makeNode(Array $arr, $i, $min_level)
+    {
+        $children = array();
+        $len = count($arr);
+        if ($min_level < $arr[$i]['level']) {
+            // Node
+            for (; $i < $len && $min_level < $arr[$i]['level']; $i++) {
+                $children[] = $arr[$i];
+            }
+            return array(new HatenaSyntax_Tree_Node(self::makeNodeArray($children)), $i);
+        }
+        else {
+            // NodeかLeaf
+            $value = $arr[$i]['value'];
+            $i++;
+            for (; $i < $len && $min_level < $arr[$i]['level']; $i++) {
+                $children[] = $arr[$i];
+            }
+            $node = $children ? new HatenaSyntax_Tree_Node(self::makeNodeArray($children), $value) :
+                                new HatenaSyntax_Tree_Leaf($value);
+            return array($node, $i);
+        }
+    }
+
+    static protected function fetchMinLevel(Array $arr)
+    {
+        foreach ($arr as $elt) {
+            if (!isset($level) || $level > $elt['level']) {
+                $level = $elt['level'];
+            }
+        }
+        return $level;
+    }
+}
\ ファイルの末尾に改行がありません
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/LineElement.php

@@ -0,0 +1,39 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_LineElement implements PEG_IParser
+{
+    protected $table;
+
+    function __construct(PEG_IParser $bracket, PEG_IParser $footnote, PEG_IParser $inlinetag)
+    {
+        $this->table = array(
+            '[' => PEG::choice($bracket, PEG::anything()),
+            '(' => PEG::choice($footnote, PEG::anything()),
+            '<' => PEG::choice($inlinetag, PEG::anything())
+        );
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        if ($context->eos()) {
+            return PEG::failure();
+        }
+
+        $char = $context->readElement();
+
+        if (isset($this->table[$char])) {
+            $offset = $context->tell() - 1;
+            $context->seek($offset);
+
+            return $this->table[$char]->parse($context);
+        }
+
+        return $char;
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/LineElement.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/NoParagraph.php

@@ -0,0 +1,63 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id: Paragraph.php 1574 2010-01-25 08:28:15Z anatoo $
+ */
+
+class HatenaSyntax_NoParagraph implements PEG_IParser
+{
+    protected $parser, $lineParser;
+
+    function __construct(PEG_IParser $element)
+    {
+        $end = new HatenaSyntax_Regex('#</p><$#');
+        $this->lineParser = PEG::many($element);
+        $this->parser = PEG::seq(
+            PEG::many(
+                PEG::subtract(PEG::anything(), $end)
+            ),
+            $end
+        );
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        if ($context->eos()) {
+            return PEG::failure();
+        }
+
+        $line = $context->readElement();
+
+        if (!preg_match('#^><p( +class="([^"]+)")?>#', $line, $matches)) {
+            return PEG::failure();
+        }
+
+        $line = substr($line, strlen($matches[0]));
+        $attr = isset($matches[2]) && $matches[2] !== ''
+            ? array('class' => $matches[2])
+            : array();
+
+        // ><p>~~</p><みたいに一行で終わってるとき
+        if (substr($line, -5, 5) === '</p><') {
+            $line = substr($line, 0, -5);
+            $body = $this->lineParser->parse(PEG::context($line));
+
+            return array('p', $attr, $body);
+        }
+
+        $rest = $this->parser->parse($context);
+
+        if ($rest instanceof PEG_Failure) {
+            return $rest;
+        }
+
+        $line .= join(PHP_EOL, $rest[0]);
+        $line .= substr($rest[1], 0, -5);
+
+        $body = $this->lineParser->parse(PEG::context($line));
+
+        return array('p', $attr, $body);
+    }
+}

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/CommentRemover.php

@@ -0,0 +1,24 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_CommentRemover
+{
+	static function remove($str)
+	{
+		$str = preg_replace_callback(
+			'/<!--.*?-->|\n>\|[^|]*\|\n.*?\|\|<\n/s',
+			array(__CLASS__, 'replace'),
+			"\n" . $str . "\n");
+		return substr($str, 1, -1);
+	}
+
+	static function replace($matches)
+	{
+		return substr($matches[0], 0, 1) === '<' ? '' : $matches[0];
+	}
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/CommentRemover.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Locator.php

@@ -0,0 +1,239 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Locator
+{
+    protected $blockRef = null, $lineElementRef = null;
+    protected $shared = array();
+    protected $facade;
+
+    private function __construct()
+    {
+        $this->setup();
+    }
+
+    protected function setup()
+    {
+        $this->lineElement;
+        $this->lineElementRef = new HatenaSyntax_LineElement($this->bracket, $this->footnote, $this->inlineTag);
+        $this->block;
+        $this->blockRef = PEG::memo(new HatenaSyntax_Block($this));
+    }
+
+    static function it()
+    {
+        static $obj = null;
+        return $obj ? $obj : $obj = new self;
+    }
+
+    function __get($name)
+    {
+        return isset($this->shared[$name]) ?
+            $this->shared[$name] :
+            $this->shared[$name] = $this->{'create' . $name}();
+    }
+
+    protected function nodeCreater($type, PEG_IParser $parser, Array $keys = array())
+    {
+        return new HatenaSyntax_NodeCreater($type, $parser, $keys);
+    }
+
+    protected function createLineChar()
+    {
+        return PEG::anything();
+    }
+
+    protected function createFootnote()
+    {
+        $elt = PEG::subtract(
+            PEG::choice($this->bracket, $this->lineChar),
+            '))');
+
+        $parser = PEG::pack('((',
+                            PEG::many1($elt),
+                            '))');
+
+        return $this->nodeCreater('footnote', $parser);
+    }
+
+    protected function createInlineTag()
+    {
+        $parser = new HatenaSyntax_InlineTag($this->lineElement);
+
+        return $this->nodeCreater('inlinetag', $parser, array('name', 'body'));
+    }
+
+    protected function createLineElement()
+    {
+        return PEG::ref($this->lineElementRef);
+    }
+
+    protected function createLineSegment()
+    {
+        return PEG::many($this->lineElement);
+    }
+
+    protected function createHttpLink()
+    {
+        $title_char = PEG::subtract($this->lineChar, ']');
+        $title = PEG::choice(
+            PEG::second(':title', ''),
+            PEG::second(':title=', PEG::join(PEG::many1($title_char)))
+        );
+
+        $url_char = PEG::subtract($this->lineChar, ']', ':title');
+        $url = PEG::join(PEG::seq(
+            PEG::choice('http://', 'https://'),
+            PEG::many1($url_char)));
+
+        $parser = PEG::seq($url, PEG::optional($title));
+
+        return $this->nodeCreater('httplink', $parser, array('href', 'title'));
+    }
+
+    protected function createImageLink()
+    {
+        $url_char = PEG::subtract($this->lineChar, ']', ':image]');
+        $url = PEG::join(PEG::seq(
+            PEG::choice('http://', 'https://'),
+            PEG::many1($url_char)));
+
+        $parser = PEG::first($url, ':image');
+
+        return $this->nodeCreater('imagelink', $parser);
+    }
+
+    protected function createKeywordLink()
+    {
+        $body = PEG::join(PEG::many1(PEG::subtract($this->lineChar, ']]')));
+        $body = PEG::subtract($body, 'javascript:');
+        $parser = PEG::pack('[', $body, ']');
+
+        return $this->nodeCreater('keywordlink', $parser);
+    }
+
+    protected function createNullLink()
+    {
+        $body = PEG::join(PEG::many1(PEG::subtract($this->lineChar, '[]')));
+        $parser = PEG::pack(']', $body, '[');
+
+        return $parser;
+    }
+
+    protected function createTableOfContents()
+    {
+        $parser = new HatenaSyntax_Regex('/^\[:contents]$/');
+
+        return $this->nodeCreater('tableofcontents', $parser);
+    }
+
+    protected function createInlineTableOfContents()
+    {
+        $parser = PEG::token(':contents');
+        return $this->nodeCreater('tableofcontents', $parser);
+    }
+
+    protected function createBracket()
+    {
+        return PEG::pack('[', PEG::choice(
+            $this->inlineTableOfContents,
+            $this->nullLink,
+            $this->keywordLink,
+            $this->imageLink,
+            $this->httpLink),
+        ']');
+    }
+
+    protected function createSeparator()
+    {
+        $parser = PEG::token('====');
+        return $this->nodeCreater('separator', $parser);
+    }
+
+    protected function createDefinitionList()
+    {
+        $parser = new HatenaSyntax_DefinitionList($this->lineElement);
+        return $this->nodeCreater('definitionlist', $parser);
+    }
+
+    protected function createPre()
+    {
+        $parser = new HatenaSyntax_Pre($this->lineElement);
+
+        return $this->nodeCreater('pre', $parser);
+    }
+
+    protected function createSuperPre()
+    {
+        $parser = new HatenaSyntax_SuperPre;
+
+        return $this->nodeCreater('superpre', $parser, array('type', 'body'));
+    }
+
+    protected function createHeader()
+    {
+        $parser = new HatenaSyntax_Header($this->lineElement);
+
+        return $this->nodeCreater('header', $parser, array('level', 'name', 'body'));
+    }
+
+    protected function createNoParagraph()
+    {
+        $parser = new HatenaSyntax_NoParagraph($this->lineElement);
+
+        return $this->nodeCreater('noparagraph', $parser, array('tag', 'attr', 'body'));
+    }
+
+    protected function createList()
+    {
+        $parser = new HatenaSyntax_List($this->lineElement);
+
+        return $this->nodeCreater('list', $parser);
+    }
+
+    protected function createTable()
+    {
+        $parser = new HatenaSyntax_Table($this->lineElement);
+
+        return $this->nodeCreater('table', $parser);
+    }
+
+    protected function createBlockQuote()
+    {
+        $parser = new HatenaSyntax_Quote($this->block);
+
+        return $this->nodeCreater('blockquote', $parser, array('url', 'body'));
+    }
+
+    protected function createParagraph()
+    {
+        $parser = new HatenaSyntax_Paragraph($this->lineElement);
+
+        return $this->nodeCreater('paragraph', $parser);
+    }
+
+    protected function createEmptyParagraph()
+    {
+        $parser = PEG::count(PEG::many1(PEG::token('')));
+
+        return $this->nodeCreater('emptyparagraph', $parser);
+    }
+
+    protected function createBlock()
+    {
+        $parser = PEG::ref($this->blockRef);
+
+        return $parser;
+    }
+
+    protected function createParser()
+    {
+        return $this->nodeCreater('root', PEG::many($this->block));
+    }
+
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Locator.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Paragraph.php

@@ -0,0 +1,75 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Paragraph implements PEG_IParser
+{
+    protected $parser, $line;
+
+    function __construct(PEG_IParser $lineelt)
+    {
+        $this->parser = PEG::callbackAction(
+            array($this, 'map'),
+            PEG::anything()
+        );
+        $this->line = PEG::callbackAction(
+            array($this, 'normalize'),
+            PEG::many($lineelt)
+        );
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        return $this->parser->parse($context);
+    }
+
+    function map($line)
+    {
+        return $this->line->parse(PEG::context($line));
+    }
+
+    /**
+     * @param Array $rest
+     * @return Array
+     */
+    function normalize(Array $rest)
+    {
+        $ret = array();
+
+        while ($rest) {
+            list($elt, $rest) = $this->segment($rest);
+            $ret[] = $elt;
+        }
+
+        return $ret;
+    }
+
+    /**
+     * @param Array
+     * @return Array array($elt, $rest)
+     */
+    function segment(Array $p)
+    {
+        $first = array_shift($p);
+        $rest = $p;
+
+        if (!is_string($first)) {
+            return array($first, $rest);
+        }
+
+        $str = $first;
+        while ($rest) {
+            if (is_string($rest[0])) {
+                $str .= array_shift($rest);
+            }
+            else {
+                return array($str, $rest);
+            }
+        }
+        return array($str, array());
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Paragraph.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/SuperPre.php

@@ -0,0 +1,57 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_SuperPre implements PEG_IParser
+{
+    protected $parser;
+
+    function __construct()
+    {
+        $end = new HatenaSyntax_Regex('/\|\|<$/');
+        $this->parser = PEG::callbackAction(
+            array($this, 'map'),
+            PEG::seq(
+                $this->header(),
+                PEG::many(PEG::subtract(PEG::anything(), $end)),
+                $end
+            )
+        );
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        return $this->parser->parse($context);
+    }
+
+    function map(Array $superpre)
+    {
+        list($type, $body, $end) = $superpre;
+
+        if ($end !== '||<') {
+            $body[] = substr($end, 0, -3);
+        }
+
+        return array($type, $body);
+    }
+
+    function header()
+    {
+        return PEG::callbackAction(
+            array($this, 'mapHeader'),
+            PEG::anything());
+    }
+
+    function mapHeader($line)
+    {
+        if (!preg_match('/^>\|([a-zA-Z0-9]*)\|$/', $line, $matches)) {
+            return PEG::failure();
+        }
+
+        return $matches[1];
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/SuperPre.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Renderer.php

@@ -0,0 +1,299 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Renderer
+{
+    protected
+        $config,
+        $footnote,
+        $fncount,
+        $root,
+        $treeRenderer,
+        $headerCount;
+
+    function __construct(Array $config = array())
+    {
+        $this->config = $config + array(
+            'headerlevel'        => 1,
+            'htmlescape'         => true,
+            'id'                 => uniqid('sec'),
+            'sectionclass'       => 'section',
+            'footnoteclass'      => 'footnote',
+            'keywordlinkhandler' => array($this, 'keywordLinkHandler'),
+            'superprehandler'    => array($this, 'superPreHandler'),
+            'linktitlehandler'   => array($this, 'linkTitleHandler')
+        );
+
+        $this->treeRenderer = new HatenaSyntax_TreeRenderer(
+            array($this, 'listItemCallback'),
+            array($this, 'isOrderedCallback'));
+    }
+
+    static function linkTitleHandler($url)
+    {
+        return $url;
+    }
+
+    static function superPreHandler($type, $lines)
+    {
+        $body = join(PHP_EOL, array_map(array('HatenaSyntax_Renderer', 'escape'), $lines));
+        return '<pre class="superpre">' . PHP_EOL . $body . '</pre>';
+    }
+
+    static function keywordLinkHandler($path)
+    {
+        return './' . $path;
+    }
+
+    function listItemCallback(Array $data)
+    {
+        list(, $lineSegment) = $data;
+        return $this->renderLineSegment($lineSegment);
+    }
+
+    function isOrderedCallback(HatenaSyntax_Tree_INode $node)
+    {
+        $children = $node->getChildren();
+        foreach ($children as $child) {
+            if ($child->hasValue()) {
+                $buf = $child->getValue();
+                return $buf[0] === '+';
+            }
+        }
+        return false;
+    }
+
+    function render(HatenaSyntax_Node $rootnode)
+    {
+        if ($rootnode->getType() !== 'root') throw new InvalidArgumentException();
+
+        $this->footnote = '';
+        $this->fncount = 0;
+        $this->root = $rootnode;
+        $this->headerCount = 0;
+
+        $ret = $this->renderNode($rootnode);
+        $ret = '<div class="' . $this->config['sectionclass'] . '">' . PHP_EOL . $ret . PHP_EOL . '</div>' . PHP_EOL;
+        if ($this->fncount > 0) {
+            $ret .= PHP_EOL . PHP_EOL . '<div class="' . $this->config['footnoteclass'] . '">' .
+                    PHP_EOL . $this->footnote .  '</div>';
+        }
+
+        return $ret;
+    }
+
+    function renderTitle(HatenaSyntax_Node $root)
+    {
+        if ($root->getType() !== 'root') {
+            throw new InvalidArgumentException();
+        }
+
+        $this->footnote = '';
+        $this->fncount = 0;
+        $this->root = $root;
+        $this->headerCount = 0;
+
+        $nodes = $root->getData();
+
+        if (isset($nodes[0]) && $nodes[0]->isTopHeader()) {
+            return strip_tags($this->renderLineSegment($nodes[0]->at('body')));
+        }
+        return '';
+    }
+
+    protected function renderSeparator()
+    {
+        return '<div class="separator"></div>' . PHP_EOL;
+    }
+
+    protected function renderTableOfContents()
+    {
+        $tocRenderer = new HatenaSyntax_TOCRenderer();
+        return $tocRenderer->render($this->root, $this->config['id']);
+    }
+
+    protected function renderNode(HatenaSyntax_Node $node)
+    {
+        $ret = $this->{'render' . $node->getType()}($node->getData());
+        return $ret;
+    }
+
+    protected function renderRoot(Array $arr)
+    {
+        foreach ($arr as &$elt) $elt = $this->renderNode($elt);
+        return join(PHP_EOL, $arr);
+    }
+
+    protected function renderHeader(Array $data)
+    {
+        $level  = $data['level'] + $this->config['headerlevel'];
+        $name   = md5($this->config['id']) . '_header_' . $this->headerCount++;
+        $anchor = '<a name="' . $name . '" id="' . $name . '"></a>';
+
+        return "<h{$level}>" . $this->renderLineSegment($data['body']) . $anchor . "</h{$level}>";
+    }
+
+    protected function renderNoParagraph(Array $data)
+    {
+        $ret = '';
+        $ret .= "<{$data['tag']}";
+        foreach ($data['attr'] as $name => $value) {
+            $ret .= " {$name}=\"{$value}\"";
+        }
+        $ret .= ">" . PHP_EOL;
+
+        $ret .= $this->renderLineSegment($data['body']);
+
+        $ret .= PHP_EOL . "</{$data['tag']}>" . PHP_EOL;
+
+        return $ret;
+    }
+
+    protected function renderLineSegment(Array $data)
+    {
+        foreach ($data as &$elt)
+            $elt = !$elt instanceof HatenaSyntax_Node ? ($this->config['htmlescape'] ? $this->escape($elt) : $elt)
+                                                      : $this->renderNode($elt);
+        return join('', $data);
+    }
+
+    protected function renderFootnote(Array $data)
+    {
+        $this->fncount++;
+        $id = md5($this->config['id']);
+        $n = $this->fncount;
+        $title = $body = $this->renderLineSegment($data);
+        $title = strip_tags($body);
+        if (!$this->config['htmlescape']) {
+            $title = $this->escape($title);
+        }
+
+        $fnname = sprintf('%s_footnote_%d', $id, $n);
+        $fnlinkname = sprintf('%s_footnotelink_%d', $id, $n);
+        $this->footnote .= sprintf('<p><a href="#%s" name="%s" id="%s">*%d</a>: %s</p>' . PHP_EOL, $fnlinkname, $fnname, $fnname, $n, $body);
+        return sprintf('(<a href="#%s" name="%s" id="%s" title="%s">*%d</a>)', $fnname, $fnlinkname, $fnlinkname, $title, $n);
+    }
+
+    protected function renderInlineTag(Array $data)
+    {
+        return
+            "<{$data['name']}>"
+            . $this->renderLineSegment($data['body'])
+            . "</{$data['name']}>";
+    }
+
+    protected function renderHttpLink(Array $data)
+    {
+        list($href, $title) = array($data['href'], $data['title']);
+
+        if ($title === '') {
+            $title = call_user_func($this->config['linktitlehandler'], $href);
+        }
+        elseif ($title === false) {
+            $title = $href;
+        }
+
+        return sprintf('<a href="%s">%s</a>', self::escape($href), self::escape($title));
+    }
+
+    protected function renderImageLink($url)
+    {
+        $url = self::escape($url);
+        return '<a href="' . $url . '"><img src="' . $url . '" /></a>';
+    }
+
+    protected function renderKeywordLink($path)
+    {
+        $path = self::escape($path);
+        $href = call_user_func($this->config['keywordlinkhandler'], $path);
+        return '<a href="' . $href . '">' . $path . '</a>';
+    }
+
+    protected function renderDefinitionList(Array $data)
+    {
+        foreach ($data as &$elt) $elt = $this->renderDefinition($elt);
+        return join(PHP_EOL, array('<dl>', join(PHP_EOL, $data), '</dl>'));
+    }
+
+    protected function renderDefinition(Array $data)
+    {
+        list($dt, $dd) = $data;
+        $ret = array();
+        if ($dt) $ret[] = '<dt>' . $this->renderLineSegment($dt) . '</dt>';
+        $ret[] = '<dd>' . $this->renderLineSegment($dd) . '</dd>';
+        return join(PHP_EOL, $ret);
+    }
+
+    protected function renderPre(Array $data)
+    {
+        $ret = array();
+        $ret[] = '<pre>';
+        foreach ($data as &$elt) $elt = $this->renderLineSegment($elt);
+        $ret[] = join(PHP_EOL, $data) . '</pre>';
+        return join(PHP_EOL, $ret);
+    }
+
+    protected function renderSuperPre(Array $data)
+    {
+        $ret = array();
+        list($type, $lines) = array($data['type'], $data['body']);
+        $ret[] = call_user_func($this->config['superprehandler'], $type, $lines);
+        return join(PHP_EOL, $ret);
+    }
+
+    protected function renderTable(Array $data)
+    {
+        $ret = array();
+        $ret[] = '<table>';
+        foreach ($data as $tr) {
+            $ret[] = '<tr>';
+            foreach ($tr as $td) $ret[] = $this->renderTableCell($td[0], $td[1]);
+            $ret[] = '</tr>';
+        }
+        $ret[] = '</table>';
+        return join(PHP_EOL, $ret);
+    }
+
+    protected function renderTableCell($header, $segment)
+    {
+        $tag = $header ? 'th' : 'td';
+        $ret = "<{$tag}>" . $this->renderLineSegment($segment) . "</{$tag}>";
+        return $ret;
+    }
+
+    protected function renderBlockQuote(Array $arr)
+    {
+        $ret = array();
+        $ret[] = '<blockquote>';
+        foreach ($arr['body'] as $elt) $ret[] = $this->renderNode($elt);
+        if ($arr['url']) $ret[] = '<cite><a href="' . self::escape($arr['url']) . '">' . self::escape($arr['url']) . '</a></cite>';
+        $ret[] = '</blockquote>';
+        return join(PHP_EOL, $ret);
+    }
+
+    protected function renderParagraph(Array $data)
+    {
+        return '<p>' . $this->renderLineSegment($data) . '</p>';
+    }
+
+    protected function renderEmptyParagraph($data)
+    {
+        return str_repeat('<br />' . PHP_EOL, max($data - 1, 0));
+    }
+
+    protected function renderList(HatenaSyntax_Tree_Root $root)
+    {
+        return $this->treeRenderer->render($root);
+    }
+
+
+    protected static function escape($str)
+    {
+        return htmlspecialchars($str, ENT_QUOTES, 'UTF-8');
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Renderer.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree/INode.php

@@ -0,0 +1,19 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+interface HatenaSyntax_Tree_INode
+{
+    function hasValue();
+    function getValue();
+    function hasChildren();
+
+    // HatenaSyntax_Tree_INodeの配列を返す
+    function getChildren();
+
+    function getType();
+}
\ ファイルの末尾に改行がありません
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree/INode.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree/Root.php

@@ -0,0 +1,44 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+include_once dirname(__FILE__) . '/INode.php';
+
+class HatenaSyntax_Tree_Root implements HatenaSyntax_Tree_INode
+{
+    protected $children;
+
+    function __construct(Array $children)
+    {
+        $this->children = $children;
+    }
+
+    function hasValue()
+    {
+        return false;
+    }
+
+    function getValue()
+    {
+        return null;
+    }
+
+    function hasChildren()
+    {
+        return true;
+    }
+
+    function getChildren()
+    {
+        return $this->children;
+    }
+
+    function getType()
+    {
+        return 'root';
+    }
+}
\ ファイルの末尾に改行がありません
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree/Root.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree/Node.php

@@ -0,0 +1,44 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+include_once dirname(__FILE__) . '/INode.php';
+
+class HatenaSyntax_Tree_Node implements HatenaSyntax_Tree_INode
+{
+    protected $value, $children;
+
+    function __construct(Array $children, $value = null)
+    {
+        list($this->children, $this->value) = array($children, $value);
+    }
+
+    function hasValue()
+    {
+        return isset($this->value);
+    }
+
+    function getValue()
+    {
+        return $this->value;
+    }
+
+    function hasChildren()
+    {
+        return true;
+    }
+
+    function getChildren()
+    {
+        return $this->children;
+    }
+
+    function getType()
+    {
+        return 'node';
+    }
+}
\ ファイルの末尾に改行がありません
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree/Node.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree/Leaf.php

@@ -0,0 +1,44 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+include_once dirname(__FILE__) . '/INode.php';
+
+class HatenaSyntax_Tree_Leaf implements HatenaSyntax_Tree_INode
+{
+    protected $value;
+
+    function __construct($value)
+    {
+        $this->value = $value;
+    }
+
+    function hasValue()
+    {
+        return true;
+    }
+
+    function getValue()
+    {
+        return $this->value;
+    }
+
+    function hasChildren()
+    {
+        return false;
+    }
+
+    function getChildren()
+    {
+        return array();
+    }
+
+    function getType()
+    {
+        return 'leaf';
+    }
+}
\ ファイルの末尾に改行がありません
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Tree/Leaf.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Regex.php

@@ -0,0 +1,23 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Regex implements PEG_IParser
+{
+    protected $regex;
+
+    function __construct($regex)
+    {
+        $this->regex = $regex;
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        $elt = $context->readElement();
+        return preg_match($this->regex, $elt) ? $elt : PEG::failure();
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Regex.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/InlineTag.php

@@ -0,0 +1,32 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_InlineTag implements PEG_IParser
+{
+    protected $parser;
+
+    function __construct(PEG_IParser $element)
+    {
+        $open = PEG::second('<', PEG::choice('del', 'strong', 'inc', 'em'), '>');
+        $close = PEG::second('</', PEG::choice('del', 'strong', 'inc', 'em'), '>');
+        $this->parser = PEG::seq($open, PEG::many(PEG::subtract($element, $close)), $close);
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        $result = $this->parser->parse($context);
+
+        if ($result instanceof PEG_Failure) {
+            return $result;
+        }
+
+        list($open, $body, $close) = $result;
+
+        return $open !== $close ? PEG::failure() : array($open, $body);
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/InlineTag.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/List.php

@@ -0,0 +1,46 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_List implements PEG_IParser
+{
+    protected $parser, $li;
+
+    function __construct(PEG_IParser $lineelt)
+    {
+        $item = PEG::callbackAction(
+            array($this, 'mapLine'),
+            PEG::anything());
+
+        $this->parser = PEG::callbackAction(
+            array('HatenaSyntax_Tree', 'make'),
+            PEG::many1($item)
+        );
+
+        $this->li = PEG::callbackAction(
+            array('HatenaSyntax_Util', 'processListItem'),
+            PEG::seq(
+                PEG::many(PEG::char('+-')),
+                PEG::many($lineelt)
+            )
+        );
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        return $this->parser->parse($context);
+    }
+
+    function mapLine($line)
+    {
+        if (in_array(substr($line, 0, 1), array('+', '-'), true)) {
+            return $this->li->parse(PEG::context($line));
+        }
+
+        return PEG::failure();
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/List.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/TOCRenderer.php

@@ -0,0 +1,105 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_TOCRenderer
+{
+    protected $headerCount;
+
+    function render(HatenaSyntax_Node $rootnode, $id)
+    {
+        $treeroot = HatenaSyntax_Tree::make($this->filter($rootnode));
+        $this->headerCount = 0;
+        $this->id = $id;
+        $renderer = new HatenaSyntax_TreeRenderer(array($this, 'renderHeader'));
+        return '<div class="toc">' . $renderer->render($treeroot) . '</div>';
+    }
+
+    protected function escape($str)
+    {
+        return htmlspecialchars($str, ENT_QUOTES);
+    }
+
+    function renderHeader($node)
+    {
+        $count = $this->headerCount++;
+        $buf = array();
+        $data = $node->getData();
+        foreach ($data['body'] as $leaf) {
+            if (is_string($leaf)) {
+                $buf[] = $leaf;
+            }
+            else {
+                $buf [] = $this->{'render' . $leaf->getType()}($lead->getData());
+            }
+        }
+        return '<a href="#' . md5($this->id) . '_header_' . $count . '">' . $this->escape(join('', $buf)) . '</a>';
+    }
+
+    protected function renderFootnote($data)
+    {
+        return '';
+    }
+
+    function filter(HatenaSyntax_Node $rootnode)
+    {
+        if ($rootnode->getType() !== 'root') throw new Exception;
+        $header_arr = $this->fetchHeader($rootnode);
+        $ret = array();
+        foreach ($header_arr as $header) {
+            $buf = $header->getData();
+            $ret[] = array('level' => $buf['level'], 'value' => $header);
+        }
+        return $ret;
+    }
+
+    protected function fetchHeader($node)
+    {
+        return $this->{'fetchHeaderIn' . $node->getType()}($node);
+    }
+
+    protected function fetchHeaderInRoot($node)
+    {
+        $buf = array();
+        foreach ($node->getData() as $node) {
+            $buf[] = $this->fetchHeader($node);
+        }
+
+        return $this->concat($buf);
+    }
+
+    protected function fetchHeaderInHeader($node)
+    {
+        return array($node);
+    }
+
+    protected function fetchHeaderInBlockQuote($node)
+    {
+        $buf = array();
+        $data = $node->getData();
+        foreach ($data['body'] as $node) {
+            $buf[] = $this->fetchHeader($node);
+        }
+        return $this->concat($buf);
+    }
+
+    function __call($name, $args)
+    {
+        if (preg_match('#^fetchHeaderIn\w+$#i', $name)) return array();
+        throw new Exception(sprintf('method(%s) not found', $name));
+    }
+
+    protected function concat(Array $target)
+    {
+        if (!$target) return array();
+        $target = array_reverse($target);
+        while (1 < count($target)) {
+            array_push($target, array_merge(array_pop($target), array_pop($target)));
+        }
+        return $target[0];
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/TOCRenderer.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Util.php

@@ -0,0 +1,24 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Util
+{
+    static function normalizeList(Array $data)
+    {
+        return HatenaSyntax_Tree::make($data);
+    }
+
+    static function processListItem(Array $li)
+    {
+        $ret = array();
+        $ret['level'] = count($li[0]) - 1;
+        $ret['value'] = array(end($li[0]), $li[1]);
+
+        return $ret;
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Util.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/DefinitionList.php

@@ -0,0 +1,41 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_DefinitionList implements PEG_IParser
+{
+    protected $parser, $definition;
+
+    function __construct(PEG_IParser $elt)
+    {
+        $dt = PEG::many(PEG::subtract($elt, ':'));
+        $dd = PEG::many($elt);
+
+        $this->parser = PEG::many1(PEG::callbackAction(
+            array($this, 'map'),
+            PEG::anything()
+        ));
+
+        $sep = PEG::drop(':');
+        $this->definition = PEG::seq(
+            $sep,
+            $dt,
+            $sep,
+            $dd
+        );
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        return $this->parser->parse($context);
+    }
+
+    function map($line)
+    {
+        return $this->definition->parse(PEG::context($line));
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/DefinitionList.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Node.php

@@ -0,0 +1,51 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Node
+{
+    protected $type, $offset, $data, $contextHash;
+    function __construct($type, $data = array(), $offset = null, $contextHash = null)
+    {
+        $this->type = $type;
+        $this->data = $data;
+        $this->offset = $offset;
+        $this->contextHash = $contextHash;
+    }
+
+    function getContextHash()
+    {
+        return $this->contextHash;
+    }
+
+    function getOffset()
+    {
+        return $this->offset;
+    }
+
+    function getType()
+    {
+        return $this->type;
+    }
+
+    function getData()
+    {
+        return $this->data;
+    }
+
+    function at($name, $defaultVal = null)
+    {
+        return array_key_exists($name, $this->data)
+            ? $this->data[$name]
+            : $defaultVal;
+    }
+
+    function isTopHeader()
+    {
+        return $this->type === 'header' && $this->at('level') === 0;
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Node.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Pre.php

@@ -0,0 +1,47 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Pre implements PEG_IParser
+{
+    protected $line, $parser;
+
+    function __construct(PEG_IParser $elt)
+    {
+        $this->line = PEG::many($elt);
+
+        $end = new HatenaSyntax_Regex('/\|<$/');
+        $this->parser = PEG::callbackAction(
+            array($this, 'map'),
+            PEG::seq(
+                PEG::drop('>|'),
+                PEG::many(PEG::subtract(PEG::anything(), $end)),
+                $end
+            )
+        );
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        return $this->parser->parse($context);
+    }
+
+    function map(Array $pre)
+    {
+        list($body, $end) = $pre;
+
+        if ($end !== '|<') {
+            $body[] = substr($end, 0, -2);
+        }
+
+        foreach ($body as &$line) {
+            $line = $this->line->parse(PEG::context($line));
+        }
+
+        return $body;
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Pre.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/TreeRenderer.php

@@ -0,0 +1,78 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_TreeRenderer
+{
+    protected $valueCallback, $isOrderedCallback;
+
+    function __construct($valueCallback, $isOrderedCallback = false)
+    {
+        $this->valueCallback = $valueCallback;
+        $this->isOrderedCallback = $isOrderedCallback ? $isOrderedCallback : array($this, 'isOrderedDefaultCallback');
+    }
+
+    function isOrderedDefaultCallback($node)
+    {
+        return true;
+    }
+
+    protected function renderValue($value)
+    {
+        return call_user_func($this->valueCallback, $value);
+    }
+
+    protected function isOrdered($node)
+    {
+        return call_user_func($this->isOrderedCallback, $node);
+    }
+
+    protected function listOpenTag($bool)
+    {
+        return ($bool ? '<ol>' : '<ul>') . PHP_EOL;
+    }
+
+    protected function listCloseTag($bool)
+    {
+        return ($bool ? '</ol>' : '</ul>') . PHP_EOL;
+    }
+
+    function render(HatenaSyntax_Tree_Root $root)
+    {
+        $ordered = $this->isOrdered($root);
+        $ret = $this->listOpenTag($ordered);
+        foreach ($root->getChildren() as $child) {
+            $ret .= $this->_render($child);
+        }
+        $ret .= $this->listCloseTag($ordered);
+        return $ret;
+    }
+
+    protected function _render($node)
+    {
+        return $this->{'render' . $node->getType()}($node);
+    }
+
+    protected function renderNode($node)
+    {
+        $ret = '<li>' . PHP_EOL;
+        if ($node->hasValue()) $ret .= $this->renderValue($node->getValue());
+        $ordered = $this->isOrdered($node);
+        $ret .= PHP_EOL . $this->listOpenTag($ordered);
+        foreach ($node->getChildren() as $child) {
+            $ret .= $this->_render($child);
+        }
+        $ret .= $this->listCloseTag($ordered);
+        $ret .= '</li>' . PHP_EOL;
+        return $ret;
+    }
+
+    protected function renderLeaf($node)
+    {
+        return '<li>' . $this->renderValue($node->getValue()) . '</li>' . PHP_EOL;
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/TreeRenderer.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Table.php

@@ -0,0 +1,43 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Table implements PEG_IParser
+{
+    protected $parser, $line;
+
+    function __construct(PEG_IParser $lineelt)
+    {
+        $cellbody = PEG::many(PEG::subtract($lineelt, '|'));
+
+        $this->parser = PEG::many1(
+            PEG::callbackAction(
+                array($this, 'map'),
+                PEG::anything()
+            )
+        );
+
+        $this->line = PEG::second(
+            '|',
+            PEG::many1(
+                PEG::optional('*'),
+                $cellbody,
+                PEG::drop('|')),
+            PEG::eos()
+        );
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        return $this->parser->parse($context);
+    }
+
+    function map($line)
+    {
+        return $this->line->parse(PEG::context($line));
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Table.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Header.php

@@ -0,0 +1,64 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+class HatenaSyntax_Header implements PEG_IParser
+{
+    protected $child, $parser;
+
+    function __construct(PEG_IParser $elt)
+    {
+        $this->child = PEG::many($elt);
+        $this->parser = PEG::callbackAction(array($this, 'map'), PEG::anything());
+    }
+
+    function parse(PEG_IContext $context)
+    {
+        return $this->parser->parse($context);
+    }
+
+    function map($line)
+    {
+        if (strpos($line, '*') === 0) {
+            list($level, $rest) = $this->toLevelAndRest((string)substr($line, 1));
+
+            list($name, $rest) = $level === 0
+                ? $this->toNameAndRest($rest)
+                : array(false, $rest);
+
+            $body = $this->child->parse(PEG::context($rest));
+
+            return array($level, $name, $body);
+        }
+
+        return PEG::failure();
+    }
+
+    protected function toLevelAndRest($line)
+    {
+        $level = 0;
+
+        for ($i = 0, $len = strlen($line); $i < $len; $i++) {
+            if ($line[$i] === '*') {
+                $level++;
+            } else {
+                break;
+            }
+        }
+
+        return array($level, (string)substr($line, $level));
+    }
+
+    protected function toNameAndRest($rest)
+    {
+        if (preg_match('/^([-[:alnum:]_]*)\*/', $rest, $matches)) {
+            return array($matches[1], (string)substr($rest, strlen($matches[0])));
+        }
+
+        return array(false, $rest);
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax/Header.php
___________________________________________________________________
名前: svn:keywords
+ Id

HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax.php

@@ -0,0 +1,229 @@
+<?php
+/**
+ * @package HatenaSyntax
+ * @author anatoo<anatoo@nequal.jp>
+ * @license http://www.opensource.org/licenses/mit-license.php MIT License
+ * @version $Id$
+ */
+
+include_once 'PEG.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Node.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Regex.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Locator.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/NodeCreater.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/InlineTag.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Renderer.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/TOCRenderer.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Util.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Header.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Block.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/LineElement.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Quote.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Table.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/DefinitionList.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/List.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Paragraph.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/NoParagraph.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Pre.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/SuperPre.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/TreeRenderer.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Tree.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/CommentRemover.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Tree/INode.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Tree/Node.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Tree/Root.php';
+include_once dirname(__FILE__) . '/HatenaSyntax/Tree/Leaf.php';
+
+class HatenaSyntax
+{
+    /**
+     * 文字列をパースしてHatenaSyntax_Nodeインスタンスからなる構文木を返す。
+     *
+     * @param string
+     * @return HatenaSyntax_Node
+     */
+    static function parse($str)
+    {
+        return HatenaSyntax_Locator::it()->parser->parse(self::context($str));
+    }
+
+    /**
+     * 文字列をパースしてHatenaSyntax_Nodeインスタンスからなる構文木の配列を返す
+     *
+     * @param string
+     * @return Array
+     */
+    static function parseAsSections($str)
+    {
+        $blocks = self::parse($str)->getData();
+
+        // 先頭にある空のパラグラフを削る
+        foreach ($blocks as $i => $block) {
+            if ($block->getType() === 'emptyparagraph') {
+                unset($blocks[$i]);
+            }
+            else {
+                break;
+            }
+        }
+        $blocks = array_values($blocks);
+
+        // セクションごとにブロック要素をまとめる
+        $sections = array();
+        $len = count($blocks);
+        $blocks = array_reverse($blocks);
+        for ($i = 0; $i < $len; $i++) {
+            $section = array();
+            for (;$i < $len; $i++) {
+                $section[] = $blocks[$i];
+                if ($blocks[$i]->isTopHeader()) {
+                    break;
+                }
+            }
+            $sections[] = array_reverse($section);
+        }
+        $sections = array_reverse($sections);
+
+        // ブロック要素の配列をノードにする
+        foreach ($sections as $i => $section) {
+            $sections[$i] = new HatenaSyntax_Node('root', $section);
+        }
+
+        return $sections;
+    }
+
+    /**
+     * 文字列をパースしてhtmlを返す。
+     *
+     * @param string
+     * @param Array
+     * @return string
+     */
+    static function render($str, Array $config = array())
+    {
+        $node = self::parse($str);
+        $renderer = new HatenaSyntax_Renderer($config);
+        return $renderer->render($node);
+    }
+
+    /**
+     * @param string
+     * @return PEG_IContext
+     */
+    static protected function context($str)
+    {
+        $str = str_replace(array("\r\n", "\r"), "\n", $str);
+        $str = strpos('<!--', $str) === false ? $str : HatenaSyntax_CommentRemover::remove($str);
+
+        return PEG::context(preg_split("/\n/", $str));
+    }
+
+    /**
+     * HatenaSyntax_Nodeインスタンスからなる構文木をhtmlにして返す。
+     *
+     * @param HatenaSyntax_Node
+     * @param Array
+     * @return string
+     */
+    static function renderNode(HatenaSyntax_Node $root, Array $config = array())
+    {
+        $renderer = new HatenaSyntax_Renderer($config);
+        return $renderer->render($root);
+    }
+
+    /**
+     * セクション名を取得する。
+     * 見つからなかった場合は空の文字列を返す。
+     *
+     * @param HatenaSyntax_Node
+     * @return string
+     */
+    static function getSectionName(HatenaSyntax_Node $root)
+    {
+        self::assertRootNode($root);
+
+        list($block) = $root->getData() + array(false);
+
+        return $block && $block->isTopHeader()
+            ? (string)$block->at('name', '')
+            : '';
+    }
+
+    /**
+     * セクションのタイトルを取得する。
+     * 見つからなかった場合は空の文字列を返す。
+     *
+     * @param HatenaSyntax_Node
+     * @param Array $config HatenaSyntax_Rendererに渡す設定
+     * @return string
+     */
+    static function getSectionTitle(HatenaSyntax_Node $root, Array $config = array())
+    {
+        self::assertRootNode($root);
+
+        $renderer = new HatenaSyntax_Renderer($config);
+        return $renderer->renderTitle($root);
+    }
+
+    /**
+     * セクションの先頭にトップのヘッダを持っているかを取得する
+     *
+     * @param HatenaSyntax_Node
+     * @return bool
+     */
+    static function hasTopHeader(HatenaSyntax_Node $root)
+    {
+        self::assertRootNode($root);
+
+        list($block) = $root->getData() + array(false);
+
+        return $block && $block->isTopHeader();
+    }
+
+    /**
+     * 続きを読む記法があるかどうかを取得する
+     *
+     * @param HatenaSyntax_Node
+     * @return bool
+     */
+    static function hasSeparator(HatenaSyntax_Node $root)
+    {
+        self::assertRootNode($root);
+
+        foreach ($root->getData() as $block) {
+            if ($block->getType() === 'separator') {
+                return true;
+            }
+        }
+        return false;
+    }
+
+    /**
+     * 続きを読む記法よりも後ろの部分を切り離した前半の章を取得する
+     *
+     * @param HatenaSyntax_Node
+     * @return HatenaSyntax_Node
+     */
+    static function separate(HatenaSyntax_Node $root)
+    {
+        self::assertRootNode($root);
+
+        $blocks = array();
+
+        foreach ($root->getData() as $block) {
+            $blocks[] = $block;
+            if ($block->getType() === 'separator') {
+                break;
+            }
+        }
+
+        return new HatenaSyntax_Node('root', $blocks);
+    }
+
+    static protected function assertRootNode(HatenaSyntax_Node $node)
+    {
+        if ($node->getType() !== 'root') {
+            throw new InvalidArgumentException('this node must be root node');
+        }
+    }
+}
属性に変更があったパス: HatenaSyntax/tags/release-1.0.1-20100208184507/HatenaSyntax.php
___________________________________________________________________
名前: svn:keywords
+ Id