Commit: 33b86fab9ef39c4010e29eeaca630512d131ea46 - pukiwiki-fork (git)

Commit MetaInfo

• Revisión: 33b86fab9ef39c4010e29eeaca630512d131ea46 (tree)
• Tiempo: 2003-01-27 14:44:11
• Autor: panda <panda>
• Commiter: panda

Log Message

PukiWiki/1.4 first beta release

Cambiar Resumen

• add: convert_html.php
• add: diff.php
• add: mysql.php
• add: pgsql.php

Diferencia incremental

--- /dev/null
+++ b/convert_html.php
@@ -0,0 +1,755 @@
+<?php
+/////////////////////////////////////////////////
+// PukiWiki - Yet another WikiWikiWeb clone.
+//
+// $Id: convert_html.php,v 1.1 2003/01/27 05:44:11 panda Exp $
+//
+
+function convert_html($string)
+{
+	global $script,$vars,$digest;
+	static $contents_id = 0;
+
+	$contents = new Contents(++$contents_id);
+
+	$string = rtrim($string);
+	$string = preg_replace("/^#freeze\n/","","$string\n");    // 凍結指示子除去
+	$string = preg_replace("/\n\/\/[^\n]*/","", "\n$string"); // コメント除去
+	$string = preg_replace("/\n\n+/","\n\n\n", $string);      // 空行の調整
+	$string = preg_replace("/(?<=[\r\n])(?!\s)([^\n]*~)\n/", "$1\r", "\n$string");
+
+	$lines = split("\n", $string);
+
+	$digest = md5(@join('',get_source($vars['page'])));
+
+	$body = new Body();
+	$last =& $body->insert(new Paragraph(''));
+
+	foreach ($lines as $line) {
+		if (substr($line,0,2) == '//') { //コメントは処理しない
+			continue;
+		}
+
+		$align = '';
+		if (preg_match('/^(LEFT|CENTER|RIGHT):(.*)$/',$line,$matches)) {
+			$last =& $last->add(new Align(strtolower($matches[1]))); // <div style="text-align:...">
+			if ($matches[2] == '') {
+				continue;
+			}
+			$line = $matches[2];
+		}
+
+		// 行頭文字
+		$head = substr($line,0,1);
+		     if ($line == '')  { $last =& $body;                             } // 空行 
+		else if (rtrim($line) == '----') {
+			$last =& $body->insert(new HRule());                               } // HRule
+		else if ($head == '*') {
+			$last =& $body->insert(new Heading($line, $contents));             } // Heading
+		else if ($head == '-') { $last =& $last->add(new UList($line));      } // UList
+		else if ($head == '+') { $last =& $last->add(new OList($line));      } // OList
+		else if ($head == ':') { $last =& $last->add(new DList($line));      } // DList
+		else if ($head == '|') { $last =& $last->add(new Table($line));      } // Table
+		else if ($head == ',') { $last =& $last->add(new YTable($line));     } // Table(YukiWiki互換)
+		else if ($head == ' ' or $head == "\t")
+		                       { $last =& $last->add(new Pre($line));        } // Pre
+		else if ($head == '>') { $last =& $last->add(new BQuote($line));     } // BrockQuote
+		else if ($head == '<') { $last =& bq_end($last, $line);              } // BlockQuote end
+		else if ($head == '#') { $last =& $last->add(new Div($line));        } // Div
+		else                   { $last =& $last->add(new Inline($line));     } // 段落
+	}
+	$ret = $body->toArray();
+//	$ret = inline2($ret);
+	$ret = $contents->replaceContents($ret);
+	
+	return join("\n",$ret);
+
+}
+
+class Element
+{
+	var $parent;
+	
+	function setParent(&$parent)
+	{
+		$this->parent =& $parent;
+	}
+}
+
+class Inline extends Element
+{ // インライン要素
+	var $text;
+	
+	function Inline($text)
+	{
+		if (substr($text,0,1) == '~') { // 行頭~。パラグラフ開始
+			$parent =& $this->parent;
+			$this = new Paragraph(" ".substr($text,1));
+			$this->setParent($parent);
+		}
+		else {
+			$this->text = trim((preg_match("/^\n/", $text)) ? $text : inline($text));
+		}
+	}
+	function &add(&$obj)
+	{
+		return $this->insert($obj);
+	}
+	function &insert(&$obj)
+	{
+		return $this->parent->add($obj);
+	}
+	function toArray()
+	{
+		return ($this->text == '') ? array() : array(inline2($this->text));
+	}
+	function toPara($class = '')
+	{
+		$obj = new Paragraph('',$class);
+		$obj->insert($this);
+		$this->setParent($obj);
+		return $obj;
+	}
+}
+class Block extends Element
+{ // ブロック要素
+	var $elements; // 要素の配列
+	
+	function Block() {
+		$this->elements = array();
+	}
+	
+	function &add(&$obj) // エレメントを追加
+	{
+		if ($this->canContain($obj)) {
+			return $this->insert($obj);
+		}
+		return $this->parent->add($obj);
+	}
+	function &insert(&$obj)
+	{
+		$obj->setParent($this);
+		$this->elements[] =& $obj;
+		if (isset($obj->last) and is_object($obj->last)) {
+			return $obj->last;
+		}
+		return $obj;
+	}
+	function canContain($obj)
+	{
+		return TRUE;
+	}
+	function toArray()
+	{
+		$arr = array();
+		if (isset($this->elements) and count($this->elements) > 0) {
+			foreach ($this->elements as $obj) {
+				array_splice($arr, count($arr), 0, $obj->toArray());
+			}
+		}
+		return $arr;
+	}
+	function wrap($arr, $tag, $param = '')
+	{
+		if (count($arr) > 0) {
+			array_unshift($arr,"<$tag$param>");
+			array_push($arr,"</$tag>");
+		}
+		return $arr;
+	}
+}
+class Body extends Block
+{ // Body
+	
+	function &insert(&$obj)
+	{
+		if (is_a($obj,'Inline')) {
+			$obj =& $obj->toPara();
+		}
+		return parent::insert($obj);
+	}
+}
+class Paragraph extends Block
+{ // 段落
+	var $class;
+	
+	function Paragraph($text, $class = '')
+	{
+		parent::Block();
+		$this->class = $class;
+		if ($text == '') {
+			return;
+		}
+		if (substr($text,0,1) == '~') {
+			$text = substr($text,1);
+		}
+		$this->elements[] =& new Inline($text);
+	}
+	function canContain($obj)
+	{
+		return is_a($obj,'Inline');
+	}
+	function toArray()
+	{
+		return $this->wrap(parent::toArray(), 'p', $this->class); 
+	}
+}
+
+class Heading extends Block
+{ // *
+	function Heading($text, &$contents)
+	{
+		parent::Block();
+		preg_match("/^(\*{1,3})\s*(.*)$/",$text,$out) or die("Heading");
+		$this->level = strlen($out[1]) + 1;
+		list($this->text,$this->contents_str) = $contents->getAnchor($out[2], $this->level);
+	}
+	function canContain(&$obj)
+	{
+		return FALSE;
+	}
+	function toArray()
+	{
+		return $this->wrap(array($this->text),'h'.$this->level, $this->contents_str);
+	}
+}
+class HRule extends Block
+{ // ----
+	function canContain(&$obj)
+	{
+		return FALSE;
+	}
+	function toArray()
+	{
+		global $hr;
+		
+		return array($hr);
+	}
+}
+class _List extends Block
+{
+	var $level;
+	var $step, $margin, $left_margin;
+	
+	function _List($tag, $tag2, $level, $text)
+	{
+		parent::Block();
+		//マージンを取得
+		$var_margin = "_{$tag}_margin";
+		$var_left_margin = "_{$tag}_left_margin";
+		global $$var_margin, $$var_left_margin;
+		$this->margin = $$var_margin;
+		$this->left_margin = $$var_left_margin;
+
+		//初期化
+		$this->tag = $tag;
+		$this->tag2 = $tag2;
+		$this->level = $level;
+		
+		if ($text != '') {
+			$this->insert(new Inline($text));
+		}
+	}
+
+	function canContain(&$obj)
+	{
+		return is_a($obj, '_List') ? ($this->tag == $obj->tag and $this->level == $obj->level) : TRUE;
+	}
+	function setParent(&$parent)
+	{
+		parent::setParent($parent);
+		$this->step = $this->level;
+		if (isset($parent->parent) and is_a($parent->parent,'_List')) {
+			$this->step -= $parent->parent->level; 
+		}
+	}
+	function &insert(&$obj)
+	{
+		if (is_a($obj, get_class($this))) {
+			for ($n = 0; $n < count($obj->elements); $n++) {
+				$this->last =& parent::insert($obj->elements[$n]);
+			}
+			return $this->last;
+		}
+		else {
+			$obj =& new ListElement($obj, $this->level, $this->tag2); // wrap
+		}
+		$this->last =& $obj;
+		return parent::insert($obj);
+	}
+	function toArray($param='')
+	{
+		global $_list_left_margin, $_list_margin, $_list_pad_str;
+		
+		$margin = $_list_margin * $this->step;
+		if ($this->level == $this->step) {
+			$margin += $_list_left_margin;
+		}
+		$style = sprintf($_list_pad_str,$this->level,$margin,$margin);
+		return $this->wrap(Block::toArray(),$this->tag,$style.$param);
+	}
+}
+class ListElement extends Block
+{
+	function ListElement($obj,$level,$head)
+	{
+		parent::Block();
+		$this->level = $level;
+		$this->head = $head;
+		$this->insert($obj);
+	}
+	function canContain(&$obj)
+	{
+		return !(is_a($obj, '_List') and ($obj->level <= $this->level));
+	}
+	function toArray()
+	{
+		return $this->wrap(parent::toArray(), $this->head);
+	}
+}
+class UList extends _List
+{ // -
+	function UList($text)
+	{
+		preg_match("/^(\-{1,3})([\n]?.*)$/",$text,$out) or die("UList $text");
+		parent::_List('ul', 'li', strlen($out[1]), $out[2]);
+	}
+}
+class OList extends _List
+{ // +
+	function OList($text)
+	{
+		preg_match("/^(\+{1,3})(.*)$/",$text,$out) or die("OList");
+		parent::_List('ol', 'li', strlen($out[1]), $out[2]);
+	}
+}
+class DList extends _List
+{ // :
+	function DList($text)
+	{
+		if (!preg_match("/^(:{1,3})(.*)\|(.*)$/",$text,$out)) {
+			$this = new Inline($text);
+			return;
+		}
+		parent::_List('dl', 'dd', strlen($out[1]), $out[3]);
+		if ($out[2] != '') {
+			array_unshift($this->elements,new Inline("\n".'<dt>'.inline($out[2]).'</dt>'));
+		}
+	}
+}
+class BQuote extends Block
+{ // >
+	function BQuote($text)
+	{
+		parent::Block();
+		preg_match("/^(\>{1,3})(.*)$/",$text,$out) or die("BQuote");
+		$this->level = strlen($out[1]);
+		$this->text = $out[2];
+		$this->insert(new Paragraph($this->text, ' class="quotation"'));
+	}
+	function canContain(&$obj)
+	{
+		if (!is_a($obj, get_class($this))) {
+			return TRUE;
+		}
+		return ($this->level <= $obj->level);
+	}
+	function &insert(&$obj)
+	{
+		if (is_a($obj, 'BQuote') and $obj->level == $this->level) {
+			$obj =& $obj->elements[0];
+		}
+		else if (is_a($obj,'Inline')) {
+			$obj = $obj->toPara('quotation');
+		}
+		$this->last =& $obj;
+		return parent::insert($obj);
+	}
+	function toArray()
+	{
+		return $this->wrap(parent::toArray(),'blockquote');
+	}
+}
+function &bq_end(&$last, $text)
+{
+	preg_match("/^(\<{1,3})(.*)$/",$text,$out) or die("bq_end");
+	$level = strlen($out[1]);
+	$parent =& $last;
+	while (is_object($parent)) {
+		if (is_a($parent,'BQuote') and $parent->level == $level) {
+			return $parent->parent->insert(new Inline($out[2]));
+		}
+		$parent =& $parent->parent;
+	}
+	return $last->insert(new Inline($text));
+}
+class Table extends Block
+{ // |
+	var $col;
+	
+	function Table($text)
+	{
+		parent::Block();
+		if (!preg_match("/^\|(.+)\|([hHfFcC]?)$/",$text,$out)) {
+			$this = new Inline($text);
+			return;
+		}
+		$this->elements = array();
+		$cells = explode('|',$out[1]);
+		$this->level = count($cells);
+		$char = strtolower($out[2]);
+		if ($char == 'c') {
+			$this->col =& new Col($cells);
+		}
+		else {
+			$this->insert(new Row($cells,($char == 'h' ? 0 : ($char == 'f' ? 1 : 2))));
+		}
+	}
+	function canContain(&$obj)
+	{
+		return is_a($obj, 'Table') and $obj->level == $this->level;
+	}
+	function &insert(&$obj)
+	{
+		if (is_a($obj, 'Table')) {
+			if (isset($obj->col) and is_object($obj->col)) {
+				$this->col = $obj->col;
+				return $this;
+			}
+			$obj =& $obj->elements[0];
+			$last = count($this->elements) - 1;
+			for ($n = 0; $n < count($obj->elements); $n++) {
+				if ($obj->elements[$n] != '~') {
+					continue;
+				}
+				$obj->type = $this->elements[$last]->type;
+				for ($m = $last; $m >= 0; $m--) {
+					if ($this->elements[$m]->elements[$n] == '~') {
+						continue;
+					}
+					$this->elements[$m]->row[$n]++;
+					break;
+				}
+			}
+		}
+		$this->elements[] = $obj;
+		return $this;
+	}
+	function toArray()
+	{
+		$col = NULL;
+		if (isset($this->col) and is_object($this->col)) {
+			$col =& $this->col;
+		}
+		$arr = $col ? $this->col->toArray() : array();
+		$part = array(0=>'thead',1=>'tfoot',2=>'tbody');
+		foreach ($part as $type=>$str) {
+			$tmp = array();
+			foreach ($this->elements as $row) {
+				if ($row->type != $type) {
+					continue;
+				}
+				$tmp = array_merge($tmp,$row->toArray($col));
+			}
+			if (count($tmp) > 0) {
+				$arr = array_merge($arr,$this->wrap($tmp,$str));
+			}
+		}
+		if (count($arr) > 0) {
+			array_unshift($arr, '<div class="ie5">','<table class="style_table" cellspacing="1" border="0">');
+			array_push($arr,'</table>','</div>');
+		}
+		return $arr;
+	}
+}
+class Row extends Block
+{
+	var $col,$row,$type;
+	
+	function Row($cells,$type='')
+	{
+		parent::Block();
+		$this->elements = $cells;
+		$this->type = $type;
+		$span = 1;
+		for ($n = 0; $n < count($cells); $n++) {
+			$this->row[$n] = 1;
+			if ($cells[$n] == '>') {
+				$this->col[$n] = 0;
+				$span++;
+			}
+			else {
+				$this->col[$n] = $span;
+				$span = 1;
+			}
+		}
+	}
+	function toArray($obj)
+	{
+		$cells = array();
+		for ($n = 0; $n < count($this->elements); $n++) {
+			$cell = $this->elements[$n];
+			if ($cell == '>' or $cell == '~') {
+				continue;
+			}
+			$row = $col = '';
+			if ($this->row[$n] > 1) {
+				$row = " rowspan=\"{$this->row[$n]}\"";
+			}
+			if ($this->col[$n] > 1) {
+				$col = " colspan=\"{$this->col[$n]}\"";
+			}
+			$align = $width = '';
+			if (is_object($obj)) {
+				$align = $obj->align[$n];
+				if ($this->col[$n] == 1) {
+					$width = $obj->width[$n];
+				}
+			}
+			if (preg_match("/^(LEFT|CENTER|RIGHT):(.*)$/",$cell,$out)) {
+				$align = strtolower($out[1]);
+				$cell = $out[2];
+			}
+			if (preg_match('/^~(.+)$/',$cell,$matches)) {
+				$tag = 'th'; $cell = $matches[1];
+			}
+			else {
+				$tag = 'td';
+			}
+			$style = $width == '' ? '' : 'width:'.$width.'px;';
+			$style.= $align == '' ? '' : 'text-align:'.$align.';';
+			$style = $style == '' ? '' : ' style="'.$style.'"';
+			$cells[] = "<$tag class=\"style_$tag\"$style$row$col>".inline2(inline($cell))."</$tag>";
+		}
+		return $this->wrap($cells,'tr');
+	}
+}
+class Col extends Row
+{
+	var $width,$align;
+	
+	function Col($cells)
+	{
+		parent::Row($cells);
+		$align = $width = '';
+		for ($n = count($this->elements) - 1; $n >= 0; $n--) {
+			if ($cells[$n] == '') {
+				$align = $width = '';
+			}
+			else if ($cells[$n] != '>') {
+				if (preg_match("/^(LEFT|CENTER|RIGHT):(.*)$/",$cells[$n],$out)) {
+					$align = strtolower($out[1]);
+					$cell = $out[2];
+				}
+				$width = htmlspecialchars($cell);
+			}
+			$this->align[$n] = $align;
+			$this->width[$n] = $width;
+		}
+	}
+	function toArray()
+	{
+		$cells = array();
+		for ($n = 0; $n < count($this->elements); $n++) {
+			$cell = $this->elements[$n];
+			if ($cell == '>') {
+				continue;
+			}
+			$span = " span=\"{$this->col[$n]}\"";
+			$align = $this->align[$n] == '' ? '' : ' align="'.$this->align[$n].'"';
+			$width = $this->width[$n] == '' ? '' : ' width="'.$this->width[$n].'"';
+			$cells[] = "<colgroup$span$align$width></colgroup>";
+		}
+		return $cells;
+	}
+}
+class YTable extends Block
+{ // ,
+	var $col;
+	
+	function YTable($text)
+	{
+		parent::Block();
+		if (!preg_match_all('/("[^"]*(?:""[^"]*)*"|[^,]*),/',"$text,",$out)) {
+			$this = new Inline($text);
+			return;
+		}
+		array_shift($out[1]);
+		$_value = array();
+		foreach ($out[1] as $val) {
+			$_value[] = preg_match('/^"(.*)"$/',$val,$matches) ? str_replace('""','"',$matches[1]) : $val;
+		}
+		$align = array();
+		$value = array();
+		foreach($_value as $val) {
+			if (preg_match('/^(\s+)?(.+?)(\s+)?$/',$val,$matches)) {
+				$align[] =($matches[1] != '') ?
+					((array_key_exists(3,$matches) and $matches[3] != '') ? ' style="text-align:center"' : ' style="text-align:right"') : '';
+				$value[] = $matches[2];
+			}
+			else {
+				$align[] = '';
+				$value[] = $val;
+			}
+		}
+		$this->col = count($value);
+		$colspan = array();
+		foreach ($value as $val) {
+			$colspan[] = ($val == '==') ? 0 : 1;
+		}
+		$str = '';
+		for ($i = 0; $i < count($value); $i++) {
+			if ($colspan[$i]) {
+				while ($i + $colspan[$i] < count($value) and $value[$i + $colspan[$i]] == '==') {
+					$colspan[$i]++;
+				}
+				$colspan[$i] = ($colspan[$i] > 1) ? " colspan=\"{$colspan[$i]}\"" : '';
+				$str .= "<td class=\"style_td\"{$align[$i]}{$colspan[$i]}>".inline2(inline($value[$i])).'</td>';
+			}
+		}
+		$this->elements[] = $str;
+	}
+	function canContain(&$obj)
+	{
+		return is_a($obj, 'YTable') and $obj->col == $this->col;
+	}
+	function &insert(&$obj)
+	{
+		$this->elements[] = $obj->elements[0];
+		return $this;
+	}
+	function toArray()
+	{
+		$arr = array();
+		foreach ($this->elements as $str) {
+			$arr[] = '<tr class="style_tr">';
+			$arr[] = $str;
+			$arr[] = '</tr>';
+		}
+		array_unshift($arr, '<div class="ie5">','<table class="style_table" cellspacing="1" border="0">');
+		array_push($arr,'</table>','</div>');
+		return $arr;
+	}
+}
+class Pre extends Block
+{ // ' '
+	
+	function Pre($text)
+	{
+		parent::Block();
+		$tab = 8;
+		while (preg_match('/^([^\t]*)(\t+)(.+)$/',$text,$m)) {
+			$text = $m[1].str_repeat(' ',strlen($m[2]) * $tab - strlen($m[1]) % $tab).$m[3];
+		}
+		$this->elements[] = htmlspecialchars($text,ENT_NOQUOTES);
+	}
+	function canContain(&$obj)
+	{
+		return is_a($obj, 'Pre');
+	}
+	function &insert(&$obj)
+	{
+		$this->elements[] = $obj->elements[0];
+		return $this;
+	}
+	function toArray()
+	{
+		return $this->wrap($this->elements,'pre');
+	}
+}
+class Div extends Block
+{ // #
+	var $text;
+	
+	function Div($text)
+	{
+		parent::Block();
+		$this->text = $text;
+	}
+	function canContain(&$obj)
+	{
+		return FALSE;
+	}
+	function toArray()
+	{
+		if (preg_match("/^\#([^\(]+)(.*)$/",$this->text,$out) and exist_plugin_convert($out[1])) {
+			if ($out[2]) {
+				$_plugin = preg_replace("/^\#([^\(]+)\((.*)\)$/ex","do_plugin_convert('$1','$2')",$this->text);
+			}
+			else {
+				$_plugin = preg_replace("/^\#([^\(]+)$/ex","do_plugin_convert('$1','$2')",$this->text);
+			}
+			$text = "\t$_plugin";
+		}
+		else {
+			$text = '<p>'.htmlspecialchars($this->text).'</p>';
+		}
+		return array($text);
+	}
+}
+class Align extends Body
+{ // LEFT:/CENTER:/RIGHT:
+	var $align;
+	
+	function Align($align)
+	{
+		$this->align = $align;
+	}
+	function toArray()
+	{
+		$arr = parent::toArray();
+		if (count($arr)) {
+			if (preg_match('/^(.+)style="(.+)$/',$arr[0],$matches)) {
+				$arr[0] = $matches[1].'style="text-align:'.$this->align.'; '.$matches[2];
+			}
+			else {
+				$arr[0] = preg_replace('/(<[a-z]+)/', '$1 style="text-align:'.$this->align.';"',$arr[0]);
+			}
+		}
+		return $arr;
+	}
+}
+//見出しの一覧関係
+class Contents
+{
+	var $id,$count,$top,$contents,$last;
+	function Contents($id)
+	{
+		global $top;
+		$this->id = $id;
+		$this->count = 0;
+		$this->top = "<a href=\"#contents_$id\">$top</a>";
+		$this->contents =& new Block();
+		$this->last =& $this->contents;
+	}
+	function getAnchor($text,$level)
+	{
+		$content_str = "content_{$this->id}_{$this->count}";
+		$this->last =& $this->last->add(new Contents_UList($text,$this->id,$level,$content_str));
+		$this->count++;
+		return array(inline2(inline($text)).$this->top," id=\"{$content_str}\"");
+	}
+	function replaceContents($text)
+	{
+		global $strip_link_wall;
+		
+		$contents  = "<a id=\"contents_{$this->id}\"></a>";
+		$contents .= join("\n",$this->contents->toArray());
+		if($strip_link_wall) {
+			$contents = preg_replace("/\[\[([^\]]+)\]\]/","$1",$contents);
+		}
+		return preg_replace("/^<p>#contents<\/p>/",$contents,$text);
+	}
+}
+class Contents_UList extends _List
+{ // -
+	function Contents_UList($text,$id,$level,$content_str)
+	{
+		$this->id = $id;
+		// テキストのリフォーム
+		$text = "\n<a href=\"#{$content_str}\">".
+			strip_htmltag(make_user_rules(inline($text,TRUE))).'</a>';
+		parent::_List('ul', 'li', --$level, $text);
+	}
+}
+?>

