| 1 | <?php |
| 2 | |
| 3 | class MiniWiki |
| 4 | { |
| 5 | |
| 6 | private static $patternsWiki = array(); |
| 7 | private static $replacementHTML = array(); |
| 8 | private static $replacementText = array(); |
| 9 | |
| 10 | private static $title_index = -1; |
| 11 | private static $info = array(); |
| 12 | |
| 13 | public static function Markup($pattern, $replacement, $replacementTxt, $info = null) |
| 14 | { |
| 15 | $id = count(MiniWiki::$patternsWiki); |
| 16 | MiniWiki::$patternsWiki[$id] = $pattern; |
| 17 | MiniWiki::$replacementHTML[$id] = $replacement; |
| 18 | MiniWiki::$replacementText[$id] = $replacementTxt; |
| 19 | if ($info) { |
| 20 | MiniWiki::$info[$id] = $info; |
| 21 | } |
| 22 | return $id; |
| 23 | } |
| 24 | |
| 25 | public static function init() |
| 26 | { |
| 27 | if (isset(MiniWiki::$patternsWiki[0])) { |
| 28 | return; |
| 29 | } |
| 30 | MiniWiki::Markup("/(\r\n|\r([^\n]))/", "\n$2", "\n$2"); |
| 31 | |
| 32 | // retours à la ligne avec \\ |
| 33 | MiniWiki::Markup("/\\\\(?".">(\\\\*))\n/e", "str_repeat('<br />\n',mb_strlen('$1'))", "str_repeat('\n',mb_strlen('$1'))", "ligne1\\\\\nligne2"); |
| 34 | |
| 35 | // * unordered list |
| 36 | MiniWiki::Markup("/(^|\n)\*(([^\n]*(\n|$))(\*[^\n]*(\n|$))*)/se", |
| 37 | "'</p><ul><li>'.str_replace(\"\\n*\",'</li><li>','$2').'</li></ul><p>'", |
| 38 | "'$1 -' . str_replace(\"\\n*\", \"\\n -\", '$2')", |
| 39 | "* element1\n* element2\n* element3"); |
| 40 | // # unordered list |
| 41 | MiniWiki::Markup("/(^|\n)#(([^\n]*(\n|$))(#[^\n]*(\n|$))*)/se", "'<ol><li>'.str_replace(\"\\n#\",'</li><li>','$2').'</li></ol>'", "'$0'", "# element1\n# element2\n# element3"); |
| 42 | |
| 43 | // bold, italic and others |
| 44 | // ''' bold ''' |
| 45 | MiniWiki::Markup("/'''(.*?)'''/",'<strong>$1</strong>','*$1*', "'''gras'''"); |
| 46 | // '' italic '' |
| 47 | MiniWiki::Markup("/''(.*?)''/",'<em>$1</em>','/$1/', "''italique''"); |
| 48 | // '+ big +' |
| 49 | MiniWiki::Markup("/'\\+(.*?)\\+'/",'<big>$1</big>','*$1*', "'+grand+'"); |
| 50 | // '- small -' |
| 51 | MiniWiki::Markup("/'\\-(.*?)\\-'/",'<small>$1</small>','$1', "'-petit-'"); |
| 52 | // '^superscript^' |
| 53 | MiniWiki::Markup("/'\\^(.*?)\\^'/",'<sup>$1</sup>','$1', "'^exposant^'"); |
| 54 | // '_subscript_' |
| 55 | MiniWiki::Markup("/'_(.*?)_'/",'<sub>$1</sub>','$1', "'_indice_'"); |
| 56 | // {+ underline +} |
| 57 | MiniWiki::Markup("/\\{\\+(.*?)\\+\\}/",'<ins>$1</ins>','_$1_', "{+insertion+}"); |
| 58 | // {- strikeout -} |
| 59 | MiniWiki::Markup("/\\{-(.*?)-\\}/",'<del>$1</del>','-$1-', "{-suppression-}"); |
| 60 | // {color| colored text |} |
| 61 | MiniWiki::Markup("/%([a-z]+|\#[0-9a-f]{3,6})%(.*?)%%/i", "<span style='color: $1;'>$2</span>", "$2", |
| 62 | "%red% texte en rouge %%\\\\\n%#ff0% texte en jaune %%\\\\\n%#0000ff% texte en bleu %%"); |
| 63 | // [+ big +] [++ bigger ++] [+++ even bigger +++] ... |
| 64 | MiniWiki::Markup("/\\[(([-+])+)(.*?)\\1\\]/e","'<span style=\'font-size:'.(round(pow(6/5,$2mb_strlen('$1'))*100,0)).'%\'>$3</span>'", "'$3'", "[+ grand +]\n\n[++ plus grand ++]\n\n[+++ encore plus grand +++]"); |
| 65 | |
| 66 | // ----- <hr/> |
| 67 | MiniWiki::Markup("/(\n|^)--(--+| \n)/s", '$1<hr/>', '$1-- '."\n", "----\n"); |
| 68 | // titles |
| 69 | MiniWiki::$title_index = MiniWiki::Markup('/(\n|^)(!+)([^\n]*)/se', |
| 70 | "'$1<h'.mb_strlen('$2').'>$3</h'.mb_strlen('$2').'>'", |
| 71 | "'$1$3'", "!titre1\n\n!!titre2\n\n!!!titre3"); |
| 72 | |
| 73 | // links |
| 74 | MiniWiki::Markup('/((?:https?|ftp):\/\/(?:[\.\,\;\!\:]*[\w@~%$£µ&i#\-+=_\/\?])*)/ui', |
| 75 | '<a href="\\0">\\0</a>', '<\\0>'); |
| 76 | MiniWiki::Markup('/(\s|^|\[\[)www\.((?:[\.\,\;\!\:]*[\w@~%$£µ&i#\-+=_\/\?])*)/iu', |
| 77 | '\\1<a href="http://www.\\2">www.\\2</a>', '\\1<http://www.\\2>'); |
| 78 | MiniWiki::Markup('/(?:mailto:)?([a-z0-9.\-+_]+@([\-.+_]?[a-z0-9])+)/i', '<a href="mailto:\\0">\\0</a>', '<\\0>'); |
| 79 | MiniWiki::Markup('/\[\[\s*<(?:a href=")?([^">]*?)(?:">.*?<\/a)?>\s*\|([^\]]+)\]\]/i', |
| 80 | '<a href="\\1">\\2</a>', '\\2 <\\1>', |
| 81 | "[[http://www.example.com|Mon site web]]\n\nhttp://www.example.com\n\ntest@example.com"); |
| 82 | |
| 83 | // paragraphs and empty lines |
| 84 | MiniWiki::Markup("/\n\n/", '</p><p>', "\n\n", "paragraphe1\n\nparagraphe2"); |
| 85 | MiniWiki::Markup("/\n/", ' ', "\n"); |
| 86 | MiniWiki::Markup("/^.*<\/p>.*<p>.*$/s", "<p>$0</p>", "$0"); |
| 87 | |
| 88 | // french typo rules, unbreakable spaces |
| 89 | MiniWiki::Markup("/ +([!?:;])/", " $1", "$0"); |
| 90 | } |
| 91 | |
| 92 | public static function WikiToHTML($wiki, $title = false) |
| 93 | { |
| 94 | if (!$title) { |
| 95 | $oldrule12 = MiniWiki::$replacementHTML[MiniWiki::$title_index]; |
| 96 | MiniWiki::$replacementHTML[MiniWiki::$title_index] = "'$0'"; |
| 97 | } |
| 98 | $html = preg_replace(MiniWiki::$patternsWiki, |
| 99 | MiniWiki::$replacementHTML, |
| 100 | htmlentities(trim($wiki), ENT_COMPAT, 'UTF-8')); |
| 101 | if (!$title) { |
| 102 | MiniWiki::$replacementHTML[MiniWiki::$title_index] = $oldrule12; |
| 103 | } |
| 104 | return $html; |
| 105 | } |
| 106 | |
| 107 | private static function justify($text, $n) |
| 108 | { |
| 109 | $arr = explode("\n", wordwrap($text, $n)); |
| 110 | $arr = array_map('trim', $arr); |
| 111 | $res = ''; |
| 112 | foreach ($arr as $key => $line) { |
| 113 | $nxl = isset($arr[$key+1]) ? trim($arr[$key+1]) : ''; |
| 114 | $nxl_split = preg_split('! +!u', $nxl); |
| 115 | $nxw_len = count($nxl_split) ? mb_strlen($nxl_split[0]) : 0; |
| 116 | $line = trim($line); |
| 117 | |
| 118 | if (mb_strlen($line)+1+$nxw_len < $n) { |
| 119 | $res .= "$line\n"; |
| 120 | continue; |
| 121 | } |
| 122 | |
| 123 | if (preg_match('![.:;]$!u',$line)) { |
| 124 | $res .= "$line\n"; |
| 125 | continue; |
| 126 | } |
| 127 | |
| 128 | $tmp = preg_split('! +!u', trim($line)); |
| 129 | $words = count($tmp); |
| 130 | if ($words <= 1) { |
| 131 | $res .= "$line\n"; |
| 132 | continue; |
| 133 | } |
| 134 | |
| 135 | $len = array_sum(array_map('mb_strlen', $tmp)); |
| 136 | $empty = $n - $len; |
| 137 | $sw = floatval($empty) / floatval($words-1); |
| 138 | |
| 139 | $cur = 0; |
| 140 | $l = ''; |
| 141 | foreach ($tmp as $word) { |
| 142 | $l .= $word; |
| 143 | $cur += $sw + strlen($word); // Use strlen here instead of mb_strlen because it is used by str_pad |
| 144 | // which is not multibyte compatible |
| 145 | $l = str_pad($l, intval($cur + 0.5)); |
| 146 | } |
| 147 | $res .= trim($l)."\n"; |
| 148 | } |
| 149 | return trim($res); |
| 150 | } |
| 151 | |
| 152 | |
| 153 | public static function WikiToText($wiki, $just=false, $indent=0, $width=68, $title=false) |
| 154 | { |
| 155 | if (!$title) { |
| 156 | $oldrule12 = MiniWiki::$replacementHTML[MiniWiki::$title_index]; |
| 157 | MiniWiki::$replacementHTML[MiniWiki::$title_index] = "'$0'"; |
| 158 | } |
| 159 | //$text = trim($wiki); |
| 160 | //foreach (MiniWiki::$patternsWiki as $key=>$pattern) { |
| 161 | // echo $key . " - " . $pattern . "\n"; |
| 162 | // $text = preg_replace($pattern, MiniWiki::$replacementText[$key], $text); |
| 163 | //} |
| 164 | $text = preg_replace(MiniWiki::$patternsWiki, MiniWiki::$replacementText, trim($wiki)); |
| 165 | if (!$title) { |
| 166 | MiniWiki::$replacementHTML[MiniWiki::$title_index] = $oldrule12; |
| 167 | } |
| 168 | $text = $just ? MiniWiki::justify($text, $width - $indent) : wordwrap($text, $width - $indent); |
| 169 | if($indent) { |
| 170 | $ind = str_pad('',$indent); |
| 171 | $text = $ind.str_replace("\n","\n$ind",$text); |
| 172 | } |
| 173 | return $text; |
| 174 | } |
| 175 | |
| 176 | static public function help($with_title = false) |
| 177 | { |
| 178 | if (!$with_title) { |
| 179 | $info12 = MiniWiki::$info[MiniWiki::$title_index]; |
| 180 | unset(MiniWiki::$info[MiniWiki::$title_index]); |
| 181 | } |
| 182 | |
| 183 | $res = array(); |
| 184 | foreach (MiniWiki::$info as $value) { |
| 185 | $res[$value] = MiniWiki::wikiToHtml($value, true); |
| 186 | } |
| 187 | |
| 188 | if (!$with_title) { |
| 189 | MiniWiki::$info[MiniWiki::$title_index] = $info12; |
| 190 | } |
| 191 | return $res; |
| 192 | } |
| 193 | } |
| 194 | |
| 195 | MiniWiki::init(); |
| 196 | |
| 197 | // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: |
| 198 | ?> |