| 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 |