19,7 → 19,7 |
// | License along with this library; if not, write to the Free Software | |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
// +------------------------------------------------------------------------------------------------------+ |
// CVS : $Id: adsi_site.fonct.php,v 1.32 2006-10-16 15:49:06 ddelon Exp $ |
// CVS : $Id: adsi_site.fonct.php,v 1.33 2007-04-19 15:34:35 neiluj Exp $ |
/** |
* Bibliothèque de fonctions d'admininistration des projets |
* |
34,7 → 34,7 |
*@author Alexandre GRANIER <alexandre@tela-botanica.org> |
*@author Laurent COUDOUNEAU <lc@gsite.org> |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.32 $ $Date: 2006-10-16 15:49:06 $ |
*@version $Revision: 1.33 $ $Date: 2007-04-19 15:34:35 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
|
49,9 → 49,9 |
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonction ADMIN_afficherListeSites()- Génére le xhtml permettant de choisir un site parmis une liste. |
/** Fonction ADMIN_afficherListeSites()- Génère le xhtml permettant de choisir un site parmis une liste. |
* |
* Cette fonction fournie une liste des sites principaux gérés par Génésia. |
* Cette fonction fournie une liste des sites principaux gérés par Papyrus. |
* |
* @param string l'objet Pear DB. |
* @param string l'url de la page à laquelle renvoyer le formulaire. |
254,7 → 254,7 |
$form->addElement('submit', $id, $label, $aso_attributs); |
|
$id = 'form_sites_supprimer'; |
$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'onclick' => 'javascript:return confirm(\''.'Êtes vous sûr de vouloir supprimer ce site ?'.'\');'); |
$aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++, 'onclick' => 'javascript:return confirm(\''.'êtes vous sûr de vouloir supprimer ce site ?'.'\');'); |
$label = 'Supprimer'; |
$form->addElement('submit', $id, $label, $aso_attributs); |
|
290,7 → 290,7 |
return $message; |
} |
|
/** Fonction ADMIN_afficherFormSite()- Génére un formulaire pour gen_site. |
/** Fonction ADMIN_afficherFormSite()- Génère un formulaire pour gen_site. |
* |
* Cette fonction retourne un formulaire pour modification ou pour ajout. |
* |
395,7 → 395,7 |
} else if (isset($aso_valeurs['gs_id_site'])) { |
$aso_valeurs['modification'] = true; |
} |
// Débogage : |
// débogage : |
//$GLOBALS['_DEBOGAGE_'] .= '<pre>'.print_r($aso_valeurs, true).'</pre>'; |
//------------------------------------------------------------------------------------------------------------------- |
// Information précédent le formulaire (en modification) |
722,7 → 722,7 |
// Javascript pour la validation côté client |
$regles_javascript = $form->getValidationScript(); |
// Suppression des balises déjà créées par GEN_stockerCodeScript() |
// Le code ci-dessous devrait être utilisé si on arrive à empécher Quickform de l'ajouter lui-même! |
// Le code ci-dessous devrait être utilisé si on arrive à empêcher Quickform de l'ajouter lui-même! |
/* |
$regles_javascript = ereg_replace ( '<script type="text\/javascript">', '', $regles_javascript); |
$regles_javascript = ereg_replace ( '<!--', '', $regles_javascript); |
759,7 → 759,7 |
$message .= '<p class="pap_erreur">Le champ "Code alphanumérique" ne doit pas être vide.</p>'; |
} |
if ($aso_valeurs['gs_code_num'] == '') { |
// Note: ne pas utilisez empty() car si on veut saisir 0, cela est conscidéré comme vide! |
// Note: ne pas utilisez empty() car si on veut saisir 0, cela est considéré comme vide! |
$message .= '<p class="pap_erreur">Le champ "Code numérique" ne doit pas être vide.</p>'; |
} |
if (preg_match('/^[0-9]+$/',$aso_valeurs['gs_code_num']) == 0) { |
822,7 → 822,7 |
} |
if (isset($aso_valeurs['externe']) && $aso_valeurs['externe'] == 0 && (!empty($aso_valeurs['gs_url']) && $aso_valeurs['gs_url'] != 'http://')) { |
$message .= '<p class="pap_erreur">'.'Vous avez saisie une l\'url : '.$aso_valeurs['gs_url'].'<br />'. |
'Vous conscidérez donc ce site comme étant externe. Il est nécessaire de cocher la case "oui"!'.'</p>'; |
'Vous considérez donc ce site comme étant externe. Il est nécessaire de cocher la case "oui"!'.'</p>'; |
} |
return $message; |
} |
842,7 → 842,7 |
function ADMIN_enregistrerSite(&$db, $aso_valeurs, $id_admin) |
{ |
// Nous vérifions si nous avons à faire à un site externe. |
$id_type_site = '102';// par défaut on conscidére que c'est un site "principal" |
$id_type_site = '102';// par défaut on considère que c'est un site "principal" |
if (isset($aso_valeurs['type_site_externe']) && $aso_valeurs['type_site_externe'] > 0 && !empty($aso_valeurs['gs_url']) && $aso_valeurs['gs_url'] != 'http://') { |
$id_type_site = '103';// c'est un site "externe" |
} |
915,8 → 915,17 |
'Fichier n° : '. __FILE__ .'<br /><p>'; |
return $message; |
} |
$objet_pear_ftp->mkdir(PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha']) ; |
$resultat = $objet_pear_ftp->mkdir(PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha']) ; |
|
if (PEAR::isError($resultat)) { |
$message = '<p class="pap_erreur"> ERREUR Papyrus admin : impossible de créer le répertoire par ftp.<br />'. |
'Répertoire : '. PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha'] .'<br />'. |
'Erreur origine : '. $resultat->getMessage() .'<br />'. |
'Informations de debogage : '.$resultat->getDebugInfo().'<br />'. |
'Ligne n° : '. __LINE__ .'<br />'. |
'Fichier n° : '. __FILE__ .'<br /></p>'; |
return $message; |
} |
//$objet_pear_ftp->cd(PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha']) ; |
foreach ($tab_rep_langue as $nom_rep_langue) { |
$objet_pear_ftp->mkdir(PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha'].GEN_SEP.$nom_rep_langue) ; |
928,6 → 937,7 |
$message = '<p class="pap_erreur"> ERREUR Papyrus admin : impossible de créer le répertoire par ftp.<br />'. |
'Répertoire : '. $chemin_repertoire .'<br />'. |
'Erreur origine : '. $resultat->getMessage() .'<br />'. |
'Informations de debogage : '.$resultat->getDebugInfo().'<br />'. |
'Ligne n° : '. __LINE__ .'<br />'. |
'Fichier n° : '. __FILE__ .'<br /></p>'; |
return $message; |
985,7 → 995,7 |
|
$id_site = SQL_obtenirNouveauId($db, 'gen_site','gs_id_site'); |
if ($id_site == false) { |
$message = '<p class="erreur"> ERREUR Génésia admin : impossible de récupérer un identifiant pour la table gen_site.<br />'. |
$message = '<p class="erreur"> ERREUR Papyrus admin : impossible de récupérer un identifiant pour la table gen_site.<br />'. |
'Ligne n° : '. __LINE__ .'<br />'. |
'Fichier n° : '. __FILE__ .'<br /></p>'; |
return $message; |
1078,7 → 1088,7 |
} |
} |
|
$message = '<p class="pap_info">'.'Succés de l\'ajout du site.'.'</p>'; |
$message = '<p class="pap_info">'.'Succès de l\'ajout du site.'.'</p>'; |
return $message; |
} |
|
1097,7 → 1107,7 |
function ADMIN_traduireSite(&$db, $aso_valeurs, $id_admin) |
{ |
// Nous vérifions si nous avons à faire à un site externe. |
$id_type_site = '102';// par défaut on considére que c'est un site "principal" |
$id_type_site = '102';// par défaut on considère que c'est un site "principal" |
if (isset($aso_valeurs['type_site_externe']) && $aso_valeurs['type_site_externe'] > 0 && !empty($aso_valeurs['gs_url']) && $aso_valeurs['gs_url'] != 'http://') { |
$id_type_site = '103';// c'est un site "externe" |
} |
1223,7 → 1233,7 |
$id_site = SQL_obtenirNouveauId($db, 'gen_site','gs_id_site'); |
|
if ($id_site == false) { |
$message = '<p class="erreur"> ERREUR Génésia admin : impossible de récupérer un identifiant pour la table gen_site.<br />'. |
$message = '<p class="erreur"> ERREUR Papyrus admin : impossible de récupérer un identifiant pour la table gen_site.<br />'. |
'Ligne n° : '. __LINE__ .'<br />'. |
'Fichier n° : '. __FILE__ .'<br /></p>'; |
return $message; |
1376,7 → 1386,7 |
} |
} |
|
$message = '<p class="pap_info">'.'Succés de l\'ajout du site.'.'</p>'; |
$message = '<p class="pap_info">'.'Succès de l\'ajout du site.'.'</p>'; |
return $message; |
} |
|
1406,7 → 1416,7 |
} |
|
// Nous vérifions si nous avons à faire à un site externe. |
$id_type_site = '102';// par défaut on conscidére que c'est un site "principal" |
$id_type_site = '102';// par défaut on considère que c'est un site "principal" |
$requete_complement = ', gs_url = NULL '; |
if (isset($aso_valeurs['type_site_externe']) && $aso_valeurs['type_site_externe'] > 0 && !empty($aso_valeurs['gs_url']) && $aso_valeurs['gs_url'] != 'http://') { |
$requete_complement = ', gs_url = "'.$aso_valeurs['gs_url'].'" '; |
1584,7 → 1594,7 |
} |
} |
|
$message = '<p class="pap_info">'.'Succés de la modification du site.'.'</p>'; |
$message = '<p class="pap_info">'.'Succès de la modification du site.'.'</p>'; |
$message .= '<p class="pap_info">'.$message_complement.'</p>'; |
return $message; |
} |
1621,7 → 1631,7 |
} |
|
// Recherche des différents sites liés à celui que l'on veut détruire |
// Cela comprend le site à détruire lui méme car il posséde la relations |
// Cela comprend le site à détruire lui même car il possède la relations |
// sur lui meme "site principale". |
$requete = 'SELECT gs_id_site '. |
'FROM gen_site, gen_site_relation '. |
1744,7 → 1754,7 |
// Retour au niveau d'erreur définit dans le fichier de config de Papyrus |
error_reporting(GEN_DEBOGAGE_NIVEAU); |
} |
$message = '<p class="pap_info">Succés de la suppression du site.</p>'; |
$message = '<p class="pap_info">Succès de la suppression du site.</p>'; |
return $message; |
} |
|
1818,6 → 1828,9 |
// +- Fin du code source --------------------------------------------------------------------------------+ |
/* |
* $Log: not supported by cvs2svn $ |
* Revision 1.32 2006/10/16 15:49:06 ddelon |
* Refactorisation code mulitlinguisme et gestion menu invisibles |
* |
* Revision 1.31 2006/09/12 09:54:02 ddelon |
* Affichage des identifications disponibles lors de la création d'un site. Un bug faisait que l'affichage de l'identification par défaut ne fonctionnait plus en creation. |
* |
1880,7 → 1893,7 |
* Gestion des types de sites externes gérés par Papyrus. |
* |
* Revision 1.13 2004/12/03 16:37:34 jpm |
* Correction d'un bogue qui empécher la mise à jour des url des sites externes. |
* Correction d'un bogue qui empêcher la mise à jour des url des sites externes. |
* |
* Revision 1.12 2004/12/01 17:22:58 jpm |
* Ajout d'une confirmation javascript pour la suppression d'un site. |
1917,7 → 1930,7 |
* Modification de la documentation pour une mailleur analyse par PhpDocumentor. |
* |
* Revision 1.1 2004/06/16 14:28:46 jpm |
* Changement de nom de Génésia en Papyrus. |
* Changement de nom de Papyrus en Papyrus. |
* Changement de l'arborescence. |
* |
* Revision 1.20 2004/05/10 14:32:14 jpm |