2004-10-19 20:58:50 +02:00
< ? php
2003-07-22 16:58:41 +02:00
/* Copyright ( C ) 2003 Rodolphe Quiedeville < rodolphe @ quiedeville . org >
2004-02-28 18:18:33 +01:00
* Copyright ( C ) 2003 <EFBFBD> ric Seigne < erics @ rycks . com >
* Copyright ( C ) 2004 Laurent Destailleur < eldy @ users . sourceforge . net >
2004-09-01 23:23:20 +02:00
* Copyright ( C ) 2004 Sebastien Di Cintio < sdicintio @ ressource - toi . org >
* Copyright ( C ) 2004 Benoit Mortier < benoit . mortier @ opensides . be >
2003-07-22 16:58:41 +02:00
*
* This program is free software ; you can redistribute it and / or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation ; either version 2 of the License , or
* ( at your option ) any later version .
*
* This program is distributed in the hope that it will be useful ,
* but WITHOUT ANY WARRANTY ; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE . See the
* GNU General Public License for more details .
*
* You should have received a copy of the GNU General Public License
* along with this program ; if not , write to the Free Software
* Foundation , Inc . , 59 Temple Place - Suite 330 , Boston , MA 02111 - 1307 , USA .
*
* $Id $
* $Source $
*/
2004-06-18 17:40:28 +02:00
2004-08-29 14:01:58 +02:00
/*!
\file htdocs / admin / webcalendar . php
\ingroup webcal
\brief Page de configuration du module webcalendar
\version $Revision $
*/
2003-07-22 16:58:41 +02:00
require ( " ./pre.inc.php " );
2004-02-28 18:18:33 +01:00
if ( ! $user -> admin )
2004-11-02 22:28:43 +01:00
accessforbidden ();
2004-02-28 18:18:33 +01:00
2003-07-22 16:58:41 +02:00
llxHeader ();
2004-06-18 17:40:28 +02:00
print_titre ( " Configuration du lien vers le calendrier partag<61> " );
2004-02-28 18:18:33 +01:00
print '<br>' ;
2003-07-22 16:58:41 +02:00
$def = array ();
2004-11-02 22:28:43 +01:00
$phpwebcalendar_url = trim ( $_POST [ " phpwebcalendar_url " ]);
$phpwebcalendar_host = trim ( $_POST [ " phpwebcalendar_host " ]);
$phpwebcalendar_dbname = trim ( $_POST [ " phpwebcalendar_dbname " ]);
$phpwebcalendar_user = trim ( $_POST [ " phpwebcalendar_user " ]);
$phpwebcalendar_pass = trim ( $_POST [ " phpwebcalendar_pass " ]);
$phpwebcalendar_pass2 = trim ( $_POST [ " phpwebcalendar_pass2 " ]);
2004-06-27 01:00:30 +02:00
$actionsave = $_POST [ " save " ];
$actiontest = $_POST [ " test " ];
// Positionne la variable pour le test d'affichage de l'icone
if ( $actionsave )
2003-07-22 16:58:41 +02:00
{
2004-11-02 22:28:43 +01:00
if ( $phpwebcalendar_pass == $phpwebcalendar_pass2 )
2004-06-27 01:00:30 +02:00
{
2004-09-11 01:17:33 +02:00
$sql = " DELETE FROM " . MAIN_DB_PREFIX . " const WHERE name = 'PHPWEBCALENDAR_URL'; " ;
2004-11-02 22:28:43 +01:00
$db -> query ( $sql );
$sql = " INSERT INTO " . MAIN_DB_PREFIX . " const (name,value,visible) VALUES ('PHPWEBCALENDAR_URL',' " . $phpwebcalendar_url . " ',0); " ;
$result = $db -> query ( $sql );
$sql1 = " DELETE FROM " . MAIN_DB_PREFIX . " const WHERE name = 'PHPWEBCALENDAR_HOST'; " ;
$db -> query ( $sql1 );
$sql1 = " INSERT INTO " . MAIN_DB_PREFIX . " const (name,value,visible) VALUES ('PHPWEBCALENDAR_HOST',' " . $phpwebcalendar_host . " ',0); " ;
$result1 = $db -> query ( $sql1 );
$sql2 = " DELETE FROM " . MAIN_DB_PREFIX . " const WHERE name = 'PHPWEBCALENDAR_DBNAME'; " ;
$db -> query ( $sql2 );
$sql2 = " INSERT INTO " . MAIN_DB_PREFIX . " const (name,value,visible) VALUES ('PHPWEBCALENDAR_DBNAME',' " . $phpwebcalendar_dbname . " ',0); " ;
$result2 = $db -> query ( $sql2 );
$sql3 = " DELETE FROM " . MAIN_DB_PREFIX . " const WHERE name = 'PHPWEBCALENDAR_USER' ; " ;
$db -> query ( $sql3 );
$sql3 = " INSERT INTO " . MAIN_DB_PREFIX . " const (name,value,visible) VALUES ('PHPWEBCALENDAR_USER',' " . $phpwebcalendar_user . " ',0); " ;
$result3 = $db -> query ( $sql3 );
$sql4 = " DELETE FROM " . MAIN_DB_PREFIX . " const WHERE name = 'PHPWEBCALENDAR_PASS'; " ;
$db -> query ( $sql4 );
$sql4 = " INSERT INTO " . MAIN_DB_PREFIX . " const (name,value,visible) VALUES ('PHPWEBCALENDAR_PASS',' " . $phpwebcalendar_pass . " ',0); " ;
$result4 = $db -> query ( $sql4 );
if ( $result && $result1 && $result2 && $result3 && $result4 )
2004-06-27 01:00:30 +02:00
{
2004-11-02 22:28:43 +01:00
$ok = " <br><font class= \" ok \" >Les identifiants Webcalendar ont <20> t<EFBFBD> sauvegard<72> s avec succ<63> s.</font> " ;
2004-06-27 01:00:30 +02:00
}
}
else
{
2004-11-02 22:28:43 +01:00
$ok = " <br><font class= \" error \" >Le mot de passe n'est pas identique, veuillez le saisir <20> nouveau</font><br> \n " ;
2004-06-27 01:00:30 +02:00
}
2003-07-22 16:58:41 +02:00
}
2004-02-28 18:18:33 +01:00
2004-11-02 22:28:43 +01:00
if ( ! $phpwebcalendar_url ) { $phpwebcalendar_url = PHPWEBCALENDAR_URL ; }
if ( ! $phpwebcalendar_host ) { $phpwebcalendar_host = PHPWEBCALENDAR_HOST ; }
if ( ! $phpwebcalendar_dbname ) { $phpwebcalendar_dbname = PHPWEBCALENDAR_DBNAME ; }
if ( ! $phpwebcalendar_user ) { $phpwebcalendar_user = PHPWEBCALENDAR_USER ; }
if ( ! $phpwebcalendar_pass ) { $phpwebcalendar_pass = PHPWEBCALENDAR_PASS ; }
if ( ! $phpwebcalendar_pass2 ) { $phpwebcalendar_pass2 = PHPWEBCALENDAR_PASS ; }
2004-02-28 18:18:33 +01:00
2004-06-18 17:40:28 +02:00
/**
2004-06-27 01:00:30 +02:00
* Affichage du formulaire de saisie
*/
2004-07-30 12:32:27 +02:00
print '<form name="phpwebcalendarconfig" action="webcalendar.php" method="post">' ;
2004-11-02 22:28:43 +01:00
print " <table class= \" noborder \" >
2004-02-28 18:18:33 +01:00
< tr class = \ " liste_titre \" >
2004-07-31 13:36:01 +02:00
< td > " . $langs->trans ( " Parameter " ). " </ td >
< td > " . $langs->trans ( " Value " ). " </ td >
2004-02-28 18:18:33 +01:00
</ tr >
< tr class = \ " impair \" >
2004-06-27 01:00:30 +02:00
< td > Adresse URL d ' acc<EFBFBD> s au calendrier </ td >
2004-11-02 22:28:43 +01:00
< td >< input type = \ " text \" name= \" phpwebcalendar_url \" value= \" " . $phpwebcalendar_url . " \" size= \" 45 \" ></td>
2003-07-22 16:58:41 +02:00
</ tr >
2004-02-28 18:18:33 +01:00
< tr class = \ " pair \" >
2004-06-27 01:00:30 +02:00
< td > Serveur o<EFBFBD> la base du calendrier est h<EFBFBD> berg<EFBFBD> e </ td >
2004-11-02 22:28:43 +01:00
< td >< input type = \ " text \" name= \" phpwebcalendar_host \" value= \" " . $phpwebcalendar_host . " \" size= \" 45 \" ></td>
2003-07-22 16:58:41 +02:00
</ tr >
2004-02-28 18:18:33 +01:00
< tr class = \ " impair \" >
2004-06-27 01:00:30 +02:00
< td > Nom de la base de donn<EFBFBD> es </ td >
2004-11-02 22:28:43 +01:00
< td >< input type = \ " text \" name= \" phpwebcalendar_dbname \" value= \" " . $phpwebcalendar_dbname . " \" size= \" 45 \" ></td>
2003-07-22 16:58:41 +02:00
</ tr >
2004-02-28 18:18:33 +01:00
< tr class = \ " pair \" >
2004-06-27 01:00:30 +02:00
< td > Identifiant d ' acc<EFBFBD> s <EFBFBD> la base </ td >
2004-11-02 22:28:43 +01:00
< td >< input type = \ " text \" name= \" phpwebcalendar_user \" value= \" " . $phpwebcalendar_user . " \" size= \" 45 \" ></td>
2003-07-22 16:58:41 +02:00
</ tr >
2004-02-28 18:18:33 +01:00
< tr class = \ " impair \" >
2004-07-31 13:36:01 +02:00
< td > " . $langs->trans ( " Password " ). " </ td >
2004-11-02 22:28:43 +01:00
< td >< input type = \ " password \" name= \" phpwebcalendar_pass \" value= \" " . $phpwebcalendar_pass . " \" size= \" 45 \" ></td>
2003-07-22 16:58:41 +02:00
</ tr >
2004-02-28 18:18:33 +01:00
< tr class = \ " pair \" >
2004-07-31 13:36:01 +02:00
< td > " . $langs->trans ( " PasswordRetype " ). " </ td >
2004-11-02 22:28:43 +01:00
< td >< input type = \ " password \" name= \" phpwebcalendar_pass2 \" value= \" " . $phpwebcalendar_pass2 . " \" size= \" 45 \" ></td>
2003-07-22 16:58:41 +02:00
</ tr >
2004-02-28 18:18:33 +01:00
< tr class = \ " impair \" >
2004-06-27 01:00:30 +02:00
< td colspan = \ " 2 \" align= \" center \" >
2004-07-31 13:36:01 +02:00
< input type = \ " submit \" name= \" test \" value= \" " . $langs -> trans ( " TestConnection " ) . " \" >
< input type = \ " submit \" name= \" save \" value= \" " . $langs -> trans ( " Save " ) . " \" >
2004-06-27 01:00:30 +02:00
</ td >
2003-07-22 16:58:41 +02:00
</ tr > \n " ;
2004-06-27 01:00:30 +02:00
clearstatcache ();
2004-06-18 20:33:35 +02:00
2004-06-27 01:00:30 +02:00
print "
2004-02-28 18:18:33 +01:00
</ table >
2003-07-22 16:58:41 +02:00
</ form > \n " ;
2004-02-28 18:18:33 +01:00
2003-07-22 16:58:41 +02:00
2004-06-27 01:00:30 +02:00
if ( $ok ) print " $ok <br> " ;
2004-11-02 22:28:43 +01:00
// Test de la connection a la database webcalendar
2004-06-27 01:00:30 +02:00
if ( $actiontest )
{
2004-11-02 22:28:43 +01:00
$webcal = new DoliDb ( '' , $phpwebcalendar_host , $phpwebcalendar_user , $phpwebcalendar_pass , $phpwebcalendar_dbname );
2004-06-27 01:00:30 +02:00
2004-11-02 22:28:43 +01:00
if ( $webcal -> connected == 1 && $webcal -> database_selected == 1 )
{
print " <br><font class= \" ok \" >La connection au serveur ' $phpwebcalendar_host ' sur la base ' $phpwebcalendar_dbname ' a r<> ussi.</font><br> " ;
$webcal -> close ();
}
elseif ( $webcal -> connected == 1 )
2004-06-27 01:00:30 +02:00
{
2004-11-02 22:28:43 +01:00
print " <br><font class= \" error \" >La connection au serveur ' $phpwebcalendar_host ' a r<> ussi mais la base ' $phpwebcalendar_dbname ' n'a pu <20> tre acc<63> d<EFBFBD> e.</font><br> " ;
2004-06-27 01:00:30 +02:00
$webcal -> close ();
}
else
2004-11-02 22:28:43 +01:00
{
print " <br><font class= \" error \" >La connection au serveur ' $phpwebcalendar_host ' <20> <20> chou<6F> .</font><br> " ;
}
2004-06-27 01:00:30 +02:00
}
llxFooter ();
2003-07-22 16:58:41 +02:00
?>