/text.wiki2xhtml/class.wiki2xhtml.php
PHP | 1316 lines | 930 code | 180 blank | 206 comment | 210 complexity | bab7ce5327cf02c2078c45f6476eb8c5 MD5 | raw file
- <?php
- ###########################################################
- # /!\ /!\ /!\ EDIT THIS FILE IN UTF8 /!\ /!\ /!\ #
- ###########################################################
- # ***** BEGIN LICENSE BLOCK *****
- # This file is part of Clearbricks.
- # Copyright (c) 2003-2013 Olivier Meunier & Association Dotclear
- # All rights reserved.
- #
- # Clearbricks is free software; you can redistribute it and/or modify
- # it under the terms of the GNU General Public License as published by
- # the Free Software Foundation; either version 2 of the License, or
- # (at your option) any later version.
- #
- # Clearbricks is distributed in the hope that it will be useful,
- # but WITHOUT ANY WARRANTY; without even the implied warranty of
- # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- # GNU General Public License for more details.
- #
- # You should have received a copy of the GNU General Public License
- # along with Clearbricks; if not, write to the Free Software
- # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
- #
- # ***** END LICENSE BLOCK *****
- #
- # Contributor(s):
- # Stephanie Booth
- # Mathieu Pillard
- # Christophe Bonijol
- # Jean-Charles Bagneris
- # Nicolas Chachereau
- # Jérôme Lipowicz
- #
- # Version : 3.2.7
- # Release date : 2013-02-11
- # History :
- #
- # 3.2.7
- # => Les styles d'alignement des images sont modifiables via les options
- #
- # 3.2.6
- # => Added ``inline html`` support
- #
- # 3.2.5
- # => Changed longdesc by title in images
- #
- # 3.2.4
- # => Auto links
- # => Code cleanup
- #
- # 3.2.3
- # Olivier
- # => PHP5 Strict
- #
- # 3.2.2
- # Olivier
- # => Changement de la gestion des URL spéciales
- #
- # 3.2.1
- # Olivier
- # => Changement syntaxe des macros
- #
- # 3.2
- # Olivier
- # => Changement de fonctionnement des macros
- # => Passage de fonctions externes pour les macros et les mots wiki
- #
- # 3.1d
- # Jérôme Lipowicz
- # => antispam
- # Olivier
- # => centrage d'image
- #
- # 3.1c
- # Olivier
- # => Possibilité d'échaper les | dans les marqueurs avec \
- #
- # 3.1b
- # Nicolas Chachereau
- # => Changement de regexp pour la correction syntaxique
- #
- # 3.1a
- # Olivier
- # => Bug du Call-time pass-by-reference
- #
- # 3.1
- # Olivier
- # => Ajout des macros «««..»»»
- # => Ajout des blocs vides øøø
- # => Ajout du niveau de titre paramétrable
- # => Option de blocage du parseur dans les <pre>
- # => Titres au format setext (experimental, désactivé)
- #
- # 3.0
- # Olivier => Récriture du parseur inline, plus d'erreur XHTML
- # => Ajout d'une vérification d'intégrité pour les listes
- # => Les acronymes sont maintenant dans un fichier texte
- # => Ajout d'un tag images ((..)), del --..-- et ins ++..++
- # => Plus possible de faire des liens JS [lien|javascript:...]
- # => Ajout des notes de bas de page §§...§§
- # => Ajout des mots wiki
- #
- # 2.5
- # Olivier => Récriture du code, plus besoin du saut de ligne entre blocs !=
- #
- # 2.0
- # Stephanie => correction des PCRE et ajout de fonctionnalités
- # Mathieu => ajout du strip-tags, implementation des options, reconnaissance automatique d'url, etc.
- # Olivier => chagement de active_link en active_urls
- # => ajout des options pour les blocs
- # => intégration de l'aide dans le code, avec les options
- # => début de quelque chose pour la reconnaissance auto d'url (avec Mat)
- # TODO :
- # Mathieu => active_wiki_urls (modifier wikiParseUrl ?)
- # => active_auto_urls
- #
- # * => ajouter des options.
- # => trouver un meilleur nom pour active_link ? (pour le jour ou ca sera tellement une usine
- # a gaz que on generera des tags <link> :)
- #
- # Wiki2xhtml
- class wiki2xhtml
- {
- public $__version__ = '3.2.7';
-
- public $T;
- public $opt;
- public $line;
- public $acro_table;
- public $foot_notes;
- public $macros;
- public $functions;
-
- public $tags;
- public $open_tags;
- public $close_tags;
- public $custom_tags = array();
- public $all_tags;
- public $tag_pattern;
- public $escape_table;
- public $allowed_inline = array();
-
- function __construct()
- {
- # Mise en place des options
- $this->setOpt('active_title',1); # Activation des titres !!!
- $this->setOpt('active_setext_title',0); # Activation des titres setext (EXPERIMENTAL)
- $this->setOpt('active_hr',1); # Activation des <hr />
- $this->setOpt('active_lists',1); # Activation des listes
- $this->setOpt('active_quote',1); # Activation du <blockquote>
- $this->setOpt('active_pre',1); # Activation du <pre>
- $this->setOpt('active_empty',1); # Activation du bloc vide øøø
- $this->setOpt('active_auto_urls',0); # Activation de la reconnaissance d'url
- $this->setOpt('active_auto_br',0); # Activation du saut de ligne automatique (dans les paragraphes)
- $this->setOpt('active_antispam',1); # Activation de l'antispam pour les emails
- $this->setOpt('active_urls',1); # Activation des liens []
- $this->setOpt('active_auto_img',1); # Activation des images automatiques dans les liens []
- $this->setOpt('active_img',1); # Activation des images (())
- $this->setOpt('active_anchor',1); # Activation des ancres ~...~
- $this->setOpt('active_em',1); # Activation du <em> ''...''
- $this->setOpt('active_strong',1); # Activation du <strong> __...__
- $this->setOpt('active_br',1); # Activation du <br /> %%%
- $this->setOpt('active_q',1); # Activation du <q> {{...}}
- $this->setOpt('active_code',1); # Activation du <code> @@...@@
- $this->setOpt('active_acronym',1); # Activation des acronymes
- $this->setOpt('active_ins',1); # Activation des ins ++..++
- $this->setOpt('active_del',1); # Activation des del --..--
- $this->setOpt('active_inline_html',1); # Activation du HTML inline ``...``
- $this->setOpt('active_footnotes',1); # Activation des notes de bas de page
- $this->setOpt('active_wikiwords',0); # Activation des mots wiki
- $this->setOpt('active_macros',1); # Activation des macros /// ///
-
- $this->setOpt('parse_pre',1); # Parser l'intérieur de blocs <pre> ?
-
- $this->setOpt('active_fr_syntax',1); # Corrections syntaxe FR
-
- $this->setOpt('first_title_level',3); # Premier niveau de titre <h..>
-
- $this->setOpt('note_prefix','wiki-footnote');
- $this->setOpt('note_str','<div class="footnotes"><h4>Notes</h4>%s</div>');
- $this->setOpt('note_str_single','<div class="footnotes"><h4>Note</h4>%s</div>');
- $this->setOpt('words_pattern',
- '((?<![A-Za-z0-9])([A-Z][a-z]+){2,}(?![A-Za-z0-9]))');
-
- $this->setOpt('auto_url_pattern',
- '%(?<![\[\|])(http://|https://|ftp://|news:)([^"\s\)!]+)%msu');
-
- $this->setOpt('acronyms_file',dirname(__FILE__).'/acronyms.txt');
-
- $this->setOpt('img_style_left','float:left; margin: 0 1em 1em 0;');
- $this->setOpt('img_style_center','display:block; margin:0 auto;');
- $this->setOpt('img_style_right','float:right; margin: 0 0 1em 1em;');
- $this->acro_table = $this->__getAcronyms();
- $this->foot_notes = array();
- $this->functions = array();
- $this->macros = array();
-
- $this->registerFunction('macro:html',array($this,'__macroHTML'));
- }
-
- function setOpt($option, $value)
- {
- $this->opt[$option] = $value;
- }
-
- function setOpts($options)
- {
- if (!is_array($options)) {
- return;
- }
-
- foreach ($options as $k => $v) {
- $this->opt[$k] = $v;
- }
- }
-
- function getOpt($option)
- {
- return (!empty($this->opt[$option])) ? $this->opt[$option] : false;
- }
-
- function registerFunction($type,$name)
- {
- if (is_callable($name)) {
- $this->functions[$type] = $name;
- }
- }
-
- function transform($in)
- {
- # Initialisation des tags
- $this->__initTags();
- $this->foot_notes = array();
-
- # Récupération des macros
- if ($this->getOpt('active_macros')) {
- $in = preg_replace('#^///(.*?)///($|\r)#mse',"\\\$this->__getMacro('\\1')",$in);
- }
-
- # Vérification du niveau de titre
- if ($this->getOpt('first_title_level') > 4) {
- $this->setOpt('first_title_level',4);
- }
-
- $res = str_replace("\r", '', $in);
-
- $escape_pattern = array();
-
- # traitement des titres à la setext
- if ($this->getOpt('active_setext_title') && $this->getOpt('active_title')) {
- $res = preg_replace('/^(.*)\n[=]{5,}$/m','!!!$1',$res);
- $res = preg_replace('/^(.*)\n[-]{5,}$/m','!!$1',$res);
- }
-
- # Transformation des mots Wiki
- if ($this->getOpt('active_wikiwords') && $this->getOpt('words_pattern')) {
- $res = preg_replace('/'.$this->getOpt('words_pattern').'/msu','¶¶¶$1¶¶¶',$res);
- }
-
- # Transformation des URLs automatiques
- if ($this->getOpt('active_auto_urls'))
- {
- $active_urls = $this->getOpt('active_urls');
-
- $this->setOpt('active_urls',1);
- $this->__initTags();
-
- # If urls are not active, escape URLs tags
- if (!$active_urls)
- {
- $res = preg_replace(
- '%(?<!\\\\)(['.preg_quote(implode('',$this->tags['a'])).'])%msU',
- '\\\$1',$res
- );
- }
-
- # Transforms urls while preserving tags.
- $tree = preg_split($this->tag_pattern,$res,-1,PREG_SPLIT_DELIM_CAPTURE);
- foreach ($tree as &$leaf) {
- $leaf = preg_replace($this->getOpt('auto_url_pattern'),'[$1$2]',$leaf);
- }
- unset($leaf);
- $res = implode($tree);
-
-
- }
-
- $this->T = explode("\n",$res);
- $this->T[] = '';
-
- # Parse les blocs
- $res = $this->__parseBlocks();
-
- # Line break
- if ($this->getOpt('active_br')) {
- $res = preg_replace('/(?<!\\\)%%%/', '<br />', $res);
- $escape_pattern[] = '%%%';
- }
-
- # Nettoyage des \s en trop
- $res = preg_replace('/([\s]+)(<\/p>|<\/li>|<\/pre>)/u', '$2', $res);
- $res = preg_replace('/(<li>)([\s]+)/u', '$1', $res);
-
- # On vire les escapes
- if (!empty($escape_pattern)) {
- $res = preg_replace('/\\\('.implode('|',$escape_pattern).')/','$1',$res);
- }
-
- # On vire les ¶¶¶MotWiki¶¶¶ qui sont resté (dans les url...)
- if ($this->getOpt('active_wikiwords') && $this->getOpt('words_pattern')) {
- $res = preg_replace('/¶¶¶'.$this->getOpt('words_pattern').'¶¶¶/msu','$1',$res);
- }
-
- # On remet les macros
- if ($this->getOpt('active_macros')) {
- $res = preg_replace_callback('/^##########MACRO#([0-9]+)#$/ms',array($this,'__putMacro'),$res);
- }
-
- # Auto line break dans les paragraphes
- if ($this->getOpt('active_auto_br')) {
- $res = preg_replace_callback('%(<p>)(.*?)(</p>)%msu',array($this,'__autoBR'),$res);
- }
-
- # On ajoute les notes
- if (count($this->foot_notes) > 0)
- {
- $res_notes = '';
- $i = 1;
- foreach ($this->foot_notes as $k => $v) {
- $res_notes .= "\n".'<p>[<a href="#rev-'.$k.'" id="'.$k.'">'.$i.'</a>] '.$v.'</p>';
- $i++;
- }
- $res .= sprintf("\n".(count($this->foot_notes) > 1 ? $this->getOpt('note_str') : $this->getOpt('note_str_single'))."\n",$res_notes);
- }
-
- return $res;
- }
-
- /* PRIVATE
- --------------------------------------------------- */
-
- function __initTags()
- {
- $tags = array(
- 'em' => array("''","''"),
- 'strong' => array('__','__'),
- 'acronym' => array('??','??'),
- 'a' => array('[',']'),
- 'img' => array('((','))'),
- 'q' => array('{{','}}'),
- 'code' => array('@@','@@'),
- 'anchor' => array('~','~'),
- 'del' => array('--','--'),
- 'ins' => array('++','++'),
- 'inline' => array('``','``'),
- 'note' => array('$$','$$'),
- 'word' => array('¶¶¶','¶¶¶')
- );
- $this->linetags = array(
- 'empty' => 'øøø',
- 'title' => '([!]{1,4})',
- 'hr' => '[-]{4}[- ]',
- 'quote' => '(>|;:)',
- 'lists' => '([*#]+)',
- 'pre' => '[ ]{1}'
- );
-
- $this->tags = array_merge($tags,$this->custom_tags);
-
- # Suppression des tags selon les options
- if (!$this->getOpt('active_urls')) {
- unset($this->tags['a']);
- }
- if (!$this->getOpt('active_img')) {
- unset($this->tags['img']);
- }
- if (!$this->getOpt('active_anchor')) {
- unset($this->tags['anchor']);
- }
- if (!$this->getOpt('active_em')) {
- unset($this->tags['em']);
- }
- if (!$this->getOpt('active_strong')) {
- unset($this->tags['strong']);
- }
- if (!$this->getOpt('active_q')) {
- unset($this->tags['q']);
- }
- if (!$this->getOpt('active_code')) {
- unset($this->tags['code']);
- }
- if (!$this->getOpt('active_acronym')) {
- unset($this->tags['acronym']);
- }
- if (!$this->getOpt('active_ins')) {
- unset($this->tags['ins']);
- }
- if (!$this->getOpt('active_del')) {
- unset($this->tags['del']);
- }
- if (!$this->getOpt('active_inline_html')) {
- unset($this->tags['inline']);
- }
- if (!$this->getOpt('active_footnotes')) {
- unset($this->tags['note']);
- }
- if (!$this->getOpt('active_wikiwords')) {
- unset($this->tags['word']);
- }
-
- # Suppression des tags de début de ligne selon les options
- if (!$this->getOpt('active_empty')) {
- unset($this->linetags['empty']);
- }
- if (!$this->getOpt('active_title')) {
- unset($this->linetags['title']);
- }
- if (!$this->getOpt('active_hr')) {
- unset($this->linetags['hr']);
- }
- if (!$this->getOpt('active_quote')) {
- unset($this->linetags['quote']);
- }
- if (!$this->getOpt('active_lists')) {
- unset($this->linetags['lists']);
- }
- if (!$this->getOpt('active_pre')) {
- unset($this->linetags['pre']);
- }
-
- $this->open_tags = $this->__getTags();
- $this->close_tags = $this->__getTags(false);
- $this->all_tags = $this->__getAllTags();
- $this->tag_pattern = $this->__getTagsPattern();
-
- $this->escape_table = $this->all_tags;
- array_walk($this->escape_table,create_function('&$a','$a = \'\\\\\'.$a;'));
- }
-
- function __getTags($open=true)
- {
- $res = array();
- foreach ($this->tags as $k => $v) {
- $res[$k] = ($open) ? $v[0] : $v[1];
- }
- return $res;
- }
-
- function __getAllTags()
- {
- $res = array();
- foreach ($this->tags as $v) {
- $res[] = $v[0];
- $res[] = $v[1];
- }
- return array_values(array_unique($res));
- }
-
- function __getTagsPattern($escape=false)
- {
- $res = $this->all_tags;
- array_walk($res,create_function('&$a','$a = preg_quote($a,"/");'));
-
- if (!$escape) {
- return '/(?<!\\\)('.implode('|',$res).')/';
- } else {
- return '('.implode('|',$res).')';
- }
- }
-
- /* Blocs
- --------------------------------------------------- */
- function __parseBlocks()
- {
- $mode = $type = null;
- $res = '';
- $max = count($this->T);
-
- for ($i=0; $i<$max; $i++)
- {
- $pre_mode = $mode;
- $pre_type = $type;
- $end = ($i+1 == $max);
-
- $line = $this->__getLine($i,$type,$mode);
-
- if ($type != 'pre' || $this->getOpt('parse_pre')) {
- $line = $this->__inlineWalk($line);
- }
-
- $res .= $this->__closeLine($type,$mode,$pre_type,$pre_mode);
- $res .= $this->__openLine($type,$mode,$pre_type,$pre_mode);
-
- # P dans les blockquotes
- if ($type == 'blockquote' && trim($line) == '' && $pre_type == $type) {
- $res .= "</p>\n<p>";
- }
-
- # Correction de la syntaxe FR dans tous sauf pre et hr
- # Sur idée de Christophe Bonijol
- # Changement de regex (Nicolas Chachereau)
- if ($this->getOpt('active_fr_syntax') && $type != null && $type != 'pre' && $type != 'hr') {
- $line = preg_replace('%[ ]+([:?!;\x{00BB}](\s|$))%u',' $1',$line);
- $line = preg_replace('%(\x{00AB})[ ]+%u','$1 ',$line);
- }
-
- $res .= $line;
- }
-
- return trim($res);
- }
-
- function __getLine($i,&$type,&$mode)
- {
- $pre_type = $type;
- $pre_mode = $mode;
- $type = $mode = null;
-
- if (empty($this->T[$i])) {
- return false;
- }
-
- $line = htmlspecialchars($this->T[$i],ENT_NOQUOTES);
-
- # Ligne vide
- if (empty($line))
- {
- $type = null;
- }
- elseif ($this->getOpt('active_empty') && preg_match('/^øøø(.*)$/',$line,$cap))
- {
- $type = null;
- $line = trim($cap[1]);
- }
- # Titre
- elseif ($this->getOpt('active_title') && preg_match('/^([!]{1,4})(.*)$/',$line,$cap))
- {
- $type = 'title';
- $mode = strlen($cap[1]);
- $line = trim($cap[2]);
- }
- # Ligne HR
- elseif ($this->getOpt('active_hr') && preg_match('/^[-]{4}[- ]*$/',$line))
- {
- $type = 'hr';
- $line = null;
- }
- # Blockquote
- elseif ($this->getOpt('active_quote') && preg_match('/^(>|;:)(.*)$/',$line,$cap))
- {
- $type = 'blockquote';
- $line = trim($cap[2]);
- }
- # Liste
- elseif ($this->getOpt('active_lists') && preg_match('/^([*#]+)(.*)$/',$line,$cap))
- {
- $type = 'list';
- $mode = $cap[1];
- $valid = true;
-
- # Vérification d'intégrité
- $dl = ($type != $pre_type) ? 0 : strlen($pre_mode);
- $d = strlen($mode);
- $delta = $d-$dl;
-
- if ($delta < 0 && strpos($pre_mode,$mode) !== 0) {
- $valid = false;
- }
- if ($delta > 0 && $type == $pre_type && strpos($mode,$pre_mode) !== 0) {
- $valid = false;
- }
- if ($delta == 0 && $mode != $pre_mode) {
- $valid = false;
- }
- if ($delta > 1) {
- $valid = false;
- }
-
- if (!$valid) {
- $type = 'p';
- $mode = null;
- $line = '<br />'.$line;
- } else {
- $line = trim($cap[2]);
- }
- }
- # Préformaté
- elseif ($this->getOpt('active_pre') && preg_match('/^[ ]{1}(.*)$/',$line,$cap))
- {
- $type = 'pre';
- $line = $cap[1];
- }
- # Paragraphe
- else {
- $type = 'p';
- if (preg_match('/^\\\((?:('.implode('|',$this->linetags).')).*)$/',$line,$cap)) {
- $line = $cap[1];
- }
- $line = trim($line);
- }
-
- return $line;
- }
-
- function __openLine($type,$mode,$pre_type,$pre_mode)
- {
- $open = ($type != $pre_type);
-
- if ($open && $type == 'p')
- {
- return "\n<p>";
- }
- elseif ($open && $type == 'blockquote')
- {
- return "\n<blockquote><p>";
- }
- elseif (($open || $mode != $pre_mode) && $type == 'title')
- {
- $fl = $this->getOpt('first_title_level');
- $fl = $fl+3;
- $l = $fl-$mode;
- return "\n<h".($l).'>';
- }
- elseif ($open && $type == 'pre')
- {
- return "\n<pre>";
- }
- elseif ($open && $type == 'hr')
- {
- return "\n<hr />";
- }
- elseif ($type == 'list')
- {
- $dl = ($open) ? 0 : strlen($pre_mode);
- $d = strlen($mode);
- $delta = $d-$dl;
- $res = '';
-
- if($delta > 0) {
- if(substr($mode, -1, 1) == '*') {
- $res .= "<ul>\n";
- } else {
- $res .= "<ol>\n";
- }
- } elseif ($delta < 0) {
- $res .= "</li>\n";
- for($j = 0; $j < abs($delta); $j++) {
- if (substr($pre_mode,(0 - $j - 1), 1) == '*') {
- $res .= "</ul>\n</li>\n";
- } else {
- $res .= "</ol>\n</li>\n";
- }
- }
- } else {
- $res .= "</li>\n";
- }
-
- return $res."<li>";
- }
- else
- {
- return null;
- }
- }
-
- function __closeLine($type,$mode,$pre_type,$pre_mode)
- {
- $close = ($type != $pre_type);
-
- if ($close && $pre_type == 'p')
- {
- return "</p>\n";
- }
- elseif ($close && $pre_type == 'blockquote')
- {
- return "</p></blockquote>\n";
- }
- elseif (($close || $mode != $pre_mode) && $pre_type == 'title')
- {
- $fl = $this->getOpt('first_title_level');
- $fl = $fl+3;
- $l = $fl-$pre_mode;
- return '</h'.($l).">\n";
- }
- elseif ($close && $pre_type == 'pre')
- {
- return "</pre>\n";
- }
- elseif ($close && $pre_type == 'list')
- {
- $res = '';
- for($j = 0; $j < strlen($pre_mode); $j++) {
- if(substr($pre_mode,(0 - $j - 1), 1) == '*') {
- $res .= "</li>\n</ul>";
- } else {
- $res .= "</li>\n</ol>";
- }
- }
- return $res;
- }
- else
- {
- return "\n";
- }
- }
-
-
- /* Inline
- --------------------------------------------------- */
- function __inlineWalk($str,$allow_only=null)
- {
- $tree = preg_split($this->tag_pattern,$str,-1,PREG_SPLIT_DELIM_CAPTURE);
-
- $res = '';
- for ($i=0; $i<count($tree); $i++)
- {
- $attr = '';
-
- if (in_array($tree[$i],array_values($this->open_tags)) &&
- ($allow_only == null || in_array(array_search($tree[$i],$this->open_tags),$allow_only)))
- {
- $tag = array_search($tree[$i],$this->open_tags);
- $tag_type = 'open';
-
- if (($tidy = $this->__makeTag($tree,$tag,$i,$i,$attr,$tag_type)) !== false)
- {
- if ($tag != '') {
- $res .= '<'.$tag.$attr;
- $res .= ($tag_type == 'open') ? '>' : ' />';
- }
- $res .= $tidy;
- }
- else
- {
- $res .= $tree[$i];
- }
- }
- else
- {
- $res .= $tree[$i];
- }
- }
-
- # Suppression des echappements
- $res = str_replace($this->escape_table,$this->all_tags,$res);
-
- return $res;
- }
-
- function __makeTag(&$tree,&$tag,$position,&$j,&$attr,&$type)
- {
- $res = '';
- $closed = false;
-
- $itag = $this->close_tags[$tag];
-
- # Recherche fermeture
- for ($i=$position+1;$i<count($tree);$i++)
- {
- if ($tree[$i] == $itag)
- {
- $closed = true;
- break;
- }
- }
-
- # Résultat
- if ($closed)
- {
- for ($i=$position+1;$i<count($tree);$i++)
- {
- if ($tree[$i] != $itag)
- {
- $res .= $tree[$i];
- }
- else
- {
- switch ($tag)
- {
- case 'a':
- $res = $this->__parseLink($res,$tag,$attr,$type);
- break;
- case 'img':
- $type = 'close';
- $res = $this->__parseImg($res,$attr);
- break;
- case 'acronym':
- $res = $this->__parseAcronym($res,$attr);
- break;
- case 'q':
- $res = $this->__parseQ($res,$attr);
- break;
- case 'anchor':
- $tag = 'a';
- $res = $this->__parseAnchor($res,$attr);
- break;
- case 'note':
- $tag = '';
- $res = $this->__parseNote($res);
- break;
- case 'inline':
- $tag = '';
- $res = $this->__parseInlineHTML($res);
- break;
- case 'word':
- $res = $this->parseWikiWord($res,$tag,$attr,$type);
- break;
- default :
- $res = $this->__inlineWalk($res);
- break;
- }
-
- if ($type == 'open' && $tag != '') {
- $res .= '</'.$tag.'>';
- }
- $j = $i;
- break;
- }
- }
-
- return $res;
- }
- else
- {
- return false;
- }
- }
-
- function __splitTagsAttr($str)
- {
- $res = preg_split('/(?<!\\\)\|/',$str);
-
- foreach ($res as $k => $v) {
- $res[$k] = str_replace("\|",'|',$v);
- }
-
- return $res;
- }
-
- # Antispam (Jérôme Lipowicz)
- function __antiSpam($str)
- {
- $encoded = bin2hex($str);
- $encoded = chunk_split($encoded, 2, '%');
- $encoded = '%'.substr($encoded, 0, strlen($encoded) - 1);
- return $encoded;
- }
-
- function __parseLink($str,&$tag,&$attr,&$type)
- {
- $n_str = $this->__inlineWalk($str,array('acronym','img'));
- $data = $this->__splitTagsAttr($n_str);
- $no_image = false;
-
- # Only URL in data
- if (count($data) == 1)
- {
- $url = trim($str);
- $content = strlen($url) > 35 ? substr($url,0,35).'...' : $url;
- $lang = '';
- $title = $url;
- }
- elseif (count($data) > 1)
- {
- $url = trim($data[1]);
- $content = $data[0];
- $lang = (!empty($data[2])) ? $this->protectAttr($data[2],true) : '';
- $title = (!empty($data[3])) ? $data[3] : '';
- $no_image = (!empty($data[4])) ? (boolean) $data[4] : false;
- }
-
- # Remplacement si URL spéciale
- $this->__specialUrls($url,$content,$lang,$title);
-
- # On vire les dans l'url
- $url = str_replace(' ',' ',$url);
-
- if (preg_match('/^(.+)[.](gif|jpg|jpeg|png)$/', $url) && !$no_image && $this->getOpt('active_auto_img'))
- {
- # On ajoute les dimensions de l'image si locale
- # Idée de Stephanie
- $img_size = null;
- if (!preg_match('#[a-zA-Z]+://#', $url)) {
- if (preg_match('#^/#',$url)) {
- $path_img = $_SERVER['DOCUMENT_ROOT'] . $url;
- } else {
- $path_img = $url;
- }
-
- $img_size = @getimagesize($path_img);
- }
-
- $attr = ' src="'.$this->protectAttr($this->protectUrls($url)).'"'.
- $attr .= (count($data) > 1) ? ' alt="'.$this->protectAttr($content).'"' : ' alt=""';
- $attr .= ($lang) ? ' lang="'.$lang.'"' : '';
- $attr .= ($title) ? ' title="'.$this->protectAttr($title).'"' : '';
- $attr .= (is_array($img_size)) ? ' '.$img_size[3] : '';
-
- $tag = 'img';
- $type = 'close';
- return null;
- }
- else
- {
- if ($this->getOpt('active_antispam') && preg_match('/^mailto:/',$url)) {
- $content = $content == $url ? preg_replace('%^mailto:%','',$content) : $content;
- $url = 'mailto:'.$this->__antiSpam(substr($url,7));
-
- }
-
- $attr = ' href="'.$this->protectAttr($this->protectUrls($url)).'"';
- $attr .= ($lang) ? ' hreflang="'.$lang.'"' : '';
- $attr .= ($title) ? ' title="'.$this->protectAttr($title).'"' : '';
-
- return $content;
- }
- }
-
- function __specialUrls(&$url,&$content,&$lang,&$title)
- {
- foreach ($this->functions as $k => $v)
- {
- if (strpos($k,'url:') === 0 && strpos($url,substr($k,4)) === 0)
- {
- $res = call_user_func($v,$url,$content);
-
- $url = isset($res['url']) ? $res['url'] : $url;
- $content = isset($res['content']) ? $res['content'] : $content;
- $lang = isset($res['lang']) ? $res['lang'] : $lang;
- $title = isset($res['title']) ? $res['title'] : $title;
-
- break;
- }
- }
- }
-
- function __parseImg($str,&$attr)
- {
- $data = $this->__splitTagsAttr($str);
-
- $alt = '';
- $url = $data[0];
- if (!empty($data[1])) {
- $alt = $data[1];
- }
-
- $attr = ' src="'.$this->protectAttr($this->protectUrls($url)).'"';
- $attr .= ' alt="'.$this->protectAttr($alt).'"';
-
- if (!empty($data[2])) {
- $data[2] = strtoupper($data[2]);
- $style = '';
- if ($data[2] == 'G' || $data[2] == 'L') {
- $style = $this->getOpt('img_style_left');
- } elseif ($data[2] == 'D' || $data[2] == 'R') {
- $style = $this->getOpt('img_style_right');
- } elseif ($data[2] == 'C') {
- $style = $this->getOpt('img_style_center');
- }
- if ($style != '') {
- $attr .= ' style="'.$style.'"';
- }
- }
-
- if (!empty($data[3])) {
- $attr .= ' title="'.$this->protectAttr($data[3]).'"';
- }
-
- return null;
- }
-
- function __parseQ($str,&$attr)
- {
- $str = $this->__inlineWalk($str);
- $data = $this->__splitTagsAttr($str);
-
- $content = $data[0];
- $lang = (!empty($data[1])) ? $this->protectAttr($data[1],true) : '';
-
- $attr .= (!empty($lang)) ? ' lang="'.$lang.'"' : '';
- $attr .= (!empty($data[2])) ? ' cite="'.$this->protectAttr($this->protectUrls($data[2])).'"' : '';
-
- return $content;
- }
-
- function __parseAnchor($str,&$attr)
- {
- $name = $this->protectAttr($str,true);
-
- if ($name != '') {
- $attr = ' name="'.$name.'"';
- }
- return null;
- }
-
- function __parseNote($str)
- {
- $i = count($this->foot_notes)+1;
- $id = $this->getOpt('note_prefix').'-'.$i;
- $this->foot_notes[$id] = $this->__inlineWalk($str);
- return '<sup>\[<a href="#'.$id.'" id="rev-'.$id.'">'.$i.'</a>\]</sup>';
- }
-
- function __parseInlineHTML($str)
- {
- return str_replace(array('>','<'),array('>','<'),$str);
- }
-
- # Obtenir un acronyme
- function __parseAcronym($str,&$attr)
- {
- $data = $this->__splitTagsAttr($str);
-
- $acronym = $data[0];
- $title = $lang = '';
-
- if (count($data) > 1)
- {
- $title = $data[1];
- $lang = (!empty($data[2])) ? $this->protectAttr($data[2],true) : '';
- }
-
- if ($title == '' && !empty($this->acro_table[$acronym])) {
- $title = $this->acro_table[$acronym];
- }
-
- $attr = ($title) ? ' title="'.$this->protectAttr($title).'"' : '';
- $attr .= ($lang) ? ' lang="'.$lang.'"' : '';
-
- return $acronym;
- }
-
- # Définition des acronymes, dans le fichier acronyms.txt
- function __getAcronyms()
- {
- $file = $this->getOpt('acronyms_file');
- $res = array();
-
- if (file_exists($file))
- {
- if (($fc = @file($file)) !== false)
- {
- foreach ($fc as $v)
- {
- $v = trim($v);
- if ($v != '')
- {
- $p = strpos($v,':');
- $K = (string) trim(substr($v,0,$p));
- $V = (string) trim(substr($v,($p+1)));
-
- if ($K) {
- $res[$K] = $V;
- }
- }
- }
- }
- }
-
- return $res;
- }
-
- # Mots wiki (pour héritage)
- function parseWikiWord($str,&$tag,&$attr,&$type)
- {
- $tag = $attr = '';
-
- if (isset($this->functions['wikiword'])) {
- return call_user_func($this->functions['wikiword'],$str);
- }
-
- return $str;
- }
-
- /* Protection des attributs */
- function protectAttr($str,$name=false)
- {
- if ($name && !preg_match('/^[A-Za-z][A-Za-z0-9_:.-]*$/',$str)) {
- return '';
- }
-
- return str_replace(array("'",'"'),array(''','"'),$str);
- }
-
- /* Protection des urls */
- function protectUrls($str)
- {
- if (preg_match('/^javascript:/',$str)) {
- $str = '#';
- }
-
- return $str;
- }
-
- /* Auto BR */
- function __autoBR($m)
- {
- return $m[1].str_replace("\n","<br />\n",$m[2]).$m[3];
- }
-
- /* Macro
- --------------------------------------------------- */
- function __getMacro($s)
- {
- $this->macros[] = str_replace('\"','"',$s);
- return 'øøø##########MACRO#'.(count($this->macros)-1).'#';
- }
-
- function __putMacro($id)
- {
- $id = is_array($id) ? (integer) $id[1] : (integer) $id;
- if (isset($this->macros[$id]))
- {
- $content = str_replace("\r",'',$this->macros[$id]);
-
- $c = explode("\n",$content);
-
- # première ligne, premier mot
- $fl = trim($c[0]);
- $fw = $fl;
-
- if ($fl) {
- if (strpos($fl,' ') !== false) {
- $fw = substr($fl,0,strpos($fl,' '));
- }
- $content = implode("\n",array_slice($c,1));
- }
-
- if ($c[0] == "\n") {
- $content = implode("\n",array_slice($c,1));
- }
-
- if ($fw)
- {
- if (isset($this->functions['macro:'.$fw]))
- {
- return call_user_func($this->functions['macro:'.$fw],$content,$fl);
- }
- }
-
- # Si on n'a rien pu faire, on retourne le tout sous
- # forme de <pre>
- return '<pre>'.htmlspecialchars($this->macros[$id]).'</pre>';
- }
-
- return null;
- }
-
- function __macroHTML($s)
- {
- return $s;
- }
-
- /* Aide et debug
- --------------------------------------------------- */
- function help()
- {
- $help['b'] = array();
- $help['i'] = array();
-
- $help['b'][] = 'Laisser une ligne vide entre chaque bloc <em>de même nature</em>.';
- $help['b'][] = '<strong>Paragraphe</strong> : du texte et une ligne vide';
-
- if ($this->getOpt('active_title')) {
- $help['b'][] = '<strong>Titre</strong> : <code>!!!</code>, <code>!!</code>, '.
- '<code>!</code> pour des titres plus ou moins importants';
- }
-
- if ($this->getOpt('active_hr')) {
- $help['b'][] = '<strong>Trait horizontal</strong> : <code>----</code>';
- }
-
- if ($this->getOpt('active_lists')) {
- $help['b'][] = '<strong>Liste</strong> : ligne débutant par <code>*</code> ou '.
- '<code>#</code>. Il est possible de mélanger les listes '.
- '(<code>*#*</code>) pour faire des listes de plusieurs niveaux. '.
- 'Respecter le style de chaque niveau';
- }
-
- if ($this->getOpt('active_pre')) {
- $help['b'][] = '<strong>Texte préformaté</strong> : espace devant chaque ligne de texte';
- }
-
- if ($this->getOpt('active_quote')) {
- $help['b'][] = '<strong>Bloc de citation</strong> : <code>></code> ou '.
- '<code>;:</code> devant chaque ligne de texte';
- }
-
- if ($this->getOpt('active_fr_syntax')) {
- $help['i'][] = 'La correction de ponctuation est active. Un espace '.
- 'insécable remplacera automatiquement tout espace '.
- 'précédant les marques ";","?",":" et "!".';
- }
-
- if ($this->getOpt('active_em')) {
- $help['i'][] = '<strong>Emphase</strong> : deux apostrophes <code>\'\'texte\'\'</code>';
- }
-
- if ($this->getOpt('active_strong')) {
- $help['i'][] = '<strong>Forte emphase</strong> : deux soulignés <code>__texte__</code>';
- }
-
- if ($this->getOpt('active_br')) {
- $help['i'][] = '<strong>Retour forcé à la ligne</strong> : <code>%%%</code>';
- }
-
- if ($this->getOpt('active_ins')) {
- $help['i'][] = '<strong>Insertion</strong> : deux plus <code>++texte++</code>';
- }
-
- if ($this->getOpt('active_del')) {
- $help['i'][] = '<strong>Suppression</strong> : deux moins <code>--texte--</code>';
- }
-
- if ($this->getOpt('active_urls')) {
- $help['i'][] = '<strong>Lien</strong> : <code>[url]</code>, <code>[nom|url]</code>, '.
- '<code>[nom|url|langue]</code> ou <code>[nom|url|langue|titre]</code>.';
-
- $help['i'][] = '<strong>Image</strong> : comme un lien mais avec une extension d\'image.'.
- '<br />Pour désactiver la reconnaissance d\'image mettez 0 dans un dernier '.
- 'argument. Par exemple <code>[image|image.gif||0]</code> fera un lien vers l\'image au '.
- 'lieu de l\'afficher.'.
- '<br />Il est conseillé d\'utiliser la nouvelle syntaxe.';
- }
-
- if ($this->getOpt('active_img')) {
- $help['i'][] = '<strong>Image</strong> (nouvelle syntaxe) : '.
- '<code>((url|texte alternatif))</code>, '.
- '<code>((url|texte alternatif|position))</code> ou '.
- '<code>((url|texte alternatif|position|description longue))</code>. '.
- '<br />La position peut prendre les valeur L ou G (gauche), R ou D (droite) ou C (centré).';
- }
-
- if ($this->getOpt('active_anchor')) {
- $help['i'][] = '<strong>Ancre</strong> : <code>~ancre~</code>';
- }
-
- if ($this->getOpt('active_acronym')) {
- $help['i'][] = '<strong>Acronyme</strong> : <code>??acronyme??</code> ou '.
- '<code>??acronyme|titre??</code>';
- }
-
- if ($this->getOpt('active_q')) {
- $help['i'][] = '<strong>Citation</strong> : <code>{{citation}}</code>, '.
- '<code>{{citation|langue}}</code> ou <code>{{citation|langue|url}}</code>';
- }
-
- if ($this->getOpt('active_code')) {
- $help['i'][] = '<strong>Code</strong> : <code>@@code ici@@</code>';
- }
-
- if ($this->getOpt('active_footnotes')) {
- $help['i'][] = '<strong>Note de bas de page</strong> : <code>$$Corps de la note$$</code>';
- }
-
- $res = '<dl class="wikiHelp">';
-
- $res .= '<dt>Blocs</dt><dd>';
- if (count($help['b']) > 0)
- {
- $res .= '<ul><li>';
- $res .= implode(' ;</li><li>', $help['b']);
- $res .= '.</li></ul>';
- }
- $res .= '</dd>';
-
- $res .= '<dt>Éléments en ligne</dt><dd>';
- if (count($help['i']) > 0)
- {
- $res .= '<ul><li>';
- $res .= implode(' ;</li><li>', $help['i']);
- $res .= '.</li></ul>';
- }
- $res .= '</dd>';
-
- $res .= '</dl>';
-
- return $res;
- }
-
- /*
- function debug()
- {
- $mode = $type = null;
- $max = count($this->T);
-
- $res =
- '<table border="1">'.
- '<tr><th>p-mode</th><th>p-type</th><th>mode</th><th>type</th><th>chaine</th></tr>';
-
- for ($i=0; $i<$max; $i++)
- {
- $pre_mode = $mode;
- $pre_type = $type;
-
- $line = $this->__getLine($i,$type,$mode);
-
- $res .=
- '<tr><td>'.$pre_mode.'</td><td>'.$pre_type.'</td>'.
- '<td>'.$mode.'</td><td>'.$type.'</td><td>'.$line.'</td></tr>';
-
- }
- $res .= '</table>';
-
- return $res;
- }
- //*/
- }
- ?>