自分で書いた UBB 変換関数

ubb|函数|转换

function ubb2xhtml($ubb)
{
$flash= codebase="" width="%1$d " height="%2$d">




END;
$match = array
(
@#%[url=([^s]+)](.*?)[/url]%s@#,
@#%[email=( [^s])+](.*?)[/email]%i@#,
@#%[img width=(d+) height=(d+)](.*?)[/img]%s@ #,
@#%[img=([^s]+)/]%s@#,
@#%[フラッシュ幅=(d+) 高さ=(d+)](.*?)[/フラッシュ]% se@#,
@#%[(b|i|u|strike|sup|sub)](.*?)[/1]%s@#,
@#%[h([1-6]) ](.*?)[/h1]%s@#,
@#%[hr/]%s@#,
@#%[color=([^s]+)](.*?)[/ color]%s@#,
@#%[font=([^"]+)](.*?)[/font]%s@#,
@#%[size=([^s]+) ](.*?)[/size]%s@#,
@#%[align=(center|right|left)](.*?)[/align]%s@#,
@#%[valign =(真ん中|上|下)](.*?)[/valign]%s@#,
/*
@#%[ul](.*?)[/ul]%s@#,
@# %[ul=(circle|disc|square)](.*?)[/ul]%s@#,
@#%[ol](.*?)[/ol]%s@#,
@# %[ol type=([aAiI1]) start=([a-zA-Z1-9])](.*?)[/ol]%s@#,
@#%[li](.*?) [/li]%s@#,
*/
@#%[table=([^s]+?)](.*?)[/table]%s@#,
@#%[caption]( .*?)[/caption]%s@#,
@#%[tr=([^s]+?)](.*?)[/tr]%s@#,
@#%[th] (.*?)[/th]%s@#,
@#%[td](.*?)[/td]%s@#,
@#%[note](.*?)[/note ]%s@#,
@#%[quote=(.*?)](.*?)[/quote]%s@#,
@#%[code](.*?)[/code]% s@#,
@#%[ ]{2}%s@#, // ダブルスペースを本当にダブルスペースにします!
);
$replace = array
(
@#2@#,
@#2@#,
@#@#,
@#@#,
@#sprintf(" $flash", "1", "2", "3")@#,
@#21>@#,
@#

2

@#,
@#

---

n@#,
@#2@#,
@#2@ #,
@#2@#,
@#

2@#,
@#

2@#,
/*
@#

1

@#,
@#

2

> ;@#,
@#

1

@#,
@#

3

@#,
@#1@#,
*/
"n$2",
"t$1 ;n",
"tn$2tn",
"tt$1n",
"tt$1n",
@#

発行者备注

---

1

@# ,
@#

参照(来源: 1)
2

@#,
@#代码

1

@#,
@# @#,
);
if( preg_match(@#%[table=(.*?)/table]%s@#, $ubb, $tablecells) ) //如果有表格、先去除单元格之间の多残り空白
{
$bb=preg_replace(@#%]([rns]*)[%si@#, @#][@#, $tablecells[1]);
$ubb=str_replace($tablecells[1], $bb, $ubb);
}
$html = preg_replace($match, $replace, nl2br(htmlspecialchars($ubb)));
$html = preg_replace(@#/
s* $html を返す;
}