Subversion Repositories Applications.papyrus

Rev

Rev 302 | Rev 2088 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 302 Rev 332
Line 19... Line 19...
19 
// |                                                                                                      |
 19 
// |                                                                                                      |
20 
// | You should have received a copy of the GNU General Public License                                    |
 20 
// | You should have received a copy of the GNU General Public License                                    |
21 
// | along with Foobar; if not, write to the Free Software                                                |
 21 
// | along with Foobar; if not, write to the Free Software                                                |
22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
 22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23 
// +------------------------------------------------------------------------------------------------------+
 23 
// +------------------------------------------------------------------------------------------------------+
24 
// CVS : $Id: adau_auth.fonct.php,v 1.1 2005-03-09 10:49:52 jpm Exp $
 24 
// CVS : $Id: adau_auth.fonct.php,v 1.2 2005-04-14 13:54:51 jpm Exp $
25 
/**
 25 
/**
26 
* Contient les fonctions de l'appli admin_auth
 26 
* Contient les fonctions de l'appli admin_auth
27 
*
 27 
*
28 
*
28 
*
29 
*
29 
*
Line 33... Line 33...
33 
//Auteur original :
 33 
//Auteur original :
34 
*@author        Alexandre Granier <alexandre@tela-botanica.org>
 34 
*@author        Alexandre Granier <alexandre@tela-botanica.org>
35 
//Autres auteurs :
 35 
//Autres auteurs :
36 
*@author        Aucun
 36 
*@author        Aucun
37 
*@copyright     Tela-Botanica 2000-2004
 37 
*@copyright     Tela-Botanica 2000-2004
38 
*@version       $Revision: 1.1 $
 38 
*@version       $Revision: 1.2 $
39 
// +------------------------------------------------------------------------------------------------------+
 39 
// +------------------------------------------------------------------------------------------------------+
40 
*/
 40 
*/
Line 41... Line 41...
41 
 
 41 
 
42 
// +------------------------------------------------------------------------------------------------------+
 42 
// +------------------------------------------------------------------------------------------------------+
Line 46... Line 46...
46 
/**
 46 
/**
47 
 *
 47 
 *
48 
 *
 48 
 *
49 
 * @return
 49 
 * @return
50 
 */
 50 
 */
51 
 
 - 
 
52 
function adau_supprimer_authentification($id_auth, &$db) {
 51 
function adau_supprimer_authentification($id_auth, &$db)
53 
 
 52 
{
54 
    // on recherche l'identifiant de gen_site_auth_bdd à partir de gen_site_auth
 53 
    // Recherche l'identifiant de gen_site_auth_bdd à partir de gen_site_auth
55 
    $requete = "select gsa_ce_auth_bdd from gen_site_auth where gsa_id_auth=".$GLOBALS['id_auth'] ;
 54 
    $requete = 'SELECT gsa_ce_auth_bdd FROM gen_site_auth WHERE gsa_id_auth = '.$GLOBALS['id_auth'];
56 
    $resultat = $db->query ($requete) ;
 55 
    $resultat = $db->query ($requete) ;
57 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
 56 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
58 
    $id_auth_bdd = $ligne->gsa_ce_auth_bdd ;
 57 
    $id_auth_bdd = $ligne->gsa_ce_auth_bdd ;
Line 59... Line 58...
59
58
60 
    $requete = "delete from gen_site_auth where gsa_id_auth=$id_auth" ;
 59 
    $requete = 'DELETE FROM gen_site_auth WHERE gsa_id_auth = '.$id_auth;
Line 61... Line 60...
61 
    $resultat = $db->query ($requete) ;
 60 
    $resultat = $db->query($requete);
62
61
63 
    $requete = "delete from gen_site_auth_bdd where gsab_id_auth_bdd=$id_auth_bdd" ;
 62 
    $requete = 'DELETE FROM gen_site_auth_bdd WHERE gsab_id_auth_bdd = '.$id_auth_bdd;
Line 64... Line 63...
64 
    $resultat = $db->query ($requete) ;
 63 
    $resultat = $db->query($requete);
65 
}
 64 
}
66 
 
 65 
 