--- /dev/null
+++ b/diff.php
@@ -0,0 +1,256 @@
+<?php
+/////////////////////////////////////////////////
+// PukiWiki - Yet another WikiWikiWeb clone.
+//
+// $Id: diff.php,v 1.1 2003/01/27 05:44:11 panda Exp $
+//
+
+//衝突時に対応表を出す
+define('DIFF_SHOW_TABLE',TRUE);
+
+// 差分の作成
+function do_diff($strlines1,$strlines2)
+{
+	$obj = new line_diff();
+	return $obj->str_compare($strlines1,$strlines2);
+}
+
+// 差分の作成(更新の衝突)
+function do_update_diff($pagestr,$poststr,$original)
+{
+//	$obj = new line_diff('+','!','');
+//	$body = $obj->str_compare($oldstr,$newstr);
+//	$auto = ($obj->delete_count == 0 and $obj->add_count == 0);
+
+	$obj = new line_diff();
+	
+	$obj->set_str('left',$original,$pagestr);
+	$obj->compare();
+	$diff1 = $obj->toArray();
+	
+	$obj->set_str('right',$original,$poststr);
+	$obj->compare();
+	$diff2 = $obj->toArray();
+	
+	$arr = $obj->arr_compare('all',$diff1,$diff2);
+	
+	if (DIFF_SHOW_TABLE) {
+		global $do_update_diff_table;
+		$do_update_diff_table = '<p>l : base → pagedata<br />r : base → postdata</p>'."\n";
+		$do_update_diff_table .= '<table border="1"><tr><th>l</th><th>r</th><th>text</th></tr>'."\n";
+		foreach ($arr as $_obj) {
+			$do_update_diff_table .= '<tr><td>'.$_obj->get('left').'</td><td>'.$_obj->get('right').'</td><td>'.htmlspecialchars($_obj->text()).'</td></tr>'."\n";
+		}
+		$do_update_diff_table .= '</table>'."\n";
+	}
+	
+	$body = '';
+	foreach ($arr as $_obj) {
+		if ($_obj->get('left') != '-' and $_obj->get('right') != '-') {
+			$body .= $_obj->text();
+		}
+	}
+	
+	$auto = 1;
+	
+	return array(rtrim($body)."\n",$auto);
+}
+
+/*
+line_diffクラス
+
+以下の情報を参考にして作成しました。
+
+S. Wu, <A HREF="http://www.cs.arizona.edu/people/gene/vita.html">
+E. Myers,</A> U. Manber, and W. Miller,
+<A HREF="http://www.cs.arizona.edu/people/gene/PAPERS/np_diff.ps">
+"An O(NP) Sequence Comparison Algorithm,"</A>
+Information Processing Letters 35, 6 (1990), 317-323.
+
+*/
+
+class line_diff
+{
+	var $arr1,$arr2,$m,$n,$pos,$key,$plus,$minus,$equal,$reverse;
+	
+	function line_diff($plus='+',$minus='-',$equal=' ')
+	{
+		$this->plus = $plus;
+		$this->minus = $minus;
+		$this->equal = $equal;
+	}
+	function arr_compare($key,$arr1,$arr2)
+	{
+		$this->key = $key;
+//		array_unshift($arr1,'');
+//		array_unshift($arr2,'');
+		$this->arr1 = $arr1;
+		$this->arr2 = $arr2;
+		$this->compare();
+		$arr = $this->toArray();
+//		array_shift($arr);
+		return $arr;
+	}
+	function set_str($key,$str1,$str2)
+	{
+		$this->key = $key;
+		preg_match_all("/[^\n]*\n*/",preg_replace("/\r/",'',$str1),$arr1);
+		preg_match_all("/[^\n]*\n*/",preg_replace("/\r/",'',$str2),$arr2);
+		
+		$this->arr1 = array();
+		foreach ($arr1[0] as $line) {
+			$this->arr1[] = new DiffLine($line);
+		}
+		
+		$this->arr2 = array();
+		foreach ($arr2[0] as $line) {
+			$this->arr2[] = new DiffLine($line);
+		}
+	}
+	function str_compare($str1,$str2)
+	{
+		$this->set_str('diff',$str1,$str2);
+		$this->compare();
+		
+		$str = '';
+		foreach ($this->toArray() as $obj) {
+			$str .= $obj->get('diff').$obj->text();
+		}
+		
+		return $str;
+	}
+	function compare()
+	{
+		array_unshift($this->arr1,new DiffLine('')); //sentinel
+		array_unshift($this->arr2,new DiffLine('')); //sentinel
+		$this->reverse = (count($this->arr1) > count($this->arr2));
+		if ($this->reverse) {
+			$tmp = $this->arr1;
+			$this->arr1 = $this->arr2;
+			$this->arr2 = $tmp;
+			unset($tmp);
+		}
+		$this->m = count($this->arr1) - 1;
+		$this->n = count($this->arr2) - 1;
+		$this->pos = array(0=>array('x'=>-1,'y'=>-1)); //sentinel
+		if ($this->m <= 0) {
+			$this->pos[] = array('x'=>$this->m + 1, 'y' => $this->n + 1);
+			return;
+		}
+		$delta = $this->n - $this->m; // must be >=0;
+		$fp = array();
+		for ($p = -($this->m)-1; $p <= $this->n + 1; $p++) {
+			$fp[$p] = -1;
+		}
+		
+		for ($p = 0;; $p++) {
+			for ($k = -$p; $k < $delta; $k++) {
+				$fp[$k] = $this->snake($k, max($fp[$k - 1] + 1, $fp[$k + 1]));
+			}
+			
+			for ($k = $delta + $p; $k > $delta; $k--) {
+				$fp[$k] = $this->snake($k, max($fp[$k - 1] + 1, $fp[$k + 1]));
+			}
+			
+			$fp[$delta] = $this->snake($delta, max($fp[$delta - 1] + 1, $fp[$delta + 1]));
+			
+			if ($fp[$delta] == $this->n) {
+				$this->pos = array_reverse($this->pos);
+				$this->pos[] = array('x'=>$this->m + 1, 'y' => $this->n + 1); // sentinel
+				
+				return;
+			}
+		}
+	}
+	function snake($k, $y)
+	{
+		$x = $y - $k;
+		while (($x < $this->m) and ($y < $this->n) and $this->arr1[$x + 1]->compare($this->arr2[$y + 1])) {
+			
+			$x++; $y++;
+			if ($x > $this->pos[0]['x'] and $y > $this->pos[0]['y']) {
+				array_unshift($this->pos,array('x'=>$x,'y'=>$y));
+			}
+		}
+		return $y;
+	}
+	function strcmp($str1, $str2) //ぐぅ。
+	{
+		return rtrim($str1) == rtrim($str2);
+	}
+	function toArray()
+	{
+		$arr = array();
+		if ($this->reverse) { //姑息な…
+			$_x = 'y'; $_y = 'x'; $m = $this->n; $arr1 =& $this->arr2; $arr2 =& $this->arr1;
+		}
+		else {
+			$_x = 'x'; $_y = 'y'; $m = $this->m; $arr1 =& $this->arr1; $arr2 =& $this->arr2;
+		}
+		
+		$x = $y = 0;
+		$this->add_count = $this->delete_count = 0;
+		foreach ($this->pos as $pos) {
+			$this->delete_count += ($pos[$_x] - $x);
+			$this->add_count += ($pos[$_y] - $y);
+			
+			while ($pos[$_x] > $x) {
+				$arr1[$x]->set($this->key,$this->minus);
+				$arr[] = $arr1[$x++];
+			}
+			
+			while ($pos[$_y] > $y) {
+				$arr2[$y]->set($this->key,$this->plus);
+				$arr[] =  $arr2[$y++];
+			}
+			
+			if ($x <= $this->m) {
+				$arr1[$x]->merge($arr2[$y]);
+				$arr1[$x]->set($this->key,$this->equal);
+				$arr[] = $arr1[$x];
+			}
+			$x++; $y++;
+		}
+		array_shift($arr); // drop sentinel
+		return $arr;
+	}
+}
+
+class DiffLine
+{
+	var $text,$lfcount;
+	var $status;
+	
+	function DiffLine($text)
+	{
+		if (preg_match("/^([^\n]*)(\n*)$/",$text,$matches)) {
+			$this->text = $matches[1]; $this->lfcount = strlen($matches[2]);
+		}
+		else {
+			$this->text = $text; $this->lfcount = 1;
+		}
+		$this->status = array();
+	}
+	function compare($obj)
+	{
+		return $this->text == $obj->text;
+	}
+	function set($key,$status)
+	{
+		$this->status[$key] = $status;
+	}
+	function get($key)
+	{
+		return array_key_exists($key,$this->status) ? $this->status[$key] : '';
+	}
+	function merge($obj)
+	{
+		$this->status = array_merge($this->status,$obj->status);
+		$this->lfcount = max($this->lfcount,$obj->lfcount);
+	}
+	function text()
+	{
+		return $this->text.str_repeat("\n",($this->lfcount == 0) ? 1 : $this->lfcount);
+	}
+}
+?>

