Subversion Repositories Applications.papyrus

Rev

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

Rev 76 Rev 79
Line 30... Line 30...
30
// | DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY                                |
30
// | DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY                                |
31
// | THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT                                  |
31
// | THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT                                  |
32
// | (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF                             |
32
// | (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF                             |
33
// | THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.                                    |
33
// | THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.                                    |
34
// +------------------------------------------------------------------------------------------------------+
34
// +------------------------------------------------------------------------------------------------------+
35
// CVS : $Id: instal_base_de_donnees.inc.php,v 1.2 2004-10-19 15:59:18 jpm Exp $
35
// CVS : $Id: instal_base_de_donnees.inc.php,v 1.3 2004-10-19 16:47:28 jpm Exp $
36
/**
36
/**
37
* Page de création de la base de données de Papyrus.
37
* Page de création de la base de données de Papyrus.
38
*
38
*
39
* Page permettant de créer la base de données de Papyrus.
39
* Page permettant de créer la base de données de Papyrus.
40
*
40
*
Line 45... Line 45...
45
*@author        David DELON
45
*@author        David DELON
46
*@author        Patrick PAUL
46
*@author        Patrick PAUL
47
*@author        Eric FELDSTEIN
47
*@author        Eric FELDSTEIN
48
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
48
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
49
*@copyright     Tela-Botanica 2000-2004
49
*@copyright     Tela-Botanica 2000-2004
50
*@version       $Revision: 1.2 $ $Date: 2004-10-19 15:59:18 $
50
*@version       $Revision: 1.3 $ $Date: 2004-10-19 16:47:28 $
51
// +------------------------------------------------------------------------------------------------------+
51
// +------------------------------------------------------------------------------------------------------+
52
**/
52
**/
Line 53... Line 53...
53
 
53
 
54
// +------------------------------------------------------------------------------------------------------+
54
// +------------------------------------------------------------------------------------------------------+
Line 70... Line 70...
70
// +------------------------------------------------------------------------------------------------------+
70
// +------------------------------------------------------------------------------------------------------+
71
$sortie .= '    <h1>Installation de Papyrus</h1></h1>'."\n";
71
$sortie .= '    <h1>Installation de Papyrus</h1></h1>'."\n";
Line 72... Line 72...
72
 
72
 
73
// Test de la configuration
73
// Test de la configuration
74
$sortie .= '    <h2>Test de la configuration de la base de données</h2>'."\n";
74
$sortie .= '    <h2>Test de la configuration de la base de données</h2>'."\n";
75
$erreur = testerConfig('Test connexion MySQL ...', $dblink = @mysql_connect($config['PAP_BDD_SERVEUR'], $config['PAP_BDD_UTILISATEUR'], $config['PAP_BDD_MOT_DE_PASSE']), '', 1, 0);
75
$erreur = testerConfig($sortie, 'Test connexion MySQL ...', $dblink = @mysql_connect($config['PAP_BDD_SERVEUR'], $config['PAP_BDD_UTILISATEUR'], $config['PAP_BDD_MOT_DE_PASSE']), '', 1, 0);
76
$erreur = testerConfig('Recherche base de donn&eacute;es ...', @mysql_select_db($config['PAP_BDD_NOM'], $dblink), 
76
$erreur = testerConfig($sortie, 'Recherche base de donn&eacute;es ...', @mysql_select_db($config['PAP_BDD_NOM'], $dblink), 
77
                'La base de donn&eacute;es que vous avez choisie n\'existe pas, vous devez la cr&eacute;er avant d\'installer Papyrus !', 1, $erreur);
77
                'La base de donn&eacute;es que vous avez choisie n\'existe pas, vous devez la cr&eacute;er avant d\'installer Papyrus !', 1, $erreur);
Line 78... Line 78...
78
$sortie .= '<br />'."\n";
78
$sortie .= '<br />'."\n";
79
 
79
 
Line 94... Line 94...
94
            $requete_type = '';
94
            $requete_type = '';
