Subversion Repositories Applications.papyrus

Rev

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

Rev 229 Rev 300
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: admi_application.fonct.php,v 1.1 2004-12-13 18:07:28 alex Exp $
 24 
// CVS : $Id: admi_application.fonct.php,v 1.2 2005-03-09 10:40:33 alex 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 47... Line 47...
47 
 *
 47 
 *
48 
 *
 48 
 *
49 
 * @return
 49 
 * @return
50 
 */
 50 
 */
Line 51... Line 51...
51 
 
 51 
 
52 
function adau_supprimer_authentification($id_auth, &$db) {
 - 
 
53 
 
 - 
 
54 
    // on 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'] ;
 - 
 
56 
    $resultat = $db->query ($requete) ;
 - 
 
57 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
 - 
 
58 
    $id_auth_bdd = $ligne->gsa_ce_auth_bdd ;
 - 
 
59
52 
function adap_supprimer_application($id_appl, &$db) {
60 
    $requete = "delete from gen_site_auth where gsa_id_auth=$id_auth" ;
 - 
 
61 
    $resultat = $db->query ($requete) ;
 - 
 
62
- 
 
63 
    $requete = "delete from gen_site_auth_bdd where gsab_id_auth_bdd=$id_auth_bdd" ;
 53 
    $requete = "delete from gen_application where gap_id_application=$id_appl" ;
64 
    $resultat = $db->query ($requete) ;
 54 
    $resultat = $db->query ($requete) ;
Line 65... Line 55...
65 
}
 55 
}
66 
 
 56 
 
67 
/**
 57 
/**
68 
 *
 58 
 *
69 
 *
 59 
 *
Line 70... Line 60...
70 
 * @return
 60 
 * @return
71 
 */
 61 
 */
Line 72... Line 62...
72 
 
 62 
 
73 
function adau_valeurs_par_defaut ($id_auth, &$db) {
 63 
function adap_valeurs_par_defaut ($id_appl, &$db) {
74 
    // requete sur gen_site_auth
 64 
    // requete sur gen_site_auth
75
65
76 
    $requete = "select * from gen_site_auth where gsa_id_auth=$id_auth" ;
 66 
    $requete = "select * from gen_application where gap_id_application=$id_appl" ;
77 
    $resultat = $db->query ($requete) ;
 67 
    $resultat = $db->query ($requete) ;
78 
    if (DB::isError ($resultat)) {
 68 
    if (DB::isError ($resultat)) {
79 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(), E_USER_WARNING) ;
 69 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(), E_USER_WARNING) ;
80 
        return ;
 70 
        return ;
81 
    }
 71 
    }
82 
    $tableau_retour = array () ;
 72 
    $tableau_retour = array () ;
83 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
 73 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
84 
    $tableau_retour['nom_auth'] = $ligne->gsa_nom ;
 74 
    $tableau_retour['nom_appl'] = $ligne->gap_nom ;
85 
    $tableau_retour['abreviation'] = $ligne->gsa_abreviation ;
 - 
 
86 
    $tableau_retour['id_auth_bdd'] = $ligne->gsa_ce_auth_bdd ;
 - 
 
87 
    $tableau_retour['id_auth'] = $ligne->gsa_id_auth ;
 - 
 
88 
    unset ($requete, $resultat) ;
 - 
 
89
- 
 
90 
    // requete sur gen_site_auth_bdd
 - 
 
91 
    $requete = "select * from gen_site_auth_bdd where gsab_id_auth_bdd=$ligne->gsa_ce_auth_bdd" ;
 - 
 
92 
    unset ($ligne) ;
 - 
 
93 
    $resultat = $db->query ($requete) ;
 - 
 
94 
    if (DB::isError ($resultat)) {
 - 
 
95 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
 - 
 
96 
        return ;
 - 
 
97 
    }
 - 
 
98
- 
 
99 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
 - 
 
100 
    $tableau_retour['dsn'] = $ligne->gsab_dsn ;
 - 
 
101 
    $tableau_retour['nom_table'] = $ligne->gsab_nom_table ;
 - 
 
102 
    $tableau_retour['champs_login'] = $ligne->gsab_nom_champ_login ;
 75 
    $tableau_retour['description'] = $ligne->gap_description ;
103 
    $tableau_retour['champs_passe'] = $ligne->gsab_nom_champ_mdp ;
 76 
    $tableau_retour['chemin'] = $ligne->gap_chemin ;
Line 104... Line 77...
104 
    $tableau_retour['cryptage'] = $ligne->gsab_cryptage_mdp ;
 77 
    $tableau_retour['applette'] = $ligne->gap_bool_applette ;
105
78 
    unset ($requete, $resultat) ;
106 
    return $tableau_retour ;
 79 
    return $tableau_retour ;
107 
}
 80 
}
108 
 
 81 
 
Line 109... Line 82...
109 
/**
 82 
/**
110 
 *
 83 
 *
111 
 *
 84 
 *
112 
 * @return
 - 
 
113 
 */
 85 
 * @return
114 
 
 - 
 
