'."\n";
}else if (preg_match("/^\.([^\.\#\{]*)\{$/", $start_line, $data)){
$result = '
'."\n";
}else if (preg_match("/^\#([^\.\#\{]*)\{$/", $start_line, $data)){
$result = '
'."\n";
}
array_pop($buffer);
$result .= $this->cording_p($buffer)."
\n";
return $result;
}
function cording_table($buffer){
/* DEBUG */ global $_debug;
$result = "
\n";
$end = count($buffer);
for ($i=0; $i<$end; $i++){
$line = $buffer[$i];
$tr = $this->line2tr($line);
$result .= ' '."\n";
$fin = count($tr);
for ($g=0; $g<$fin; $g++){
$result .= ' <'.$tr[$g]['type'].' class="'.$tr[$g]['class'].'"';
if ($tr[$g]['colspan']){
$result .= ' colspan="'.$tr[$g]['colspan'].'"';
}
if ($tr[$g]['rowspan']){
$result .= ' rowspan="'.$tr[$g]['rowspan'].'"';
}
$result .= ">\n";
$result .= ' '.$this->cording_p(array($tr[$g]['body']), FALSE)."\n";
$result .= ' \n";
}
$result .= "
\n";
}
$result .= "
\n";
/* DEBUG */ if ($_debug) echo "[cording_table] table :\n";
/* DEBUG */ if ($_debug) echo $result;
return $result;
}
function line2tr($line){
/* DEBUG */ global $_debug;
$end = preg_match_all("/([\^\|][^\^\|]+)/", $line, $array);
/* DEBUG */ if ($_debug) echo "[line2tr] array :\n";
/* DEBUG */ if ($_debug) print_r($array);
$type = array("^" => "th", "|" => "td");
for ($i=0; $i<$end; $i++){
if (preg_match("/^([\^\|])([ ]*)([^>_ ]*)([ ]*)$/", $array[0][$i], $td_raw[$i])){
/* DEBUG */ if ($_debug) echo "[line2tr] A>td_raw[$i] :\n";
/* DEBUG */ if ($_debug) print_r($td_raw[$i]);
$td_type = $type[$td_raw[$i][1]];
$td_colspan = FALSE;
$td_rowspan = FALSE;
$td_body = $td_raw[$i][3];
if (strlen($td_raw[$i][2]) > 1 && strlen($td_raw[$i][4]) > 1){
$td_class = "col".$i." centeralign";
}else if (strlen($td_raw[$i][2]) > 1){
$td_class = "col".$i." rightalign";
}else if (strlen($td_raw[$i][4]) > 1){
$td_class = "col".$i." leftalign";
}else{
$td_class = "col".$i;
}
}else if (preg_match("/([\^\|])>([0-9]*)([ ]*)([^>_ ]*)([ ]*)$/", $array[0][$i], $td_raw[$i])){
/* DEBUG */ if ($_debug) echo "[line2tr] B>td_raw[$i] :\n";
/* DEBUG */ if ($_debug) print_r($td_raw[$i]);
$td_type = $type[$td_raw[$i][1]];
$td_colspan = $td_raw[$i][2];
$td_rowspan = FALSE;
$td_body = $td_raw[$i][4];
if (strlen($td_raw[$i][3]) > 1 && strlen($td_raw[$i][5]) > 1){
$td_class = "col".$i." centeralign";
}else if (strlen($td_raw[$i][3]) > 1){
$td_class = "col".$i." rightalign";
}else if (strlen($td_raw[$i][5]) > 1){
$td_class = "col".$i." leftalign";
}else{
$td_class = "col".$i;
}
}else if (preg_match("/([\^\|])_([0-9]*)([ ]*)([^>_ ]*)([ ]*)$/", $array[0][$i], $td_raw[$i])){
/* DEBUG */ if ($_debug) echo "[line2tr] C>td_raw[$i] :\n";
/* DEBUG */ if ($_debug) print_r($td_raw[$i]);
$td_type = $type[$td_raw[$i][1]];
$td_colspan = FALSE;
$td_rowspan = $td_raw[$i][2];
$td_body = $td_raw[$i][4];
if (strlen($td_raw[$i][3]) > 1 && strlen($td_raw[$i][5]) > 1){
$td_class = "col".$i." centeralign";
}else if (strlen($td_raw[$i][3]) > 1){
$td_class = "col".$i." rightalign";
}else if (strlen($td_raw[$i][5]) > 1){
$td_class = "col".$i." leftalign";
}else{
$td_class = "col".$i;
}
}else if (preg_match("/([\^\|])>([0-9]*)_([0-9]*)([ ]*)([^>_ ]*)([ ]*)$/", $array[0][$i], $td_raw[$i])){
/* DEBUG */ if ($_debug) echo "[line2tr] D>td_raw[$i] :\n";
/* DEBUG */ if ($_debug) print_r($td_raw[$i]);
$td_type = $type[$td_raw[$i][1]];
$td_colspan = $td_raw[$i][2];
$td_rowspan = $td_raw[$i][3];
$td_body = $td_raw[$i][5];
if (strlen($td_raw[$i][4]) > 1 && strlen($td_raw[$i][6]) > 1){
$td_class = "col".$i." centeralign";
}else if (strlen($td_raw[$i][4]) > 1){
$td_class = "col".$i." rightalign";
}else if (strlen($td_raw[$i][6]) > 1){
$td_class = "col".$i." leftalign";
}else{
$td_class = "col".$i;
}
}
/* DEBUG */ if ($_debug) echo "[line2tr] :\n";
/* DEBUG */ if ($_debug) echo "type =".$td_type."\n";
/* DEBUG */ if ($_debug) echo "colspan =".$td_colspan."\n";
/* DEBUG */ if ($_debug) echo "rowspan =".$td_rowspan."\n";
/* DEBUG */ if ($_debug) echo "class =".$td_class."\n";
/* DEBUG */ if ($_debug) echo "body =".$td_body."\n";
$tr[$i] = array("type" => $td_type, "colspan" => $td_colspan, "rowspan" => $td_rowspan, "class" => $td_class, "body" => $td_body);
}
/* DEBUG */ if ($_debug) echo "[line2tr] tr :\n";
/* DEBUG */ if ($_debug) print_r($tr);
return $tr;
}
function cording_list($buffer){
$end = count($buffer);
for ($i=0; $i<$end; $i++){
$line = $buffer[$i];
if (preg_match("/^([ ]+)- ?(.*)$/", $line, $data)){
$list[$i] = array('type' => 'ol', 'level' => floor(strlen($data[1])/2), 'body' => $data[2]);
}else if (preg_match("/^([ ]+)\* ?(.*)$/", $line, $data)){
$list[$i] = array('type' => 'ul', 'level' => floor(strlen($data[1])/2), 'body' => $data[2]);
}
}
$line = $list[0];
$last_type = $line['type'];
$last_level = $line['level'];
$open_tag = array($last_type);
$result = "<".$last_type.' class="level_'.$last_level.'">'."\n".str_repeat(" ", ($last_level-1)*2+2).'
'.$this->cording_p(array($line['body']), FALSE)."\n";
for ($i=1; $i<$end; $i++){
$line = $list[$i];
$now_type = $line['type'];
$now_level = $line['level'];
if ($now_level > $last_level){
array_unshift($open_tag, $now_type);
$result .= str_repeat(" ", ($last_level-1)*2+2)."<".$now_type.' class="level_'.$now_level.'">'."\n".str_repeat(" ", ($now_level-1)*2+2).'
'.$this->cording_p(array($line['body']), FALSE)."\n";
}else if ($now_level < $last_level){
array_shift($open_tag);
$result .= str_repeat(" ", ($last_level-1)*2)."\n".str_repeat(" ", ($now_level-1)*2+2).'
'.$this->cording_p(array($line['body']), FALSE)."\n";
}else{
$result .= str_repeat(" ", ($now_level-1)*2+2).'
'.$this->cording_p(array($line['body']), FALSE)."\n";
}
$last_type = $now_type;
$last_level = $now_level;
}
$end = count($open_tag);
for ($i=0; $i<$end; $i++){
$line = $open_tag[$i];
$result .= str_repeat(" ", ($last_level-1)*2)."\n";
$last_level --;
}
return $result;
}
function cording_blockquote($buffer){}
function cording_code($buffer){}
function cording_heading($buffer){
$end = count($buffer);
for ($i=0; $i<$end; $i++){
$str = $buffer[$i];
$str = preg_replace("/^===== ?([^\=]*)$/", "
$1
\n", $str);
$str = preg_replace("/^==== ?([^\=]*)$/", "
$1
\n", $str);
$str = preg_replace("/^=== ?([^\=]*)$/", "
$1
\n", $str);
$str = preg_replace("/^== ?([^\=]*)$/", "
$1
\n", $str);
$result .= $str;
}
return $result;
}
function get_type($line){
$str1 = substr($line, 0, 1);
$str2 = substr($line, 0, 2);
$str3 = substr($line, 0, 3);
static $mode_fix = FALSE;
static $result;
if ($line == ""){
$result = "EOF";
}else if (!$mode_fix){
if ($str2 === "=="){
$result = "cording_heading";
}else if (preg_match("/^[\^\|]([^\^\|]*)[\^\|]/",$line)){
$result = "cording_table";
}else if (preg_match("/^ +[\*-](.*)/", $line)){
$result = "cording_list";
}else if (preg_match("/^
$/", $line)){
$result = "cording_code";
$mode_fix = TRUE;
}else if (preg_match("/^[\.\#]([^\{]*)\{$/", $line)){
$result = "cording_div";
$mode_fix = TRUE;
}else if ($line === "}"){
$result = "cording_div";
}else{
$result = "cording_p";
}
}else if (($result === "cording_code" && $line === "＜/code＞") || ($result === "cording_div" && $line === "}")){
$mode_fix = FALSE;
}
return $result;
}
function is_buffer($current_line, $follow_line){
global $_cording;
$result = FALSE;
if (($_cording = $this->get_type($current_line)) == $this->get_type($follow_line)){
$result = TRUE;
}
return $result;
}
function cording_start($text){
global $_cording;
$corded = array();
$buffer = array();
$before_cording = preg_split("/[\r\n]/", $text, -1, PREG_SPLIT_NO_EMPTY);
$end = count($before_cording);
for ($i=0; $i<$end; $i++){
$current_line = $before_cording[$i];
$follow_line = $before_cording[$i+1];
array_push ($buffer, $current_line);
if (!$this->is_buffer($current_line, $follow_line)){
array_push ($corded, $this->$_cording($buffer));
$buffer = array();
}
}
$this->cording_finish($corded);
}
function cording_finish($corded = array()){
while ($line = array_shift($corded)){
echo $line."\n";
}
}
}
?>