classes/miniwiki.php

   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                          "'$0'",
  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', "'$1<h'.mb_strlen('$2').'>$3</h'.mb_strlen('$2').'>'",
  70                                                   "'$1$3'", "!titre1\n\n!!titre2\n\n!!!titre3");
  71
  72         // links
  73         MiniWiki::Markup('/((?:https?|ftp):\/\/(?:[\.\,\;\!\:]*[\w@~%$£µ&i#\-+=_\/\?])*)/ui', '<a href="\\0">\\0</a>', '<\\0>');
  74         MiniWiki::Markup('/(\s|^|\\[\\[)www\.((?:[\.\,\;\!\:]*[\w@~%$£µ&i#\-+=_\/\?])*)/iu', '\\1<a href="http://www.\\2">www.\\2</a>', '<http://www.\\2>');
  75         MiniWiki::Markup('/(?:mailto:)?([a-z0-9.\-+_]+@([\-.+_]?[a-z0-9])+)/i', '<a href="mailto:\\0">\\0</a>', '<\\0>');
  76         MiniWiki::Markup('/\\[\\[\\s*<a href="([^>]*)">.*<\/a>\\s*\|([^\\]]+)\\]\\]/i', '<a href="\\1">\\2</a>', '\\2 <\\1>', "[[http://www.example.com|Mon site web]]\n\nhttp://www.example.com\n\ntest@example.com");
  77
  78         // paragraphs and empty lines
  79         MiniWiki::Markup("/\n\n/", '</p><p>', "\n\n", "paragraphe1\n\nparagraphe2");
  80         MiniWiki::Markup("/\n/", ' ', "\n");
  81         MiniWiki::Markup("/^.*<\/p>.*<p>.*$/s", "<p>$0</p>", "$0");
  82     }
  83
  84     public static function WikiToHTML($wiki, $title = false)
  85     {
  86         if (!$title) {
  87             $oldrule12 = MiniWiki::$replacementHTML[MiniWiki::$title_index];
  88             MiniWiki::$replacementHTML[MiniWiki::$title_index] = "'$0'";
  89         }
  90         $html = preg_replace(MiniWiki::$patternsWiki,
  91                              MiniWiki::$replacementHTML,
  92                              htmlentities(trim($wiki), ENT_COMPAT, 'UTF-8'));
  93         if (!$title) {
  94             MiniWiki::$replacementHTML[MiniWiki::$title_index] = $oldrule12;
  95         }
  96         return $html;
  97     }
  98
  99     private static function justify($text, $n)
 100     {
 101         $arr = explode("\n", wordwrap($text, $n));
 102         $arr = array_map('trim', $arr);
 103         $res = '';
 104         foreach ($arr as $key => $line) {
 105             $nxl       = isset($arr[$key+1]) ? trim($arr[$key+1]) : '';
 106             $nxl_split = preg_split('! +!u', $nxl);
 107             $nxw_len   = count($nxl_split) ? mb_strlen($nxl_split[0]) : 0;
 108             $line      = trim($line);
 109
 110             if (mb_strlen($line)+1+$nxw_len < $n) {
 111                 $res .= "$line\n";
 112                 continue;
 113             }
 114
 115             if (preg_match('![.:;]$!u',$line)) {
 116                 $res .= "$line\n";
 117                 continue;
 118             }
 119
 120             $tmp   = preg_split('! +!u', trim($line));
 121             $words = count($tmp);
 122             if ($words <= 1) {
 123                 $res .= "$line\n";
 124                 continue;
 125             }
 126
 127             $len   = array_sum(array_map('mb_strlen', $tmp));
 128             $empty = $n - $len;
 129             $sw    = floatval($empty) / floatval($words-1);
 130
 131             $cur = 0;
 132             $l   = '';
 133             foreach ($tmp as $word) {
 134                 $l   .= $word;
 135                 $cur += $sw + strlen($word); // Use strlen here instead of mb_strlen because it is used by str_pad
 136                                              // which is not multibyte compatible
 137                 $l   = str_pad($l, intval($cur + 0.5));
 138             }
 139             $res .= trim($l)."\n";
 140         }
 141         return trim($res);
 142     }
 143
 144
 145     public static function WikiToText($wiki, $just=false, $indent=0, $width=68, $title=false)
 146     {
 147         if (!$title) {
 148             $oldrule12 = MiniWiki::$replacementHTML[MiniWiki::$title_index];
 149             MiniWiki::$replacementHTML[MiniWiki::$title_index] = "'$0'";
 150         }
 151         //$text = trim($wiki);
 152         //foreach (MiniWiki::$patternsWiki as $key=>$pattern) {
 153         //    echo $key . " -  " . $pattern . "\n";
 154         //    $text = preg_replace($pattern, MiniWiki::$replacementText[$key], $text);
 155         //}
 156         $text = preg_replace(MiniWiki::$patternsWiki, MiniWiki::$replacementText, trim($wiki));
 157         if (!$title) {
 158             MiniWiki::$replacementHTML[MiniWiki::$title_index] = $oldrule12;
 159         }
 160         $text = $just ? MiniWiki::justify($text, $width - $indent) :  wordwrap($text, $width - $indent);
 161         if($indent) {
 162             $ind = str_pad('',$indent);
 163             $text = $ind.str_replace("\n","\n$ind",$text);
 164         }
 165         return $text;
 166     }
 167
 168     static public function help($with_title = false)
 169     {
 170         if (!$with_title) {
 171             $info12 = MiniWiki::$info[MiniWiki::$title_index];
 172             unset(MiniWiki::$info[MiniWiki::$title_index]);
 173         }
 174
 175         $res = array();
 176         foreach (MiniWiki::$info as $value) {
 177             $res[$value] = MiniWiki::wikiToHtml($value, true);
 178         }
 179
 180         if (!$with_title) {
 181             MiniWiki::$info[MiniWiki::$title_index] = $info12;
 182         }
 183         return $res;
 184     }
 185 }
 186
 187 MiniWiki::init();
 188
 189 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 190 ?>