--- /dev/null
+++ b/mysql.php
@@ -0,0 +1,37 @@
+<?php
+/////////////////////////////////////////////////
+// PukiWiki - Yet another WikiWikiWeb clone.
+//
+// $Id: mysql.php,v 1.1 2003/01/27 05:44:11 panda Exp $
+//
+
+function db_exec($sql)
+{
+	$conn = mysql_pconnect()
+		or die_message('cannot connect db.');
+	mysql_select_db('pukiwiki',$conn)
+		or die_message('cannot select db.');
+	$result = mysql_query($sql,$conn)
+		or die_message("query '$sql' failure.\n".mysql_error($conn));
+	return $result;
+}
+
+
+function db_query($sql)
+{
+	$result = db_exec($sql);
+	
+	$rows = array();
+	while ($row = mysql_fetch_array($result)) {
+		$rows[] = $row;
+	}
+	mysql_free_result($result);
+
+	return $rows;
+}
+
+/*
+create table page (id integer auto_increment primary key, name text not null, lastmod integer not null);
+create table link (page_id integer not null, ref_id integer not null);
+*/
+?>

--- /dev/null
+++ b/pgsql.php
@@ -0,0 +1,35 @@
+<?php
+/////////////////////////////////////////////////
+// PukiWiki - Yet another WikiWikiWeb clone.
+//
+// $Id: pgsql.php,v 1.1 2003/01/27 05:44:11 panda Exp $
+//
+
+function db_exec($sql)
+{
+	$conn = pg_pconnect(PG_CONNECT_STRING)
+		or die_message('cannot connect db.');
+	$result = pg_query($conn,$sql)
+		or die_message("query '$sql' failure.");
+	return $result;
+}
+
+function db_query($sql)
+{
+	$result = db_exec($sql);
+	
+	$rows = array();
+	while ($row = pg_fetch_array($result)) {
+		$rows[] = $row;
+	}
+	pg_free_result($result);
+	
+	return $rows;
+}
+
+/*
+create table page (id serial primary key, name text not null, lastmod integer not null);
+create table link (page_id integer not null, ref_id integer not null);
+grant all on page,link,page_id_seq to apache;
+*/
+?>