Subversion Repositories Sites.obs-saisons.fr

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1 aurelien 1
<?
2
 
3
// Mon "meta filtre" qui appelle tous les autres
4
function fl_complements($texte_in){
5
        $texte = fl_protocolesobsform(
6
		  fl_envoiobsform(
7
		  fl_annuaire(
8
		    fl_carteform(
9
		    fl_cartographie(
10
		     fl_listepart(
11
        	      fl_graphiqueform(
12
        	       fl_historiqueform(
13
		        fl_inscriptionform(
14
			  fl_nbinscrits($texte_in))))))))));
15
 
16
 
17
        return $texte;
18
}
19
function fl_inside($texte_in){
20
        $texte = fl_graphiqueform($texte_in);
21
        return $texte;
22
}
23
 
24
//fonction contrôlant l'apparition du nombre d'inscrits
25
function fl_nbinscrits($fl_txt){
26
        $fl_patern_in="|<nb_inscrits([^>]*?)>|i";
27
        $fl_replace_in1="";
28
        if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
29
                $GLOBALS['nb_inscrits']=true;
30
                 if (trim($matches[1])<>""){
31
                                $notif_email=trim($matches[1]);
32
                }
33
                $fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
34
        }
35
 
36
        return $fl_txt;
37
}
38
 
39
//fonction contrôlant l'apparition d'un formaulaire de génération de graphiques
40
function fl_graphiqueform($fl_txt){
41
        $fl_patern_in="|<graphique([^>]*?)>|i";
42
        $fl_replace_in1="";
43
        if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
44
                $GLOBALS['graphique']=true;
45
                 if (trim($matches[1])<>""){
46
                                $notif_email=trim($matches[1]);
47
                }
48
                $fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
49
        }
50
 
51
        return $fl_txt;
52
}
53
 
54
// fonction contrôlant l'apparition d'un formulaire d'inscription
55
function fl_inscriptionform($fl_txt){
56
	global $notif_email;
57
	// On récupère le/les email(s) pour la notification
58
	$fl_patern_in="|<inscription([^>]*?)>|i";
59
	$fl_replace_in1="";
60
	if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
61
		$GLOBALS['inscription']=true;
62
		 if (trim($matches[1])<>""){
63
				$notif_email=trim($matches[1]);
64
		}
65
		$fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
66
	}
67
 
68
	return $fl_txt;
69
}
70
 
71
// fonction contrôlant l'apparition de la cartographie (mrflos)
72
function fl_cartographie($fl_txt){
73
	global $notif_email;
74
	// On récupère le/les email(s) pour la notification
75
 
76
	$fl_patern_in="|<cartographie([^>]*?)>|i";
77
	$fl_replace_in1="";
78
	if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
79
		$GLOBALS['cartographie']=true;
80
		 if (trim($matches[1])<>""){
81
				$notif_email=trim($matches[1]);
82
		}
83
		$fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
84
	}
85
 
86
	return $fl_txt;
87
}
88
 
89
// fonction contrôlant l'apparition de la cartographie (mrflos)
90
function fl_annuaire($fl_txt){
91
	global $notif_email;
92
	// On récupère le/les email(s) pour la notification
93
 
94
	$fl_patern_in="|<annuaire([^>]*?)>|i";
95
	$fl_replace_in1="";
96
	if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
97
		$GLOBALS['annuaire']=true;
98
		 if (trim($matches[1])<>""){
99
				$notif_email=trim($matches[1]);
100
		}
101
		$fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
102
	}
103
 
104
	return $fl_txt;
105
}
106
 
107
// fonction contrôlant l'apparition d'un formulaire d'envoi d'observations
108
function fl_historiqueform($fl_txt){
109
	$fl_patern_in="|<historique([^>]*?)>|i";
110
	$fl_replace_in1="";
111
	if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
112
		$GLOBALS['historique']=true;
113
		 if (trim($matches[1])<>""){
114
				$notif_email=trim($matches[1]);
115
		}
116
		$fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
117
	}
118
 
119
	return $fl_txt;
120
}
121
 
122
// fonction contrôlant l'apparition d'un formulaire d'envoi d'observations
123
function fl_envoiobsform($fl_txt){
124
	$fl_patern_in="|<envoi_obs([^>]*?)>|i";
125
	$fl_replace_in1="";
126
	if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
127
		$GLOBALS['envoi_obs']=true;
128
		 if (trim($matches[1])<>""){
129
				$notif_email=trim($matches[1]);
130
		}
131
		$fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
132
	}
133
 
134
	return $fl_txt;
135
}
136
 
