source: spip-zone/_squelettes_/spipcast/mes_fonctions.php3 @ 694

Last change on this file since 694 was 694, checked in by gael@…, 15 years ago

Mise a jours: meilleur compatibilité IE5+, support accrue de la video, ajout des fonctions forum sur les articles ainsi que des smileys.

File size: 2.2 KB
Line 
1<?php 
2
3//      Mes_fonctions.php3
4
5$GLOBALS['dossier_squelettes'] = 'spipcast'; 
6
7
8
9/*
10 *   +----------------------------------+
11 *    Nom du Filtre : RSS 2.0 et un fil ATOM 0.3
12 *   +-------------------------------------+
13 * 
14 * Mise a jours et discution:
15 * http://www.spip-contrib.net/Un-fil-RSS-2-et-un-fil-ATOM-3?var_recherche=rss2
16*/
17
18function pasdecrochet($texte) {
19  // replaces ">" if first character by "*"
20        $first = substr($texte,0,1);
21        if (ord($first)==ord('>')) {
22        $texte = substr($texte,1);
23        }
24        return $texte;
25}
26
27function w3cdate($texte) {
28        // sets date (from #DATE) to W3C format
29        $texte = substr($texte,0,10)."T".substr($texte,11,8)."Z";
30        return $texte;
31}       
32
33function tagdate($texte) {
34        // sets date (from #DATE) to W3C URI tag format
35        $texte = substr($texte,0,10);
36        return $texte;
37}       
38
39function supprimehttp($texte) {
40        // removes "http://" from URL to build Atom tag
41        $texte = substr($texte,7);
42        return $texte;
43}
44
45
46
47/*
48 *   +----------------------------------+
49 *    Nom du Filtre :    smileys II
50 *   +----------------------------------+
51 *    Date : mercredi 14 octobre 2003
52 *    Auteur :  BoOz (booz.bloog@laposte.net)
53 *   +-------------------------------------+
54 *    Fonctions de ce filtre :
55 *    Dans un texte, genere automatiquement le smiley
56 *    approprie a la place d'une chaine :nom.
57 *    Ce filtre utilise les smileys disponibles dans       
58 *    le repertoire smileys/
59 *    Exemple d'application :
60 *    [(#TEXTE|smileys)]
61 *   +-------------------------------------+
62 * 
63 * Pour toute suggestion, remarque, proposition d'ajout
64 * reportez-vous au forum de l'article :
65 * http://www.uzine.net/spip_contrib/article.php3?id_article=261
66*/
67
68
69
70function smileys($chaine) {
71
72$listimag=array();
73$rep1="spipcast/images/smileys/";
74$listfich=opendir($rep1);
75while ($fich=readdir($listfich))
76{       if(($fich !='..') and ($fich !='.') and ($fich !='.DS_Store'))
77        { 
78$nomfich=substr($fich,0,strrpos($fich, "."));
79$listimag[$nomfich]= '<img class="smiley" alt="smiley" src="spipcast/images/smileys/' . $fich . '" />' ;
80        }
81}
82
83
84ksort($listimag);
85reset($listimag);
86
87while (list($nom,$chem) = each($listimag))
88{ 
89  $chaine = str_replace(":".$nom, $chem , $chaine);
90}
91
92        return $chaine;
93}
94
95
96
97?>
Note: See TracBrowser for help on using the repository browser.