67 
/**
 66 
/**
68 
 *
 67 
 *
69 
 *
 - 
 
70 
 * @return
 68 
 *
- 
 
 69 
 * @return
71 
 */
 70 
 */
72 
 
 - 
 
73 
function adau_valeurs_par_defaut ($id_auth, &$db) {
 71 
function adau_valeurs_par_defaut($id_auth, &$db)
74 
    // requete sur gen_site_auth
 72 
{
75
73 
    // Requete sur gen_site_auth
76 
    $requete = "select * from gen_site_auth where gsa_id_auth=$id_auth" ;
 74 
    $requete = 'SELECT * FROM gen_site_auth WHERE gsa_id_auth = '.$id_auth;
77 
    $resultat = $db->query ($requete) ;
 75 
    $resultat = $db->query($requete);
78 
    if (DB::isError ($resultat)) {
 76 
    if (DB::isError($resultat)) {
79 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(), E_USER_WARNING) ;
 77 
        trigger_error('Échec de la requete : '.$requete.'<br />'.$resultat->getMessage(), E_USER_WARNING);
80 
        return ;
 78 
        return ;
81 
    }
 79 
    }
82 
    $tableau_retour = array () ;
 80 
    $tableau_retour = array();
83 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
 81 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
84 
    $tableau_retour['nom_auth'] = $ligne->gsa_nom ;
 82 
    $tableau_retour['nom_auth'] = $ligne->gsa_nom;
85 
    $tableau_retour['abreviation'] = $ligne->gsa_abreviation ;
 83 
    $tableau_retour['abreviation'] = $ligne->gsa_abreviation;
86 
    $tableau_retour['id_auth_bdd'] = $ligne->gsa_ce_auth_bdd ;
 84 
    $tableau_retour['id_auth_bdd'] = $ligne->gsa_ce_auth_bdd;
87 
    $tableau_retour['id_auth'] = $ligne->gsa_id_auth ;
 85 
    $tableau_retour['id_auth'] = $ligne->gsa_id_auth;
88 
    unset ($requete, $resultat) ;
 86 
    unset($requete, $resultat);
89
87
90 
    // requete sur gen_site_auth_bdd
 88 
    // Requete sur gen_site_auth_bdd
91 
    $requete = "select * from gen_site_auth_bdd where gsab_id_auth_bdd=$ligne->gsa_ce_auth_bdd" ;
 89 
    $requete = 'SELECT * FROM gen_site_auth_bdd WHERE gsab_id_auth_bdd = '.$ligne->gsa_ce_auth_bdd;
92 
    unset ($ligne) ;
 90 
    unset($ligne);
93 
    $resultat = $db->query ($requete) ;
 91 
    $resultat = $db->query($requete);
94 
    if (DB::isError ($resultat)) {
 92 
    if (DB::isError($resultat)) {
Line 95... Line 93...
95 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
 93 
        trigger_error('Échec de la requete : '.$requete.'<br />'.$resultat->getMessage(), E_USER_WARNING);
96 
        return ;
 94 
        return ;
97 
    }
 95 
    }
98
96
99 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
 97 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
100 
    $tableau_retour['dsn'] = $ligne->gsab_dsn ;
 98 
    $tableau_retour['dsn'] = $ligne->gsab_dsn;
101 
    $tableau_retour['nom_table'] = $ligne->gsab_nom_table ;
 99 
    $tableau_retour['nom_table'] = $ligne->gsab_nom_table;
Line 102... Line 100...
102 
    $tableau_retour['champs_login'] = $ligne->gsab_nom_champ_login ;
 100 
    $tableau_retour['champs_login'] = $ligne->gsab_nom_champ_login;
103 
    $tableau_retour['champs_passe'] = $ligne->gsab_nom_champ_mdp ;
 101 
    $tableau_retour['champs_passe'] = $ligne->gsab_nom_champ_mdp;
Line 104... Line 102...
104 
    $tableau_retour['cryptage'] = $ligne->gsab_cryptage_mdp ;
 102 
    $tableau_retour['cryptage'] = $ligne->gsab_cryptage_mdp;
105 
    $tableau_retour['parametres'] = $ligne->gsab_parametres ;
 103 
    $tableau_retour['parametres'] = $ligne->gsab_parametres;
106
104
107 
    return $tableau_retour ;
 105 
    return $tableau_retour;
108 
}
 106 
}
109 
 
 - 
 