137
// fonction contrôlant l'apparition d'un formulaire d'envoi d'observations
138
function fl_carteform($fl_txt){
139
	$fl_patern_in="|<carte([^>]*?)>|i";
140
	$fl_replace_in1="";
141
	if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
142
		$GLOBALS['carteform']=true;
143
		 if (trim($matches[1])<>""){
144
				$notif_email=trim($matches[1]);
145
		}
146
		$fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
147
	}
148
 
149
	return $fl_txt;
150
}
151
 
152
// fonction contrôlant l'apparition de la liste des participants
153
function fl_listepart($fl_txt){
154
	$fl_patern_in="|<liste([^>]*?)>|i";
155
	$fl_replace_in1="";
156
	if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
157
		$GLOBALS['liste']=true;
158
		 if (trim($matches[1])<>""){
159
				$notif_email=trim($matches[1]);
160
		}
161
		$fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
162
	}
163
 
164
	return $fl_txt;
165
}
166
 
167
// fonction contrôlant l'apparition d'un formulaire d'envoi d'observations
168
function fl_protocolesobsform($fl_txt){
169
	$fl_patern_in="|<protocoles_obs([^>]*?)>|i";
170
	$fl_replace_in1="";
171
	if (preg_match($fl_patern_in, $fl_txt, $matches) ) {
172
		$GLOBALS['protocoles_obs']=true;
173
		 if (trim($matches[1])<>""){
174
				$notif_email=trim($matches[1]);
175
		}
176
		$fl_txt = preg_replace($fl_patern_in, "$fl_replace_in1", $fl_txt);
177
	}
178
 
179
	return $fl_txt;
180
}
181
 
182
 
183
// Fonctions génériques provenant du livre PHP4
184
// Utilisées entre autre pour les inscriptions aux colloques
185
function supprimer_encodage_MQ($valeur) {
186
	// si magic quotes est actif, retourner
187
	// la valeur après suppression de l'encodage
188
	// (appel à stripslashes), sinon, retourner
189
	// la valeur
190
	return (get_magic_quotes_gpc())?
191
		stripslashes($valeur):$valeur;
192
}
193
function valeur_saisie($valeur) {
194
	return supprimer_encodage_MQ ( trim($valeur));
195
}
196
function vers_formulaire($valeur) {
197
 
198
	// affichage dans un formulaire
199
 
200
	// encoder tous les caractères HTML spéciaux
201
	// 	- ENT_QUOTES : dont " et '
202
	return htmlentities($valeur,ENT_QUOTES);
203
 
204
}
205
function vers_page($valeur) {
206
 
207
	// affichage direct dans une page
208
 
209
	// 1. encoder tous les caractères HTML spéciaux
210
	// 	- ENT_QUOTES : dont " et '
211
	// 2. transformer les sauts de ligne en <BR>
212
	return nl2br(htmlentities($valeur,ENT_QUOTES));
213
 
214
}
215
function vers_base($valeur) {
216
	// le seul caractère qui pose vraiment problème est
217
	// l'apostrophe (') ; c'est donc le seul qui est échappé
218
	// par cette fonction
219
	// une solution valable pour toutes les bases consiste à
220
	// l'échapper par lui-même remplacement de ' par ''
221
	return str_replace("'","''",$valeur);
222
}
223
function construire_requete($requete) {
224
 
225
	// récupérer le nombre de paramètre
226
	$nombre_param = func_num_args();
227
	// boucler sur tous les paramètres à partir du deuxième
228
	// (le premier contient la requête de base)
229
	for($i=1;$i<$nombre_param;$i++) {
230
 
231
		// récupérer la valeur du paramètre
232
		$valeur = func_get_arg($i);
233
 
234
		// si c'est une chaîne, remplacer ' par ''
235
		if (is_string($valeur)) {
236
			$valeur = str_replace("'","''",$valeur);
237
		}
238
 
239
		// mettre la valeur à son emplacement %n (n = $i)
240
		$requete = str_replace("%$i",$valeur,$requete);
241
	}
242
	// retourner la requête
243
	return $requete;
244
}
245
 
246
function affiche_msg($message)
247
{
248
		$message=addslashes($message);
249
		echo "<script language=\"JavaScript\" type=\"text/JavaScript\">\n";
250
		echo "<!--\n";
251
		echo "alert( '$message')\n";
252
		echo "//-->\n";
253
		echo "</script>\n";
254
}
255
 
256
function fl_at($fl_txt){
257
	$rechercher="@";
258
	$remplacer="<a class=\"hackers\" href=\"mailto:support@microsoft.com\"></a><img src=\"squelettes/design/at.gif\" border=\"0\"  align=\"middle\" alt=\"at\" /><a class=\"hackers\" href=\"mailto:support@microsoft.com\"></a>";
259
	$fl_txt = str_replace($rechercher,$remplacer,$fl_txt);
260
	return $fl_txt;
261
}
262
 
263
?>