95
            if (!empty($value['type'])) {
95
            if (!empty($value['type'])) {
96
                $requete_type = $value['type'];
96
                $requete_type = $value['type'];
97
            }
97
            }
98
            if ($requete_type == 'create') {
98
            if ($requete_type == 'create') {
99
                $erreur = testerConfig( 'Creation table '.$table_nom.'...', @mysql_query($value['query'], $dblink), 
99
                $erreur = testerConfig($sortie, 'Creation table '.$table_nom.'...', @mysql_query($value['query'], $dblink), 
100
                                            'D&eacute;j&agrave; cr&eacute;&eacute;e ?', 0, $erreur);
100
                                            'D&eacute;j&agrave; cr&eacute;&eacute;e ?', 0, $erreur);
101
            } else if ($requete_type == 'insert') {
101
            } else if ($requete_type == 'insert') {
102
                $erreur = testerConfig( 'Insertion table '.$table_nom.'...', @mysql_query($value['query'], $dblink), 
102
                $erreur = testerConfig($sortie, 'Insertion table '.$table_nom.'...', @mysql_query($value['query'], $dblink), 
103
                                            'Donn&eacute;es d&eacute;j&agrave; pr&eacute;sente ?', 0, $erreur);
103
                                            'Donn&eacute;es d&eacute;j&agrave; pr&eacute;sente ?', 0, $erreur);
104
            }
104
            }
105
        }
105
        }
106
        $sortie .= '</div>';
106
        $sortie .= '</div>';
107
        //Insertion des requêtes dépendant du formulaire d'installation
107
        //Insertion des requêtes dépendant du formulaire d'installation
108
        $sortie .= '<h2>Insertion des données dépendant du formulaire précédent</h2>';
108
        $sortie .= '<h2>Insertion des données dépendant du formulaire précédent</h2>';
109
        $requete_admin =    'INSERT INTO gen_annuaire VALUES (1, "'.$bdd['ADMIN_I18N'].'", "'.$bdd['ADMIN_NOM'].
109
        $requete_admin =    'INSERT INTO gen_annuaire VALUES (1, "'.$bdd['ADMIN_I18N'].'", "'.$bdd['ADMIN_NOM'].
110
                            '", "'.$bdd['ADMIN_PRENOM'].'", "'.md5($bdd['ADMIN_MDP_01']).'", "'.
110
                            '", "'.$bdd['ADMIN_PRENOM'].'", "'.md5($bdd['ADMIN_MDP_01']).'", "'.
111
                            $bdd['ADMIN_MAIL'].'");';
111
                            $bdd['ADMIN_MAIL'].'");';
112
        $erreur = testerConfig( 'Insertion de l\'administrateur...', @mysql_query($requete_admin, $dblink), 
112
        $erreur = testerConfig($sortie, 'Insertion de l\'administrateur...', @mysql_query($requete_admin, $dblink), 
113
                                'Donn&eacute;es d&eacute;j&agrave; pr&eacute;sente ?', 0, $erreur);
113
                                'Donn&eacute;es d&eacute;j&agrave; pr&eacute;sente ?', 0, $erreur);
114
    break;
114
    break;
115
    case '0.2':// Installation de Papyrus 0.2
115
    case '0.2':// Installation de Papyrus 0.2
Line 116... Line 116...
116
        
116
        
Line 140... Line 140...
140
 
140
 
141
 
141
 
142
/* +--Fin du code ----------------------------------------------------------------------------------------+
142
/* +--Fin du code ----------------------------------------------------------------------------------------+
-
 
143
*
-
 
144
* $Log: not supported by cvs2svn $
-
 
145
* Revision 1.2  2004/10/19 15:59:18  jpm
-
 
146
* Ajout de la gestion des valeurs propre à Papyrus à insérer dans la base de données.
143
*
147
* Ajout des constantes FTP.
144
* $Log: not supported by cvs2svn $
148
*
145
* Revision 1.1  2004/10/15 18:28:59  jpm
149
* Revision 1.1  2004/10/15 18:28:59  jpm
146
* Début appli installateur de Papyrus.
150
* Début appli installateur de Papyrus.
147
*
151
*