115 
function insertion ($valeur, &$db) {
 - 
 
116 
    $id_auth_bdd = SQL_obtenirNouveauId ($db, 'gen_site_auth_bdd', 'gsab_id_auth_bdd') ;
 - 
 
117 
    $requete = "insert into gen_site_auth set gsa_id_auth="
 - 
 
118 
                .SQL_obtenirNouveauId($db, 'gen_site_auth', 'gsa_id_auth').","
 - 
 
119 
                .requete_site_auth($valeur)
 - 
 
120 
                .', gsa_ce_auth_bdd='.$id_auth_bdd ;
 86 
 */
121 
    $resultat = $db->query ($requete) ;
 87 
 
122 
    if (DB::isError ($resultat)) {
 88 
function insertion ($valeur, &$db) {
123 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
 89 
    $id_appl_bdd = SQL_obtenirNouveauId ($db, 'gen_application', 'gap_id_application') ;
124 
    }
 90 
    $requete = "insert into gen_application set gap_id_application="
125 
    $requete = "insert into gen_site_auth_bdd set gsab_id_auth_bdd=$id_auth_bdd, "
 91 
                .$id_appl_bdd.","
Line 135... Line 101...
135 
 *
 101 
 *
136 
 * @return
 102 
 * @return
137 
 */
 103 
 */
Line 138... Line 104...
138 
 
 104 
 
139 
function mise_a_jour ($valeur, &$db) {
 105 
function mise_a_jour ($valeur, &$db) {
140 
    $requete = "update gen_site_auth set ".requete_site_auth($valeur)
 106 
    $requete = "update gen_application set ".requete_site_appl($valeur)
141 
                .' where gsa_id_auth='.$GLOBALS['id_auth'] ;
 - 
 
142 
    $resultat = $db->query ($requete) ;
 - 
 
143 
    if (DB::isError ($resultat)) {
 - 
 
144 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
 - 
 
145 
    }
 - 
 
146 
    unset ($requete) ;
 - 
 
147 
    // on recherche l'identifiant de gen_site_auth_bdd à partir de gen_site_auth
 - 
 
148 
    $requete = "select gsa_ce_auth_bdd from gen_site_auth where gsa_id_auth=".$GLOBALS['id_auth'] ;
 - 
 
149 
    $resultat = $db->query ($requete) ;
 - 
 
150 
    $ligne = $resultat->fetchRow (DB_FETCHMODE_OBJECT) ;
 - 
 
151 
    $id_auth_bdd = $ligne->gsa_ce_auth_bdd ;
 - 
 
152
- 
 
153 
    $requete = "update gen_site_auth_bdd set "
 - 
 
154 
                .requete_site_auth_bdd($valeur)
 - 
 
155 
                .' where gsab_id_auth_bdd='.$id_auth_bdd ;
 107 
                .' where gap_id_application='.$GLOBALS['id_appl'] ;
156 
    $resultat = $db->query ($requete) ;
 108 
    $resultat = $db->query ($requete) ;
157 
    if (DB::isError ($resultat)) {
 109 
    if (DB::isError ($resultat)) {
158 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
 110 
        trigger_error("Echec de la requete : $requete<br />".$resultat->getMessage(),E_USER_WARNING) ;
159 
    }
 111 
    }
Line 163... Line 115...
163 
 *
 115 
 *
164 
 *
 116 
 *
165 
 * @return  string  un morceau de code SQL
 117 
 * @return  string  un morceau de code SQL
166 
 */
 118 
 */
Line 167... Line 119...
167 
 
 119 
 
168 
function requete_site_auth (&$valeur) {
 120 
function requete_site_appl (&$valeur) {
- 
 
 121 
    return   'gap_nom="'.$valeur['nom_appl'].'", '
169 
    return   'gsa_nom="'.$valeur['nom_auth'].'", '
 122 
            .'gap_description="'.$valeur['description'].'", '
170 
            .'gsa_ce_type_auth=1, '
 123 
            .'gap_chemin="'.$valeur['chemin'].'", '
171 
            .'gsa_abreviation="'.$valeur['abreviation'].'"' ;
 124 
            .'gap_bool_applette="'.$valeur['applette'].'"';
Line 172... Line -...
172 
}
 - 
 
173 
 
 - 
 
174 
/**
 - 
 
175 
 *
 - 
 
176 
 *
 - 
 
Line 177... Line -...
177 
 * @return
 - 
 
178 
 */
 - 
 
179 
 
 - 
 
180 
function requete_site_auth_bdd (&$valeur) {
 - 
 
181 
    return 'gsab_dsn="'.$valeur['dsn'].'", '
 - 
 
182 
            .'gsab_nom_table="'.$valeur['nom_table'].'", '
 - 
 
183 
            .'gsab_nom_champ_login="'.$valeur['champs_login'].'", '
 - 
 
184 
            .'gsab_nom_champ_mdp="'.$valeur['champs_passe'].'", '
 125 
}
185 
            .'gsab_cryptage_mdp="'.$valeur['cryptage'].'"';
 126 
 
186 
}
 127 
 
Line 187... Line 128...
187 
// +------------------------------------------------------------------------------------------------------+
 128 
// +------------------------------------------------------------------------------------------------------+
188 
// |                                            PIED du PROGRAMME                                         |
 129 
// |                                            PIED du PROGRAMME                                         |
189 
// +------------------------------------------------------------------------------------------------------+
 130 
// +------------------------------------------------------------------------------------------------------+
- 
 
 131 
 
- 
 
 132 
 
- 
 
 133 
/* +--Fin du code ----------------------------------------------------------------------------------------+
190 
 
 134 
*
191 
 
 135 
* $Log: not supported by cvs2svn $
192 
/* +--Fin du code ----------------------------------------------------------------------------------------+
 136 
* Revision 1.1  2004/12/13 18:07:28  alex
193 
*
 137 
* version initiale
194 
* $Log: not supported by cvs2svn $
 138 
*