| 1 |
<?php
|
1 |
<?php
|
| 2 |
/*vim: set expandtab tabstop=4 shiftwidth=4: */
|
2 |
/*vim: set expandtab tabstop=4 shiftwidth=4: */
|
| 3 |
// +------------------------------------------------------------------------------------------------------+
|
3 |
// +------------------------------------------------------------------------------------------------------+
|
| 4 |
// | PHP version 4.1 |
|
4 |
// | PHP version 4.1 |
|
| 5 |
// +------------------------------------------------------------------------------------------------------+
|
5 |
// +------------------------------------------------------------------------------------------------------+
|
| 6 |
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) |
|
6 |
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) |
|
| 7 |
// +------------------------------------------------------------------------------------------------------+
|
7 |
// +------------------------------------------------------------------------------------------------------+
|
| 8 |
// | This library is free software; you can redistribute it and/or |
|
8 |
// | This library is free software; you can redistribute it and/or |
|
| 9 |
// | modify it under the terms of the GNU Lesser General Public |
|
9 |
// | modify it under the terms of the GNU Lesser General Public |
|
| 10 |
// | License as published by the Free Software Foundation; either |
|
10 |
// | License as published by the Free Software Foundation; either |
|
| 11 |
// | version 2.1 of the License, or (at your option) any later version. |
|
11 |
// | version 2.1 of the License, or (at your option) any later version. |
|
| 12 |
// | |
|
12 |
// | |
|
| 13 |
// | This library is distributed in the hope that it will be useful, |
|
13 |
// | This library is distributed in the hope that it will be useful, |
|
| 14 |
// | but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
14 |
// | but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
| 15 |
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
|
15 |
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
|
| 16 |
// | Lesser General Public License for more details. |
|
16 |
// | Lesser General Public License for more details. |
|
| 17 |
// | |
|
17 |
// | |
|
| 18 |
// | You should have received a copy of the GNU Lesser General Public |
|
18 |
// | You should have received a copy of the GNU Lesser General Public |
|
| 19 |
// | License along with this library; if not, write to the Free Software |
|
19 |
// | License along with this library; if not, write to the Free Software |
|
| 20 |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
|
20 |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
|
| 21 |
// +------------------------------------------------------------------------------------------------------+
|
21 |
// +------------------------------------------------------------------------------------------------------+
|
| 22 |
// CVS : $Id: inscription.fonct.wiki.php,v 1.5 2007-04-06 08:35:46 neiluj Exp $
|
22 |
// CVS : $Id: inscription.fonct.wiki.php,v 1.6 2007-04-11 08:30:12 neiluj Exp $
|
| 23 |
/**
|
23 |
/**
|
| 24 |
* Fonctions wikini
|
24 |
* Fonctions wikini
|
| 25 |
*
|
25 |
*
|
| 26 |
* Ce fichier propose 3 fonctions pour intervenir sur la table interwikini_users.
|
26 |
* Ce fichier propose 3 fonctions pour intervenir sur la table interwikini_users.
|
| 27 |
*
|
27 |
*
|
| 28 |
*@package inscription
|
28 |
*@package inscription
|
| 29 |
*@subpackage fonctions_wikini
|
29 |
*@subpackage fonctions_wikini
|
| 30 |
//Auteur original :
|
30 |
//Auteur original :
|
| 31 |
*@author Alexandre Granier <alexandre@tela-botanica.org>
|
31 |
*@author Alexandre Granier <alexandre@tela-botanica.org>
|
| 32 |
//Autres auteurs :
|
32 |
//Autres auteurs :
|
| 33 |
*@author Aucun
|
33 |
*@author Aucun
|
| 34 |
*@copyright Tela-Botanica 2000-2004
|
34 |
*@copyright Tela-Botanica 2000-2004
|
| 35 |
*@version $Revision: 1.5 $ $Date: 2007-04-06 08:35:46 $
|
35 |
*@version $Revision: 1.6 $ $Date: 2007-04-11 08:30:12 $
|
| 36 |
// +------------------------------------------------------------------------------------------------------+
|
36 |
// +------------------------------------------------------------------------------------------------------+
|
| 37 |
*/
|
37 |
*/
|
| 38 |
|
38 |
|
| 39 |
// +------------------------------------------------------------------------------------------------------+
|
39 |
// +------------------------------------------------------------------------------------------------------+
|
| 40 |
// | ENTETE du PROGRAMME |
|
40 |
// | ENTETE du PROGRAMME |
|
| 41 |
// +------------------------------------------------------------------------------------------------------+
|
41 |
// +------------------------------------------------------------------------------------------------------+
|
| 42 |
|
42 |
|
| 43 |
// +------------------------------------------------------------------------------------------------------+
|
43 |
// +------------------------------------------------------------------------------------------------------+
|
| 44 |
// | LISTE de FONCTIONS |
|
44 |
// | LISTE de FONCTIONS |
|
| 45 |
// +------------------------------------------------------------------------------------------------------+
|
45 |
// +------------------------------------------------------------------------------------------------------+
|
| 46 |
|
46 |
|
| 47 |
function inscription_interwikini_users($id, $valeur) {
|
47 |
function inscription_interwikini_users($id, $valeur) {
|
| - |
|
48 |
// On vérifie l'existance du nom wiki dans interwikini_users
|
| - |
|
49 |
$requete_verif = 'select name from interwikini_users where name="'.$valeur['nom_wiki'].'"';
|
| - |
|
50 |
$resultat_verif = $GLOBALS['ins_db']->query ($requete_verif) ;
|
| - |
|
51 |
if (DB::isError($resultat_verif)) {
|
| - |
|
52 |
echo ("Echec de la requete dans interwikini_users<br />".$resultat_verif->getMessage()) ;
|
| 48 |
|
53 |
}
|
| - |
|
54 |
if ($resultat_verif->numRows() != 0) {
|
| - |
|
55 |
return ;
|
| - |
|
56 |
}
|
| 49 |
$requete = "insert into interwikini_users set name=\"".$valeur['nom_wiki'].
|
57 |
$requete = "insert into interwikini_users set name=\"".$valeur['nom_wiki'].
|
| 50 |
"\", password=\"".md5($valeur['mot_de_passe'])."\", email=\"".$valeur['email']."\"" ;
|
58 |
"\", password=\"".md5($valeur['mot_de_passe'])."\", email=\"".$valeur['email']."\"".
|
| - |
|
59 |
', signuptime=now()' ;
|
| 51 |
$resultat = $GLOBALS['ins_db']->query ($requete) ;
|
60 |
$resultat = $GLOBALS['ins_db']->query ($requete) ;
|
| 52 |
if (DB::isError($resultat)) {
|
61 |
if (DB::isError($resultat)) {
|
| 53 |
echo ("Echec de la requete dans interwikini_users<br />".$resultat->getMessage()) ;
|
62 |
echo ("Echec de la requete dans interwikini_users<br />".$resultat->getMessage()) ;
|
| 54 |
}
|
63 |
}
|
| 55 |
}
|
64 |
}
|
| 56 |
|
65 |
|
| 57 |
function mod_inscription_interwikini_users($nomwiki, $valeur) {
|
66 |
function mod_inscription_interwikini_users($nomwiki, $valeur) {
|
| 58 |
|
67 |
|
| 59 |
$requete = "update interwikini_users set password=\"".md5($valeur['mot_de_passe'])."\", email=\"".$valeur['email']."\"".
|
68 |
$requete = "update interwikini_users set password=\"".md5($valeur['mot_de_passe'])."\", email=\"".$valeur['email']."\"".
|
| 60 |
" where name=\"$nomwiki\"" ;
|
69 |
" where name=\"$nomwiki\"" ;
|
| 61 |
$resultat = $GLOBALS['ins_db']->query ($requete) ;
|
70 |
$resultat = $GLOBALS['ins_db']->query ($requete) ;
|
| 62 |
if (DB::isError($resultat)) {
|
71 |
if (DB::isError($resultat)) {
|
| 63 |
die ("Echec de la requete dans interwikini_users<br />".$resultat->getMessage()) ;
|
72 |
die ("Echec de la requete dans interwikini_users<br />".$resultat->getMessage()) ;
|
| 64 |
}
|
73 |
}
|
| 65 |
}
|
74 |
}
|
| 66 |
|
75 |
|
| 67 |
function desinscription_interwikini_users($nomwiki) {
|
76 |
function desinscription_interwikini_users($nomwiki) {
|
| 68 |
$requete = "delete from interwikini_users where name=\"$nomwiki\"" ;
|
77 |
$requete = "delete from interwikini_users where name=\"$nomwiki\"" ;
|
| 69 |
$resultat = $GLOBALS['ins_db']->query ($requete) ;
|
78 |
$resultat = $GLOBALS['ins_db']->query ($requete) ;
|
| 70 |
if (DB::isError($resultat)) {
|
79 |
if (DB::isError($resultat)) {
|
| 71 |
die ("Echec de la requete dans interwikini_users<br />".$resultat->getMessage()) ;
|
80 |
die ("Echec de la requete dans interwikini_users<br />".$resultat->getMessage()) ;
|
| 72 |
}
|
81 |
}
|
| 73 |
}
|
82 |
}
|
| 74 |
|
83 |
|
| 75 |
function verif_doublonNomWiki($nom_wiki) {
|
84 |
function verif_doublonNomWiki($nom_wiki) {
|
| 76 |
global $db ;
|
85 |
global $db ;
|
| 77 |
$requete = "select name from interwikini_users where name = \"$nom_wiki\" limit 1" ;
|
86 |
$requete = "select name from interwikini_users where name = \"$nom_wiki\"" ;
|
| 78 |
$resultat = $db->query ($requete) ;
|
87 |
$resultat = $db->query ($requete) ;
|
| 79 |
if (DB::isError ($resultat)) {
|
88 |
if (DB::isError ($resultat)) {
|
| 80 |
die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;
|
89 |
die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;
|
| 81 |
}
|
90 |
}
|
| 82 |
if ($resultat->numRows() == 0) return true ;
|
91 |
if ($resultat->numRows() == 0) return true ;
|
| 83 |
return false ;
|
92 |
return false ;
|
| 84 |
}
|
93 |
}
|
| 85 |
|
94 |
|
| 86 |
function wiki_cookie() {
|
95 |
function wiki_cookie() {
|
| 87 |
if ($userid != "") {
|
96 |
if ($userid != "") {
|
| 88 |
// 1. name
|
97 |
// 1. name
|
| 89 |
// On recherche le nom
|
98 |
// On recherche le nom
|
| 90 |
$nomwikini = $AUTH->getAuthData('ga_login') ;
|
99 |
$nomwikini = $AUTH->getAuthData('ga_login') ;
|
| 91 |
setcookie ("name", $nomwikini, time () + 3600 * 24 * 30, "/" ) ; // 1 mois
|
100 |
setcookie ("name", $nomwikini, time () + 3600 * 24 * 30, "/" ) ; // 1 mois
|
| 92 |
//2. password
|
101 |
//2. password
|
| 93 |
// on recherche le mot de passe crypté
|
102 |
// on recherche le mot de passe crypté
|
| 94 |
$requete = "select ga_mot_de_passe from gen_annuaire where ga_id_administrateur=$userid" ;
|
103 |
$requete = "select ga_mot_de_passe from gen_annuaire where ga_id_administrateur=$userid" ;
|
| 95 |
$resultat = $db->query ($requete) ;
|
104 |
$resultat = $db->query ($requete) ;
|
| 96 |
if (DB::isError($resultat)) {
|
105 |
if (DB::isError($resultat)) {
|
| 97 |
die ("Erreur") ;
|
106 |
die ("Erreur") ;
|
| 98 |
}
|
107 |
}
|
| 99 |
$ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
|
108 |
$ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
|
| 100 |
$mot_de_passe = $ligne->ga_mot_de_passe ;
|
109 |
$mot_de_passe = $ligne->ga_mot_de_passe ;
|
| 101 |
setcookie ("password", $mot_de_passe, time () + 3600 * 24 * 30, "/") ;
|
110 |
setcookie ("password", $mot_de_passe, time () + 3600 * 24 * 30, "/") ;
|
| 102 |
// 3. remember
|
111 |
// 3. remember
|
| 103 |
setcookie ("remember", 1, time () + 3600 * 24 * 30, "/") ;
|
112 |
setcookie ("remember", 1, time () + 3600 * 24 * 30, "/") ;
|
| 104 |
}
|
113 |
}
|
| 105 |
}
|
114 |
}
|
| 106 |
|
115 |
|
| 107 |
/* +--Fin du code ----------------------------------------------------------------------------------------+
|
116 |
/* +--Fin du code ----------------------------------------------------------------------------------------+
|
| 108 |
*
|
117 |
*
|
| 109 |
* $Log: not supported by cvs2svn $
|
118 |
* $Log: not supported by cvs2svn $
|
| - |
|
119 |
* Revision 1.4 2006/07/04 09:39:03 alexandre_tb
|
| - |
|
120 |
* correction d'un bug mineur
|
| - |
|
121 |
*
|
| - |
|
122 |
* Revision 1.3 2006/04/11 08:42:07 alexandre_tb
|
| - |
|
123 |
* Vérification de l'existance d'un nom wiki avant son insertion
|
| - |
|
124 |
*
|
| 110 |
* Revision 1.2 2005/09/29 13:56:48 alexandre_tb
|
125 |
* Revision 1.2 2005/09/29 13:56:48 alexandre_tb
|
| 111 |
* En cours de production. Reste à gérer les news letters et d'autres choses.
|
126 |
* En cours de production. Reste à gérer les news letters et d'autres choses.
|
| 112 |
*
|
127 |
*
|
| 113 |
* Revision 1.1 2005/09/22 14:02:49 ddelon
|
128 |
* Revision 1.1 2005/09/22 14:02:49 ddelon
|
| 114 |
* nettoyage annuaire et php5
|
129 |
* nettoyage annuaire et php5
|
| 115 |
*
|
130 |
*
|
| 116 |
* Revision 1.4 2005/09/22 13:30:49 florian
|
131 |
* Revision 1.4 2005/09/22 13:30:49 florian
|
| 117 |
* modifs pour compatibilité XHTML Strict + corrections de bugs (mais ya encore du boulot!!)
|
132 |
* modifs pour compatibilité XHTML Strict + corrections de bugs (mais ya encore du boulot!!)
|
| 118 |
*
|
133 |
*
|
| 119 |
* Revision 1.2 2005/03/21 16:57:30 florian
|
134 |
* Revision 1.2 2005/03/21 16:57:30 florian
|
| 120 |
* correction de bug, mise à jour interface
|
135 |
* correction de bug, mise à jour interface
|
| 121 |
*
|
136 |
*
|
| 122 |
* Revision 1.1 2004/12/15 13:32:25 alex
|
137 |
* Revision 1.1 2004/12/15 13:32:25 alex
|
| 123 |
* version initiale
|
138 |
* version initiale
|
| 124 |
*
|
139 |
*
|
| 125 |
* Revision 1.1 2004/07/06 15:42:17 alex
|
140 |
* Revision 1.1 2004/07/06 15:42:17 alex
|
| 126 |
* en cours
|
141 |
* en cours
|
| 127 |
*
|
142 |
*
|
| 128 |
* Revision 1.1 2004/06/18 09:20:48 alex
|
143 |
* Revision 1.1 2004/06/18 09:20:48 alex
|
| 129 |
* version initiale
|
144 |
* version initiale
|
| 130 |
*
|
145 |
*
|
| 131 |
*
|
146 |
*
|
| 132 |
* +-- Fin du code ----------------------------------------------------------------------------------------+
|
147 |
* +-- Fin du code ----------------------------------------------------------------------------------------+
|
| 133 |
*/
|
148 |
*/
|
| 134 |
|
149 |
|
| 135 |
|
150 |
|
| 136 |
|
151 |
|
| 137 |
|
152 |
|
| 138 |
?>
|
153 |
?>
|