110 
/**
 107 
 
- 
 
 108 
/**
111 
 *
 109 
 *
112 
 *
 110 
 *
113 
 * @return
 111 
 * @return
114 
 */
 112 
 */
115 
 
 113 
function insertion ($valeur, &$db)
116 
function insertion ($valeur, &$db) {
 114 
{
117 
    $id_auth_bdd = SQL_obtenirNouveauId ($db, 'gen_site_auth_bdd', 'gsab_id_auth_bdd') ;
 115 
    $id_auth_bdd = SQL_obtenirNouveauId($db, 'gen_site_auth_bdd', 'gsab_id_auth_bdd');
118 
    $requete = "insert into gen_site_auth set gsa_id_auth="
 116 
    $requete = 'INSERT INTO gen_site_auth SET gsa_id_auth = '
- 
 
 117 
                .SQL_obtenirNouveauId($db, 'gen_site_auth', 'gsa_id_auth').', '
119 
                .SQL_obtenirNouveauId($db, 'gen_site_auth', 'gsa_id_auth').","
 118 
                .requete_site_auth($valeur)
120 
                .requete_site_auth($valeur)
 119 
                .', gsa_ce_auth_bdd = '.$id_auth_bdd;
121 
                .', gsa_ce_auth_bdd='.$id_auth_bdd ;
 - 
 
122 
    $resultat = $db->query ($requete) ;
 120 
    $resultat = $db->query($requete);
123 
    if (DB::isError ($resultat)) {
 121 
    if (DB::isError($resultat)) {
124 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
 122 
        trigger_error('Échec de la requete : '.$requete.'<br />'.$resultat->getMessage(), E_USER_WARNING);
- 
 
 123 
        return ;
125 
    }
 124 
    }
126 
    $requete = "insert into gen_site_auth_bdd set gsab_id_auth_bdd=$id_auth_bdd, "
 125 
    $requete = 'INSERT INTO gen_site_auth_bdd SET gsab_id_auth_bdd = '.$id_auth_bdd.', '.requete_site_auth_bdd($valeur);
Line 127... Line 126...
127 
                .requete_site_auth_bdd($valeur) ;
 126 
    $resultat = $db->query($requete);
128 
    $resultat = $db->query ($requete) ;
 127 
    if (DB::isError($resultat)) {
129 
    if (DB::isError ($resultat)) {
 128 
        trigger_error('Échec de la requete : '.$requete.'<br />'.$resultat->getMessage(), E_USER_WARNING);
130 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
 129 
        return ;
131 
    }
 130 
    }
132 
}
 - 
 
133 
 
 131 
}
- 
 
 132 
 
134 
/**
 133 
/**
135 
 *
 134 
 *
136 
 *
 135 
 *
137 
 * @return
 136 
 * @return
138 
 */
 137 
 */
- 
 
 138 
