Convert all supann addon defines to globals

Signed-off-by: Benjamin Renard <brenard@easter-eggs.com>
This commit is contained in:
Benjamin Dauvergne 2014-12-13 00:04:10 +01:00 committed by Benjamin Renard
parent 12014b5bf4
commit 10019fc9fe
2 changed files with 44 additions and 40 deletions

View file

@ -27,23 +27,23 @@
*/ */
// Nom de l'attribut LDAP nom // Nom de l'attribut LDAP nom
define('LS_SUPANN_LASTNAME_ATTR','sn'); $GLOBALS['LS_SUPANN_LASTNAME_ATTR'] = 'sn';
// Nom de l'attribut LDAP prenom // Nom de l'attribut LDAP prenom
define('LS_SUPANN_FIRSTNAME_ATTR','givenName'); $GLOBALS['LS_SUPANN_FIRSTNAME_ATTR'] = 'givenName';
// Type de LSobject correspondant aux entites SUPANN // Type de LSobject correspondant aux entites SUPANN
define('LS_SUPANN_LSOBJECT_ENTITE_TYPE','LSsupannEntite'); $GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE'] = 'LSsupannEntite';
// Format d'affichage du nom courts d'une entites SUPANN // Format d'affichage du nom courts d'une entites SUPANN
define('LS_SUPANN_LSOBJECT_ENTITE_FORMAT_SHORTNAME','%{ou}'); $GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_FORMAT_SHORTNAME'] = '%{ou}';
// DN de l'entite SUPANN correspondant à l'etablissement // DN de l'entite SUPANN correspondant à l'etablissement
define('LS_SUPANN_ETABLISSEMENT_DN','supannCodeEntite=XXX,ou=structures,dc=univ,dc=fr'); $GLOBALS['LS_SUPANN_ETABLISSEMENT_DN'] = 'supannCodeEntite=XXX,ou=structures,dc=univ,dc=fr';
// Type de LSobject correspondant aux entites SUPANN // Type de LSobject correspondant aux entites SUPANN
// Exemple : 0753742K // Exemple : 0753742K
define('LS_SUPANN_ETABLISSEMENT_UAI','0753742K'); $GLOBALS['LS_SUPANN_ETABLISSEMENT_UAI'] = '0753742K';
/* /*
* Nomenclatures SUPANN * Nomenclatures SUPANN

View file

@ -51,7 +51,7 @@ LSerror :: defineError('SUPANN_02',
function LSaddon_supann_support() { function LSaddon_supann_support() {
$retval = true; $retval = true;
$MUST_DEFINE_CONST= array( $MUST_DEFINE_STRING= array(
'LS_SUPANN_LASTNAME_ATTR', 'LS_SUPANN_LASTNAME_ATTR',
'LS_SUPANN_FIRSTNAME_ATTR', 'LS_SUPANN_FIRSTNAME_ATTR',
'LS_SUPANN_LSOBJECT_ENTITE_TYPE', 'LS_SUPANN_LSOBJECT_ENTITE_TYPE',
@ -60,10 +60,16 @@ LSerror :: defineError('SUPANN_02',
'LS_SUPANN_ETABLISSEMENT_DN' 'LS_SUPANN_ETABLISSEMENT_DN'
); );
foreach($MUST_DEFINE_CONST as $const) { foreach($MUST_DEFINE_STRING as $string) {
if ( (!defined($const)) || (constant($const) == "")) { if ( isset($GLOBALS[$string]) && is_string($GLOBALS[$string])) {
LSerror :: addErrorCode('SUPANN_SUPPORT_01',$const); continue;
}
foreach(LSconfig :: get('ldap_servers') as $id => $infos) {
if ( !isset($infos['globals'][$string]) || !is_string($infos['globals'][$string])) {
LSerror :: addErrorCode('SUPANN_SUPPORT_01',$string);
$retval=false; $retval=false;
continue 2;
}
} }
} }
@ -77,9 +83,9 @@ LSerror :: defineError('SUPANN_02',
} }
} }
if ( defined('LS_SUPANN_LSOBJECT_ENTITE_TYPE') ) { if (isset($GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE'])) {
if ( ! LSsession :: loadLSobject( LS_SUPANN_LSOBJECT_ENTITE_TYPE ) ) { if ( ! LSsession :: loadLSobject( $GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE'] ) ) {
LSerror :: addErrorCode('SUPANN_SUPPORT_02', LS_SUPANN_LSOBJECT_ENTITE_TYPE); LSerror :: addErrorCode('SUPANN_SUPPORT_02', $GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE']);
} }
} }
@ -100,17 +106,17 @@ LSerror :: defineError('SUPANN_02',
* @retval string Le displayName ou false si il y a un problème durant la génération * @retval string Le displayName ou false si il y a un problème durant la génération
*/ */
function generate_displayName($ldapObject) { function generate_displayName($ldapObject) {
if ( get_class($ldapObject -> attrs[ LS_SUPANN_LASTNAME_ATTR ]) != 'LSattribute' ) { if ( get_class($ldapObject -> attrs[ $GLOBALS['LS_SUPANN_LASTNAME_ATTR'] ]) != 'LSattribute' ) {
LSerror :: addErrorCode('SUPANN_01',array('dependency' => LS_SUPANN_LASTNAME_ATTR, 'attr' => 'cn')); LSerror :: addErrorCode('SUPANN_01',array('dependency' => $GLOBALS['LS_SUPANN_LASTNAME_ATTR'], 'attr' => 'cn'));
return; return;
} }
if ( get_class($ldapObject -> attrs[ LS_SUPANN_FIRSTNAME_ATTR ]) != 'LSattribute' ) { if ( get_class($ldapObject -> attrs[ $GLOBALS['LS_SUPANN_FIRSTNAME_ATTR'] ]) != 'LSattribute' ) {
LSerror :: addErrorCode('SUPANN_01',array('dependency' => LS_SUPANN_FIRSTNAME_ATTR, 'attr' => 'cn')); LSerror :: addErrorCode('SUPANN_01',array('dependency' => $GLOBALS['LS_SUPANN_FIRSTNAME_ATTR'], 'attr' => 'cn'));
return; return;
} }
$noms = $ldapObject -> attrs[ LS_SUPANN_LASTNAME_ATTR ] -> getValue(); $noms = $ldapObject -> attrs[ $GLOBALS['LS_SUPANN_LASTNAME_ATTR'] ] -> getValue();
$prenoms = $ldapObject -> attrs[ LS_SUPANN_FIRSTNAME_ATTR ] -> getValue(); $prenoms = $ldapObject -> attrs[ $GLOBALS['LS_SUPANN_FIRSTNAME_ATTR'] ] -> getValue();
return ($prenoms[0].' '.$noms[0]); return ($prenoms[0].' '.$noms[0]);
} }
@ -125,17 +131,17 @@ LSerror :: defineError('SUPANN_02',
* @retval string Le CN ou false si il y a un problème durant la génération * @retval string Le CN ou false si il y a un problème durant la génération
*/ */
function generate_cn($ldapObject) { function generate_cn($ldapObject) {
if ( get_class($ldapObject -> attrs[ LS_SUPANN_LASTNAME_ATTR ]) != 'LSattribute' ) { if ( get_class($ldapObject -> attrs[ $GLOBALS['LS_SUPANN_LASTNAME_ATTR'] ]) != 'LSattribute' ) {
LSerror :: addErrorCode('SUPANN_01',array('dependency' => LS_SUPANN_LASTNAME_ATTR, 'attr' => 'cn')); LSerror :: addErrorCode('SUPANN_01',array('dependency' => $GLOBALS['LS_SUPANN_LASTNAME_ATTR'], 'attr' => 'cn'));
return; return;
} }
if ( get_class($ldapObject -> attrs[ LS_SUPANN_FIRSTNAME_ATTR ]) != 'LSattribute' ) { if ( get_class($ldapObject -> attrs[ $GLOBALS['LS_SUPANN_FIRSTNAME_ATTR'] ]) != 'LSattribute' ) {
LSerror :: addErrorCode('SUPANN_01',array('dependency' => LS_SUPANN_FIRSTNAME_ATTR, 'attr' => 'cn')); LSerror :: addErrorCode('SUPANN_01',array('dependency' => $GLOBALS['LS_SUPANN_FIRSTNAME_ATTR'], 'attr' => 'cn'));
return; return;
} }
$noms = $ldapObject -> attrs[ LS_SUPANN_LASTNAME_ATTR ] -> getValue(); $noms = $ldapObject -> attrs[ $GLOBALS['LS_SUPANN_LASTNAME_ATTR'] ] -> getValue();
$prenoms = $ldapObject -> attrs[ LS_SUPANN_FIRSTNAME_ATTR ] -> getValue(); $prenoms = $ldapObject -> attrs[ $GLOBALS['LS_SUPANN_FIRSTNAME_ATTR'] ] -> getValue();
return (withoutAccents($noms[0]).' '.withoutAccents($prenoms[0])); return (withoutAccents($noms[0]).' '.withoutAccents($prenoms[0]));
} }
@ -159,7 +165,7 @@ LSerror :: defineError('SUPANN_02',
$affectations = $ldapObject -> attrs[ 'supannEntiteAffectation' ] -> getUpdateData(); $affectations = $ldapObject -> attrs[ 'supannEntiteAffectation' ] -> getUpdateData();
$basedn=LSconfig :: get('LSobjects.'.LS_SUPANN_LSOBJECT_ENTITE_TYPE.'.container_dn').','.LSsession::getTopDn(); $basedn=LSconfig :: get('LSobjects.'.$GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE'].'.container_dn').','.LSsession::getTopDn();
if ($basedn=="") { if ($basedn=="") {
LSerror :: addErrorCode('SUPANN_02','eduPersonOrgUnitDN'); LSerror :: addErrorCode('SUPANN_02','eduPersonOrgUnitDN');
return; return;
@ -192,7 +198,7 @@ LSerror :: defineError('SUPANN_02',
$affectations = $ldapObject -> attrs[ 'supannEntiteAffectationPrincipale' ] -> getUpdateData(); $affectations = $ldapObject -> attrs[ 'supannEntiteAffectationPrincipale' ] -> getUpdateData();
$basedn=LSconfig :: get('LSobjects.'.LS_SUPANN_LSOBJECT_ENTITE_TYPE.'.container_dn').','.LSsession::getTopDn(); $basedn=LSconfig :: get('LSobjects.'.$GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE'].'.container_dn').','.LSsession::getTopDn();
if ($basedn=="") { if ($basedn=="") {
LSerror :: addErrorCode('SUPANN_02','eduPersonPrimaryOrgUnitDN'); LSerror :: addErrorCode('SUPANN_02','eduPersonPrimaryOrgUnitDN');
return; return;
@ -210,8 +216,8 @@ LSerror :: defineError('SUPANN_02',
* Generation de la valeur de l'attribut eduPersonOrgDN * Generation de la valeur de l'attribut eduPersonOrgDN
* à partir de la valeur de l'attribut supannEtablissement. * à partir de la valeur de l'attribut supannEtablissement.
* *
* La valeur sera LS_SUPANN_ETABLISSEMENT_DN si l'attribut supannEtablissement * La valeur sera $GLOBALS['LS_SUPANN_ETABLISSEMENT_DN'] si l'attribut supannEtablissement
* vaut {UAI}LS_SUPANN_ETABLISSEMENT_UAI. * vaut {UAI}$GLOBALS['LS_SUPANN_ETABLISSEMENT_UAI'].
* *
* @author Benjamin Renard <brenard@easter-eggs.com> * @author Benjamin Renard <brenard@easter-eggs.com>
* *
@ -229,8 +235,8 @@ LSerror :: defineError('SUPANN_02',
$eta = $ldapObject -> attrs[ 'supannEtablissement' ] -> getUpdateData(); $eta = $ldapObject -> attrs[ 'supannEtablissement' ] -> getUpdateData();
$retval=array(); $retval=array();
if ($eta[0] == '{UAI}'.LS_SUPANN_ETABLISSEMENT_UAI) { if ($eta[0] == '{UAI}'.$GLOBALS['LS_SUPANN_ETABLISSEMENT_UAI']) {
$retval[] = LS_SUPANN_ETABLISSEMENT_DN; $retval[] = $GLOBALS['LS_SUPANN_ETABLISSEMENT_DN'];
} }
return $retval; return $retval;
@ -297,10 +303,9 @@ LSerror :: defineError('SUPANN_02',
* @retval string Le nom de l'entite * @retval string Le nom de l'entite
**/ **/
function supanGetEntiteNameById($id) { function supanGetEntiteNameById($id) {
if (LSsession::loadLSobject(LS_SUPANN_LSOBJECT_ENTITE_TYPE)) { if (LSsession::loadLSobject($GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE'])) {
$type=LS_SUPANN_LSOBJECT_ENTITE_TYPE; $e = new $GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE']();
$e = new $type(); $list=$e -> listObjectsName("(supannCodeEntite=$id)",NULL,array(),$GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_FORMAT_SHORTNAME']);
$list=$e -> listObjectsName("(supannCodeEntite=$id)",NULL,array(),LS_SUPANN_LSOBJECT_ENTITE_FORMAT_SHORTNAME);
if (count($list)==1) { if (count($list)==1) {
return array_pop($list); return array_pop($list);
} }
@ -316,9 +321,8 @@ LSerror :: defineError('SUPANN_02',
* @retval boolean True si une entité avec cet ID existe, False sinon * @retval boolean True si une entité avec cet ID existe, False sinon
**/ **/
function supannValidateEntityId($id) { function supannValidateEntityId($id) {
if (LSsession::loadLSobject(LS_SUPANN_LSOBJECT_ENTITE_TYPE)) { if (LSsession::loadLSobject($GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE'])) {
$type=LS_SUPANN_LSOBJECT_ENTITE_TYPE; $e = new $GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE']();
$e = new $type();
$list=$e -> listObjectsName("(supannCodeEntite=$id)"); $list=$e -> listObjectsName("(supannCodeEntite=$id)");
if (count($list)==1) { if (count($list)==1) {
return true; return true;
@ -341,7 +345,7 @@ LSerror :: defineError('SUPANN_02',
$retval=array(); $retval=array();
if (LSsession::loadLSclass('LSsearch')) { if (LSsession::loadLSclass('LSsearch')) {
$search=new LSsearch( $search=new LSsearch(
LS_SUPANN_LSOBJECT_ENTITE_TYPE, $GLOBALS['LS_SUPANN_LSOBJECT_ENTITE_TYPE'],
'SUPANN:supannSearchEntityByPattern', 'SUPANN:supannSearchEntityByPattern',
array( array(
'pattern' => $pattern, 'pattern' => $pattern,