Changeset 24918 in spip-zone for _squelettes_/eva-web


Ignore:
Timestamp:
Dec 4, 2008, 8:24:37 PM (11 years ago)
Author:
mfraisse@…
Message:

Permettre d'installer n'importe quelle image dans /binettes sans avoir à toucher au fichier binettes.php

File:
1 edited

Legend:

Unmodified
Added
Removed
  • _squelettes_/eva-web/4_0/eva_binettes/binettes.php

    r24913 r24918  
    11<?php
    2 $p=explode(basename(_DIR_PLUGINS)."/",str_replace('\\','/',realpath(dirname(__FILE__))));
    3 define('_DIR_PLUGIN_EVA_BINETTES',(_DIR_PLUGINS.end($p)));
     2/*Adaptés de
     3 *   +----------------------------------+
     4 *    Nom du Filtre :    smileys II
     5 *   +----------------------------------+
     6 *    Date : mercredi 14 octobre 2003
     7 *    Auteur :  BoOz (booz.bloog@laposte.net)
     8 *   +-------------------------------------+
     9 *    Fonctions de ce filtre :
     10 *    Dans un texte, génère automatiquement le smiley
     11 *    approprié à la place d'une chaine :nom.
     12 *    Ce filtre utilise les icones disponibles dans       
     13 *    le répertoire icones/
     14 *    Exemple d'application :
     15 *    [(#TEXTE|binettes)]
     16 *   +-------------------------------------+
     17 * 
     18 * Pour toute suggestion, remarque, proposition d'ajout
     19 * reportez-vous au forum de l'article :
     20 * http://www.uzine.net/spip_contrib/article.php3?id_article=261
     21*/
    422
    5 function evabinettes_pre_typo($chaine) {
    6         $chemin = '<img alt="binettes" src="'._DIR_PLUGIN_EVA_BINETTES.'/binettes/';
    7         $chaine = preg_replace('/:->+/m', $chemin.'diable.png" />',$chaine);
    8         $chaine = preg_replace('/:-\(\(+/m', $chemin.'en_colere.png" />', $chaine);
    9         $chaine = preg_replace('/:-\)\)+/m', $chemin."mort_de_rire.png\" />", $chaine);
    10         $chaine = preg_replace('/:-D+/m', $chemin."mort_de_rire.png\" />", $chaine);
    11         $chaine = preg_replace('/:-\)+/m', $chemin."sourire.png\" />", $chaine);
    12         $chaine = preg_replace('/;-\)+/m', $chemin."clin_d-oeil.png\" />", $chaine);
    13         $chaine = preg_replace("/:'-\)+/m", $chemin."pleure_de_rire.png\" />", $chaine);
    14         $chaine = preg_replace("/:'-D+/m", $chemin."pleure_de_rire.png\" />", $chaine);
    15         $chaine = preg_replace('/:o\)+/m', $chemin."rigolo.png\" />", $chaine);
    16         $chaine = preg_replace('/B-\)+/m', $chemin."lunettes.png\" />", $chaine);
    17         $chaine = preg_replace('/\s:-p/m', $chemin."tire_la_langue.png\" />", $chaine);
    18         $chaine = preg_replace('/:-\|+/m', $chemin."bof.png\" />", $chaine);
    19         $chaine = preg_replace('/:-\/+/m', $chemin."mouai.png\" />", $chaine);
    20         $chaine = preg_replace('/:-o+/m', $chemin."surpris.png\" />", $chaine);
    21         $chaine = preg_replace('/:-O+/m', $chemin."surpris.png\" />", $chaine);
    22         $chaine = preg_replace('/:-\(+/m', $chemin."pas_content.png\" />", $chaine);
    23         $chaine = preg_replace("/:'-\(+/m", $chemin."triste.png\" />", $chaine);
    24 return $chaine;
     23function binettes($chaine, $arg1='') {
     24
     25
     26
     27        $listimag=array();
     28        $rep1="binettes/";
     29        $listfich=opendir($rep1);
     30        while ($fich=readdir($listfich))
     31        {       if(($fich !='..') and ($fich !='.') and ($fich !='.test')
     32        AND preg_match(',\.(gif|jpg|png)$,', $fich))
     33                {
     34        $nomfich=substr($fich,0,strrpos($fich, "."));
     35        $listimag[$nomfich]="<img alt=\"binettes\" src=\"binettes/".$fich."\">";
     36                }
     37        }
     38
     39
     40        ksort($listimag);
     41        reset($listimag);
     42
     43        while (list($nom,$chem) = each($listimag))
     44        {
     45                if ($arg1=='non')
     46          $chaine = str_replace(":".$nom, $cheme , $chaine);
     47                else
     48         $chaine = str_replace(":".$nom, $chem , $chaine);
     49        }
     50
     51                return $chaine;
     52
    2553}
    2654
Note: See TracChangeset for help on using the changeset viewer.