function mise_a_jour($valeur, &$db)
139 
 
 139 
{
140 
function mise_a_jour ($valeur, &$db) {
 140 
    $requete =  'UPDATE gen_site_auth SET '.requete_site_auth($valeur).' '.
141 
    $requete = "update gen_site_auth set ".requete_site_auth($valeur)
 141 
                'WHERE gsa_id_auth = '.$GLOBALS['id_auth'];
142 
                .' where gsa_id_auth='.$GLOBALS['id_auth'] ;
 142 
    $resultat = $db->query($requete);
143 
    $resultat = $db->query ($requete) ;
 143 
    if (DB::isError($resultat)) {
144 
    if (DB::isError ($resultat)) {
 144 
        trigger_error('Échec de la requete : '.$requete.'<br />'.$resultat->getMessage(), E_USER_WARNING);
145 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
 145 
        return ;
Line 146... Line 146...
146 
    }
 146 
    }
147 
    unset ($requete) ;
 147 
    unset($requete);
148 
    // on recherche l'identifiant de gen_site_auth_bdd à partir de gen_site_auth
 148 
    // Recherche l'identifiant de gen_site_auth_bdd à partir de gen_site_auth
149 
    $requete = "select gsa_ce_auth_bdd from gen_site_auth where gsa_id_auth=".$GLOBALS['id_auth'] ;
 149 
    $requete = 'SELECT gsa_ce_auth_bdd FROM gen_site_auth WHERE gsa_id_auth = '.$GLOBALS['id_auth'];
150 
    $resultat = $db->query ($requete) ;
 150 
    $resultat = $db->query($requete);
151 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
 151 
    $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
- 
 
 152 
    $id_auth_bdd = $ligne->gsa_ce_auth_bdd;
152 
    $id_auth_bdd = $ligne->gsa_ce_auth_bdd ;
 153
153
154 
    $requete =  'UPDATE gen_site_auth_bdd SET '
Line 154... Line 155...
154 
    $requete = "update gen_site_auth_bdd set "
 155 
                .requete_site_auth_bdd($valeur)
155 
                .requete_site_auth_bdd($valeur)
 156 
                .' WHERE gsab_id_auth_bdd = '.$id_auth_bdd;
156 
                .' where gsab_id_auth_bdd='.$id_auth_bdd ;
 157 
    $resultat = $db->query($requete);
157 
    $resultat = $db->query ($requete) ;
 158 
    if (DB::isError($resultat)) {
158 
    if (DB::isError ($resultat)) {
 159 
        trigger_error('Échec de la requete : '.$requete.'<br />'.$resultat->getMessage(), E_USER_WARNING);
159 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
 - 
 
160 
    }
 160 
        return ;
- 
 
 161 
    }
161 
}
 162 
}
162 
 
 163 
 
163 
/**
 164 
/**
164 
 *
 165 
 *
Line 165... Line 166...
165 
 *
 166 
 *
166 
 * @return  string  un morceau de code SQL
 167 
 * @return  string  un morceau de code SQL
167 
 */
 168 
 */
168 
 
 169 
function requete_site_auth(&$valeur)
169 
function requete_site_auth (&$valeur) {
 170 
{
170 
    return   'gsa_nom="'.$valeur['nom_auth'].'", '
 - 
 
171 
            .'gsa_ce_type_auth=1, '
 171 
    return   'gsa_nom="'.$valeur['nom_auth'].'", '
- 
 
 172 
            .'gsa_ce_type_auth=1, '
172 
            .'gsa_abreviation="'.$valeur['abreviation'].'"' ;
 173 
            .'gsa_abreviation="'.$valeur['abreviation'].'"' ;
173 
}
 174 
}
174 
 
 175 
 
175 
/**
 176 
/**
176 
 *
 177 
 *
Line 192... Line 193...
192 
 
 193 
 
193 
 
 194 
 
194 
/* +--Fin du code ----------------------------------------------------------------------------------------+
 195 
/* +--Fin du code ----------------------------------------------------------------------------------------+
- 
 
 196 
*
- 
 
 197 
* $Log: not supported by cvs2svn $
- 
 
 198 
* Revision 1.1  2005/03/09 10:49:52  jpm
195 
*
 199 
* Changement d'un nom de fichier.
196 
* $Log: not supported by cvs2svn $
 200 
*
197 
* Revision 1.2  2004/12/06 12:43:21  alex
 201 
* Revision 1.2  2004/12/06 12:43:21  alex
198 
* ajout du champs paramètre dans ls authentification
 202 
* ajout du champs paramètre dans ls authentification
199 
*
 203 
*